DICATTUD ;SFISC/MKO - USER DEFINED DATA TYPES ;24JUN2017
Source file <DICATTUD.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BEGIN | ||
| SCREENMN | ;Come from DICATTD (ScreenMan mode)
|
|
| EN(A,DA,N,O) | ;
|
|
| DONE | ;
|
|
| PROPMETH(PROPMETH,N,DIPROP,DIVALS) | ;For DATA TYPE N, get a PROPERTY (PROPMETH="P") or METHOD
|
|
| DIR(DIPROP,DIVALS) | ;Do a ^DIR read to get value for property or method
|
|
| A | ;Put Prompt into DIR("A")
|
|
| H | ;Put Help into DIR("?")
|
|
| B | ;Put default into DIR("B")
|
|
| SAVE(DIPROP,DIVAL,DIVALS,DICAT101,DIEXEC) | ;Save the value of the property
; in DIVALS(abbr) and DICAT101 |
|
| GETDEF(N,DIPROP,DIVALS) | ;Get defaults for a property.
|
| Name | Field # of Occurrence |
|---|---|
| ENDR^%ZISS | SCREENMN+3 |
| CLRMSG^DDS | SCREENMN+2 |
| UNED^DDSUTL | SCREENMN+7 |
| PUT^DDSVALF | SCREENMN+9 |
| CHECK^DICATT | BEGIN |
| ^DICATT1 | BEGIN+1 |
| $$ESTORE^DICATT1 | SCREENMN+7 |
| $$PARSE^DIETLIB | PROPMETH+16, DIR+4 |
| XCODEM^DIETLIB | PROPMETH+22 |
| $$PROP4TYP^DIETLIBF | DONE+3 |
| $$GET1^DIQ | DONE+10 |
| ^DIR | B+11 |
| $$DATE^DIUTL | B+6 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | BEGIN, EN~, EN+3, PROPMETH+7, GETDEF+5 |
| C | SCREENMN+1~, SCREENMN+8, DONE+9* |
| DA | BEGIN, EN~, EN+3, PROPMETH+7, GETDEF+5 |
| DDS | EN+2~ |
| DIABBR | SAVE+12~, SAVE+15*, SAVE+16, SAVE+22 |
| DIALLVAL | SCREENMN+1~ |
| DICAT101 | SAVE~ |
| >> DICATT2N | SCREENMN+7* |
| >> DICATT3N | SCREENMN+7* |
| >> DICATT4 | SCREENMN+4 |
| >> DICATT5N | SCREENMN+8* |
| >> DICATTA | SCREENMN+4 |
| >> DICATTF | SCREENMN+4 |
| >> DICATTLN | SCREENMN+8* |
| >> DICATTMN | SCREENMN+9* |
| DICATTPM | EN+1!, EN+10! |
| DICATTPM( | B+1, SAVE+20, SAVE+21*, SAVE+22*, SAVE+23*, SAVE+25*, SAVE+26* |
| DICATTPM(101 | EN+3* |
| DICATTPM(201 | EN+3* |
| DICHANGE | EN+2~, PROPMETH+28*, GETDEF+9 |
| DIDD | PROPMETH+1~, PROPMETH+3*, PROPMETH+21, PROPMETH+22, DIR+4, A+2, A+3, A+5, H+2, H+3 , H+5, B+9, B+10, SAVE+15 |
| DIDEF | GETDEF+2~, GETDEF+5*, GETDEF+9, GETDEF+16*, GETDEF+22 |
| DIEXEC | PROPMETH+1~, PROPMETH+6*, PROPMETH+31, SAVE~, SAVE+23 |
| DIGL | PROPMETH+1~, PROPMETH+3*, PROPMETH+5, PROPMETH+7, PROPMETH+15, PROPMETH+16, PROPMETH+31, B+1, B+4, SAVE+20 , SAVE+21, SAVE+22, SAVE+23, SAVE+25, SAVE+26 |
| DIMETH | EN+2~, EN+12*, EN+13* |
| DIORD | EN+2~, EN+6*, EN+7*, EN+8 |
| DIPROMPT | PROPMETH+1~, PROPMETH+15*, PROPMETH+16*, PROPMETH+19 |
| DIPROP | EN+2~, EN+8*, PROPMETH~, PROPMETH+5, PROPMETH+7, PROPMETH+12, PROPMETH+15, PROPMETH+16, PROPMETH+21, PROPMETH+22 , PROPMETH+26, PROPMETH+31, DIR~, DIR+4, A+2, A+3, A+5, H+2, H+3, H+5 , B+1, B+5, B+9, B+10, SAVE~, SAVE+15, SAVE+21, SAVE+22, SAVE+23, SAVE+25 , SAVE+26, GETDEF~, GETDEF+5, GETDEF+16 |
| DIR | DIR+1~ |
| DIR("?" | H+2*, H+5*, H+6*! |
| DIR("A" | A+2*, A+5*, A+6*! |
| DIR("B" | B+3* |
| DIR("S" | B+9* |
| DIR("T" | B+10* |
| DIR(0 | DIR+4*, DIR+5, B+7 |
| DIROUT | DIR+1~ |
| DIRUT | DIR+1~ |
| DIVAL | SCREENMN+1~, PROPMETH+1~, PROPMETH+7*, PROPMETH+9, PROPMETH+12*, PROPMETH+22, PROPMETH+23, PROPMETH+26*, PROPMETH+28, PROPMETH+31 , SAVE~, SAVE+16, SAVE+19, SAVE+23, SAVE+24 |
| DIVAL( | SAVE+24, SAVE+25, SAVE+26 |
| DIVALS | EN+2~, EN+8, EN+13, PROPMETH~, PROPMETH+12, PROPMETH+22, PROPMETH+26, PROPMETH+31, DIR~, DIR+4 , SAVE~, GETDEF~ |
| DIVALS( | SAVE+16* |
| DIVALS("DIDEF" | PROPMETH+2!, PROPMETH+9*, PROPMETH+12*, PROPMETH+28, B+2 |
| DIZ | SCREENMN+1~, SCREENMN+7, DONE+11* |
| DTOUT | BEGIN!, SCREENMN+1~, SCREENMN+6, EN+1!, EN+7, EN+10*, PROPMETH+27, PROPMETH+30 |
| DUOUT | EN+7, EN+10!, PROPMETH+23*, PROPMETH+27, PROPMETH+30 |
| DUZ(0 | EN+13 |
| I | DIR+1~, A+1*, A+3*, A+5, H+1*, H+3*, H+5, B+1*, B+2*, B+3 , B+6*, B+7*, SAVE+20~*, SAVE+21, SAVE+24*, SAVE+25, SAVE+26 |
| >> IOBM | SCREENMN+3*, SCREENMN+5* |
| IOBT | SCREENMN+1~ |
| IOSL | SCREENMN+3, SCREENMN+5 |
| >> IOSTBM | SCREENMN+3, SCREENMN+5 |
| IOTM | SCREENMN+1~, SCREENMN+3*, SCREENMN+5* |
| J | DIR+1~, A+2*, A+4*, A+5, A+6, H+1*, H+2*, H+4*, H+5, H+6 |
| L | SCREENMN+1~, SCREENMN+8, DONE+3* |
| M | SCREENMN+1~, DONE+2! |
| M(2 | EN+1! |
| N | BEGIN, EN~, EN+7, EN+8, EN+13, DONE+3, DONE+10, DONE+11, PROPMETH~, PROPMETH+5 , PROPMETH+12, PROPMETH+15, PROPMETH+16, GETDEF~, GETDEF+16 |
| O | BEGIN, EN~, GETDEF+9 |
| PROPMETH | PROPMETH~, PROPMETH+3 |
| T | B+5~*, B+6, B+7 |
| U | SCREENMN+7, DONE+11, A+2, B+7, SAVE+15, SAVE+22 |
| X | SCREENMN+3~*, SCREENMN+4, DIR+1~ |
| Y | DIR+1~, B+12 |
| Z | SCREENMN+1~, DONE+10*, DONE+11*, SAVE+20~* |