VAQDIS15 ;ALB/JFP - PDX,DISPLAY SEGMENTS FOR DISPLAY;01MAR93
Source file <VAQDIS15.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 |
|---|---|---|
| EP | ; -- Main entry point for the list processor
; -- K XQORS,VALMEVL (only kill on the first screen in) |
|
| INIT | ; -- Initializes variables and defines screen
|
|
| TMP | ; -- Set the array used by list processor
|
|
| HD | ; -- Make header line for list processor
|
|
| SEL | ; -- Selected segment(s) for display
|
|
| SEL2 | ||
| ALL | ; -- Selects all segments for display
|
|
| TRANEX | ||
| BLDDIS | ; -- Builds display
|
|
| ERRMSG | ; -- Displays a message if segment could be extracted
|
|
| ENDLN | ; -- End of display
|
|
| ETMP | ; -- Display for error message
|
|
| EXIT | ; -- Note: The list processor cleans up its own variables.
; All other variables cleaned up here. |
|
| END | ; -- End of code
|
| Name | Field # of Occurrence |
|---|---|
| T0^%ZOSV | BLDDIS+1 |
| T1^%ZOSV | BLDDIS+8 |
| EN^VALM | EP+2 |
| $$SETFLD^VALM1 | INIT+13, INIT+14, INIT+15 |
| $$SETSTR^VALM1 | INIT+5, INIT+6, HD+3, HD+4, HD+5, HD+6, HD+7, ERRMSG+7, ERRMSG+8, ERRMSG+9 , ERRMSG+10, ENDLN+2, ENDLN+3 |
| CLEAR^VALM1 | SEL+5, ALL+4 |
| PAUSE^VALM1 | TRANEX |
| SEL^VALM2 | SEL+1 |
| EP^VAQDIS16 | SEL+13, ALL+11 |
| $$DEVICE^VAQDIS17 | SEL+6, ALL+5 |
| $$CENTER^VAQDIS20 | ERRMSG+6 |
| $$ROOT^VAQDIS20 | ERRMSG+1, ENDLN+1 |
| $$BLDDSP^VAQUPD2 | BLDDIS+4 |
| $$REPEAT^VAQUTL1 | ERRMSG+4 |
| $$TRNDATA^VAQUTL92 | HD+2 |
| KILLTRN^VAQUTL92 | HD+13 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("VAQD2" | INIT+1!, TMP+2*, TMP+3*, EXIT+3! |
| ^TMP("VAQIDXSG" | TMP+4*, ALL+1, ALL+9, BLDDIS+2, EXIT+3! |
| ^VAT(394.61 - [#394.61] | INIT+4, INIT+9 |
| ^VAT(394.71 - [#394.71] | INIT+10, INIT+11, ERRMSG+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | INIT+4, INIT+9, BLDDIS+4 |
| >> ENTRY | SEL+10*, SEL+11*, ALL+8*, ALL+9*, BLDDIS+2 |
| EROOT | ERRMSG+1*, ERRMSG+12!, ENDLN+1*, ENDLN+4!, ETMP+2 |
| >> ERRMSG | BLDDIS+6*, ERRMSG+8 |
| OFFSET | BLDDIS+4*, BLDDIS+5, BLDDIS+6, ERRMSG+11*, EXIT+5! |
| ROOT | SEL+4*, ALL+3*, BLDDIS+4, ERRMSG+1, ENDLN+1, EXIT+5! |
| >> SDAT | BLDDIS+2*, BLDDIS+3 |
| SEGDE | INIT+2*, INIT+9*, INIT+10, INIT+11, TMP+4, BLDDIS+3*, BLDDIS+4, ERRMSG+3, EXIT+4! |
| SEGMNU | INIT+10*, INIT+14, TMP+4, EXIT+4! |
| SEGNM | INIT+11*, INIT+15, EXIT+4! |
| U | INIT+10, INIT+11, BLDDIS+3, BLDDIS+6 |
| VALMBCK | SEL+8*, SEL+9*, SEL2+1*, ALL+1*, ALL+6*, ALL+7!, ALL+12!, TRANEX+1* |
| >> VALMCNT | INIT+2*, TMP+1*, TMP+2, TMP+3, SEL+3*, ALL+2*, BLDDIS+4, BLDDIS+5*, ERRMSG+11, ETMP+1* , ETMP+2 |
| >> VALMHDR(1 | HD+9* |
| >> VALMHDR(2 | HD+10* |
| >> VALMHDR(3 | HD+11* |
| >> VALMY | SEL+2 |
| >> VALMY( | SEL+11 |
| >> VAQADOM | HD+4 |
| >> VAQADT | HD+7 |
| VAQCTR | ERRMSG+5*, ERRMSG+6, ERRMSG+12! |
| >> VAQDFN | HD+2 |
| >> VAQECNT | INIT+2*, INIT+12*, INIT+13, TMP+3, TMP+4 |
| >> VAQESSN | HD+5 |
| >> VAQFLAG | TRANEX+1 |
| VAQLN | ERRMSG+4*, ERRMSG+6, ERRMSG+12! |
| >> VAQPTID | HD+5, HD+6 |
| >> VAQPTNM | HD+3 |
| VAQSEGND | ERRMSG+2*, ERRMSG+3*, ERRMSG+5, ERRMSG+12! |
| X | INIT+5*, INIT+6*, INIT+13*, INIT+14*, INIT+15*, TMP+2, SEL+6*, SEL+8, SEL+9, ALL+5* , ALL+6, ALL+7, ERRMSG+6*, ERRMSG+7*, ERRMSG+8*, ERRMSG+9*, ERRMSG+10*, ERRMSG+12!, ENDLN+2*, ENDLN+3* , ETMP+2 |
| X0 | HD+1~, HD+2*, HD+14! |
| X1 | HD+1~, HD+3*, HD+4*, HD+10, HD+14! |
| X2 | HD+1~, HD+5*, HD+6*, HD+7*, HD+11, HD+14! |
| >> XRT0 | BLDDIS+8 |
| >> XRTL | BLDDIS+1 |
| >> XRTN | BLDDIS+8* |
| Name | Field # of Occurrence |
|---|---|
| $T( | BLDDIS+8 |
