PXRMDLR2 ;SLC/AGP - Dialog reporting routine to find active CPRS dialogs ;09/14/2017
Source file <PXRMDLR2.m>
Package | Total | Call Graph |
---|---|---|
Clinical Reminders | 8 | (GETDLIST,GETLVRD,GETTDLST,NEWCVOK)^PXRMCVRL REPORT^PXRMDLR3 BLDCODE^PXRMDTAX FARRAY^PXRMDUTL $$ASKYN^PXRMEUT (FSEL,ISEL)^PXRMFRPT SEND^PXRMMSG ($$BORP,GPRINT)^PXRMUTIL |
VA FileMan | 4 | BROWSE^DDBR ^DIC $$GET1^DIQ ^DIR |
Kernel | 1 | (ENDR,KILL)^%ZISS |
Order Entry Results Reporting | 1 | FINDOPAR^ORQOUTL |
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 |
Package | Total | Caller Graph |
---|---|---|
Clinical Reminders | 2 | PXRM DIALOG SEARCH REPORT PXRMDLR3 |
Kernel | 1 | ^DIC(19 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ASK(YESNO,PROMPT,NUM) | ||
FINDDIAL | ;
|
|
ENF | ;
|
|
END | ;
|
|
ENC | ;
|
|
ENU | ;
|
|
ENR | ;
|
|
PROCESS | ;
|
|
OUTPUT | ;
|
|
ENX | ;
|
|
ADDDREAS(TYPE,IEN,REASON) | ;add reason the dialog/dialog items in on the list
|
|
ADDFREAS(TYPE,GBL,FIND,REASON) | ;add the reason a finding item is on the list. For now only Taxonomies
|
|
BLDLIST | ;build list of dialogs that contains the selected search items
|
|
BLDREAS(DARRAY,GBL,IEN) | ;get finding item type and name
|
|
CPRSCOM(FINAL,DLIST,NAME) | ;
|
|
CPRSTDLG(TEMPDIAL,TLIST) | ;
|
|
CODES | ;
|
|
CPRSLIST | ;
|
|
DIALOG | ;
|
|
FINDING | ;
|
|
FINDORD(GBL,FIEN) | ;
|
|
GETCPRSL(DLIST,USER,LOC) | ;
|
|
GETCPRSC(FINAL) | ;
|
|
GETDIAL(IEN,REASON) | ; recurrsive function that follows up the AD cross-references
|
|
GETITEMS | ;
|
|
GETVALS(GBL,TYPE,INST) | ;
|
|
MERGE(FINAL) | ;
|
|
;
|
||
PROMPTS(ITEM) | ;
|
|
RETTYPE(T) | ;
|
|
SELECT(TYPE,DIC,INST) | ;
|
Name | Field # of Occurrence |
---|---|
ENDR^%ZISS | PRINT+5 |
KILL^%ZISS | PRINT+8 |
BROWSE^DDBR | PRINT+6 |
^DIC | SELECT+5 |
$$GET1^DIQ | MERGE+2, SELECT+13 |
^DIR | ASK+9, CODES+9, CPRSLIST+13 |
FINDOPAR^ORQOUTL | FINDORD+2 |
GETDLIST^PXRMCVRL | GETCPRSL+2 |
GETLVRD^PXRMCVRL | GETCPRSC+6, GETCPRSC+7 |
GETTDLST^PXRMCVRL | PROCESS+8 |
NEWCVOK^PXRMCVRL | ENC+1 |
REPORT^PXRMDLR3 | OUTPUT+2 |
BLDCODE^PXRMDTAX | CODES+2 |
FARRAY^PXRMDUTL | GETITEMS+20 |
$$ASKYN^PXRMEUT | PRINT+11 |
FSEL^PXRMFRPT | FINDING+4 |
ISEL^PXRMFRPT | FINDING+8 |
SEND^PXRMMSG | PRINT+14 |
$$BORP^PXRMUTIL | PRINT+2 |
GPRINT^PXRMUTIL | PRINT+9 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^DIC(4 - [#4] | GET1^DIQ |
^PXRMD(801.41 - [#801.41] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PXD(811.2 - [#811.2] | BLDLIST+5 |
^PXRMD(801.41 - [#801.41] | GETDIAL+3, GETDIAL+8, GETDIAL+10, GETDIAL+14, GETDIAL+15, GETDIAL+19, GETDIAL+20, GETITEMS+28, GETITEMS+37, PROMPTS+2 , PROMPTS+7, PROMPTS+8, PROMPTS+9, PROMPTS+10, PROMPTS+11 |
^TMP("PXRM DIALOG LISTS" | FINDDIAL+3!, PROCESS+3!, PROCESS+5!, ADDDREAS+2, ADDDREAS+3, ADDDREAS+4*, ADDDREAS+5*, ADDFREAS+2, ADDFREAS+3, ADDFREAS+4* , ADDFREAS+5*, BLDLIST+2, BLDLIST+4, BLDLIST+6*, BLDLIST+10, BLDLIST+13, BLDLIST+14, BLDLIST+15, CPRSCOM+3, CPRSCOM+4 , CPRSTDLG+2, CPRSTDLG+3, CODES+16*, CPRSLIST+2!, CPRSLIST+20*, FINDING+12*, FINDING+16*, FINDORD+7*, FINDORD+9*, FINDORD+18* , FINDORD+20*, FINDORD+22*, GETCPRSC+2, GETCPRSC+3, GETCPRSC+4, GETDIAL+6*, GETDIAL+11*, GETDIAL+16*, GETDIAL+21*, GETITEMS+23 , GETITEMS+24, GETITEMS+28*, GETITEMS+37*, MERGE+3, MERGE+4, PROMPTS+10*, SELECT+8*, SELECT+9*, SELECT+10*, SELECT+11* , SELECT+13*, SELECT+16*, SELECT+18* |
^TMP("PXRMXMZ" | FINDDIAL+3! |
^TMP($J | GETITEMS+18!, GETITEMS+19, GETITEMS+20, GETITEMS+21!, GETITEMS+22!, GETITEMS+27, GETITEMS+30, GETITEMS+35, GETITEMS+36, GETITEMS+39 , GETITEMS+42! |
Name | Line Occurrences |
---|---|
$$BLDREAS | FINDORD+4, GETITEMS+29, GETITEMS+38 |
$$RETTYPE | BLDLIST+16 |
ADDDREAS | GETDIAL+6, GETDIAL+11, GETDIAL+16, GETDIAL+21, GETITEMS+32, GETITEMS+41 |
ADDFREAS | BLDLIST+7, FINDORD+19 |
ASK | FINDDIAL+5, ENF+1, END+1, ENC+2, ENR+1, PROMPTS+5 |
BLDLIST | PROCESS+2 |
CODES | FINDDIAL+6 |
CPRSCOM | GETCPRSC+10 |
CPRSLIST | ENU+1 |
CPRSTDLG | PROCESS+10 |
DIALOG | END+2 |
ENC | ENU+1, ENR+1 |
END | ENU+1, ENR+1 |
ENF | END+1, END+2, ENC+2 |
ENR | ENC+1, ENC+3 |
ENX | FINDDIAL+5, ENF+1, END+1, ENC+2, ENU+1, ENR+1, OUTPUT+1 |
FINDDIAL | FINDDIAL+6, ENF+1, ENF+2 |
FINDING | ENF+2 |
GETCPRSC | PROCESS+9 |
GETDIAL | BLDLIST+16, GETDIAL+12, GETDIAL+17, GETDIAL+24 |
GETITEMS | BLDLIST+10 |
GETVALS | CPRSLIST+21, CPRSLIST+22, CPRSLIST+23, CPRSLIST+24, CPRSLIST+25 |
MERGE | PROCESS+5 |
OUTPUT | PROCESS+5 |
OUTPUT+3 | |
PROMPTS | SELECT+17 |
SELECT | DIALOG+5, GETVALS+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALIST | CODES+1~, CODES+4, CPRSLIST+1~, CPRSLIST+10 |
ALIST( | CODES+3*, CODES+15, CODES+16, CPRSLIST+4*, CPRSLIST+5*, CPRSLIST+6*, CPRSLIST+7*, CPRSLIST+8*, CPRSLIST+9* |
ANS | FINDDIAL+2~, FINDDIAL+5, FINDDIAL+6, ENF+1!, ENF+2, END+1!, END+2, ENC+2!, ENC+3, ENR+1! , ENR+2, DIALOG+1~, PRINT+1~, PRINT+11*, PRINT+12, PROMPTS+1~, PROMPTS+5, PROMPTS+6 |
BOP | PRINT+1~, PRINT+2*, PRINT+3, PRINT+9 |
CLASS | GETCPRSC+1~ |
CNT | ADDDREAS+1~, ADDDREAS+3*, ADDDREAS+4*, ADDFREAS+1~, ADDFREAS+3*, ADDFREAS+4*, FINDORD+1~, FINDORD+12*, FINDORD+15, FINDORD+16 , FINDORD+20, GETCPRSL+1~, GETDIAL+2~, SELECT+1~ |
CNT1 | FINDORD+1~, FINDORD+15*, FINDORD+16, FINDORD+20 |
CODE | BLDLIST+1~, BLDLIST+4*, BLDLIST+5, BLDLIST+7, CODES+1~, CODES+3* |
CODESYS | CODES+1~, CODES+2 |
CODESYS( | CODES+3 |
CPRSONLY | FINDDIAL+2~, FINDDIAL+4*, ENC+1*, ENC+3*, PROCESS+5, OUTPUT+2 |
DARRAY | FINDDIAL+2~, BLDREAS~, FINDORD+1~, FINDORD+4, GETITEMS+1~, GETITEMS+29, GETITEMS+38 |
DARRAY( | BLDREAS+2 |
DARRAY("AUTTEDT(" | GETITEMS+3* |
DARRAY("AUTTEXAM(" | GETITEMS+4* |
DARRAY("AUTTHF(" | GETITEMS+5* |
DARRAY("AUTTIMM(" | GETITEMS+6* |
DARRAY("AUTTSK(" | GETITEMS+7* |
DARRAY("GMRD(120.51," | GETITEMS+8* |
DARRAY("ORD(101.41," | FINDORD+3*, GETITEMS+9* |
DARRAY("PXD(811.2," | GETITEMS+13* |
DARRAY("PXD(811.9," | GETITEMS+14* |
DARRAY("PXRMD(811.5," | GETITEMS+15* |
DARRAY("WV(790.1," | GETITEMS+12* |
DARRAY("WV(790.404," | GETITEMS+11* |
DARRAY("YTT(601.71," | GETITEMS+10* |
DIALOGS | GETCPRSC+1~, GETCPRSC+5!, GETCPRSC+6, GETCPRSC+7, GETCPRSC+10 |
DIC | DIALOG+1~, DIALOG+2*, DIALOG+5, GETVALS+1~, GETVALS+2*, GETVALS+5, SELECT~ |
DIC("A" | DIALOG+4*, GETVALS+4* |
DIC(0 | DIALOG+3*, GETVALS+3* |
DIEN | CPRSCOM+1~, CPRSCOM+3*, CPRSCOM+4, CPRSCOM+5, CPRSTDLG+1~, CPRSTDLG+2*, CPRSTDLG+3, CPRSTDLG+4, GETDIAL+2~, GETDIAL+8* , GETDIAL+10, GETDIAL+11, GETDIAL+12, GETDIAL+14*, GETDIAL+15, GETDIAL+16, GETDIAL+17, GETDIAL+19*, GETDIAL+20, GETDIAL+21 , GETDIAL+24, MERGE+1~, MERGE+3*, MERGE+4, MERGE+5 |
DIR | ASK+9!, CODES+1~, CPRSLIST+1~ |
DIR("?" | ASK+6* |
DIR("??" | ASK+7*, CODES+7* |
DIR("A" | ASK+4*, CODES+4*, CODES+5*, CPRSLIST+10*, CPRSLIST+11* |
DIR("B" | ASK+5* |
DIR(0 | ASK+3*, CODES+6*, CPRSLIST+12* |
DIROUT | ASK+2!, ASK+10, FINDDIAL+1~, CODES+1~, CODES+10, CPRSLIST+14 |
DIRUT | ASK+2!, FINDDIAL+1~, CODES+1~, CODES+10 |
DLIST | FINDDIAL+2~, CPRSCOM~, GETCPRSL~, GETCPRSL+2 |
DLIST("REMINDER" | CPRSCOM+5 |
DTOUT | ASK+2!, ASK+10*, ASK+11, FINDDIAL+1~, FINDDIAL+5, FINDDIAL+6, ENF+1, ENF+2, END+1, END+2 , ENC+2, ENU+1, ENR+1, CODES+10*, CODES+11, CPRSLIST+14*, CPRSLIST+15, CPRSLIST+16, CPRSLIST+17, PROMPTS+5 , SELECT+6 |
DUOUT | ASK+2!, ASK+11, FINDDIAL+1~, FINDDIAL+5, FINDDIAL+6, ENF+1, ENF+2, END+1, END+2, ENC+2 , ENU+1, ENR+1, CODES+11, CPRSLIST+15, CPRSLIST+16, CPRSLIST+17, PROMPTS+5, SELECT+6 |
DUZ | ENC+1, MERGE+2, PRINT+13, PRINT+14 |
EXT | PROMPTS+1~, PROMPTS+4*, PROMPTS+5 |
FIEN | BLDLIST+1~, FINDING+14*, FINDING+15*, FINDING+16, FINDORD~, FINDORD+2, FINDORD+4, FINDORD+9, GETITEMS+1~, GETITEMS+35* , GETITEMS+36, GETITEMS+38, GETITEMS+39, GETITEMS+41 |
FINAL | FINDDIAL+2~, PROCESS+5, PROCESS+9, OUTPUT+1, OUTPUT+2, CPRSCOM~, GETCPRSC~, GETCPRSC+10, MERGE~ |
FINAL( | CPRSCOM+2*, CPRSCOM+5*, MERGE+5* |
FIND | ADDFREAS~, ADDFREAS+2, ADDFREAS+3, ADDFREAS+4, ADDFREAS+5, BLDLIST+1~, GETITEMS+1~, GETITEMS+24*, GETITEMS+26, GETITEMS+27 , GETITEMS+29, GETITEMS+30, GETITEMS+32, GETITEMS+34 |
FNUM | FINDING+1~, FINDING+4, FINDING+8 |
FNUM( | FINDING+12, FINDING+13, FINDING+15 |
GBL | ADDFREAS~, ADDFREAS+2, ADDFREAS+3, ADDFREAS+4, ADDFREAS+5, BLDLIST+1~, BLDREAS~, BLDREAS+2, BLDREAS+3, FINDING+1~ , FINDING+4, FINDING+8, FINDORD~, FINDORD+4, GETITEMS+1~, GETITEMS+23*, GETITEMS+24, GETITEMS+27, GETITEMS+29, GETITEMS+30 , GETITEMS+32, GETITEMS+35, GETITEMS+36, GETITEMS+38, GETITEMS+39, GETITEMS+41, GETVALS~, GETVALS+2 |
GBL( | FINDING+12, FINDING+16, FINDING+17 |
GNAME | FINDING+1~, FINDING+4, FINDING+8 |
GUIID | PROMPTS+1~, PROMPTS+7*, PROMPTS+9 |
IEN | ADDDREAS~, ADDDREAS+2, ADDDREAS+3, ADDDREAS+4, ADDDREAS+5, BLDLIST+1~, BLDLIST+5*, BLDLIST+6, BLDLIST+7, BLDLIST+14* , BLDLIST+15, BLDLIST+16, BLDREAS~, BLDREAS+3, FINDORD+1~, FINDORD+5*, FINDORD+6, FINDORD+7, FINDORD+9, GETDIAL~ , GETDIAL+3, GETDIAL+6, GETDIAL+8, GETDIAL+14, GETDIAL+19, GETITEMS+1~, GETITEMS+27*, GETITEMS+28, GETITEMS+30, GETITEMS+32 , GETITEMS+36*, GETITEMS+37, GETITEMS+39, GETITEMS+41, PROMPTS+1~, PROMPTS+2*, PROMPTS+7 |
IND | CODES+13*, CODES+14, FINDING+1~, FINDING+10*, FINDING+11 |
INST | GETVALS~, GETVALS+5, SELECT~, SELECT+8, SELECT+9, SELECT+10, SELECT+13 |
INUM | CODES+1~, CODES+3*, CODES+6 |
>> IORESET | PRINT+7 |
ITEM | BLDLIST+1~, PROMPTS~, PROMPTS+2 |
ITEMLIST | FINDING+1~, FINDING+8, FINDING+9 |
ITEMLIST( | FINDING+12, FINDING+13, FINDING+15 |
LCNT | FINDORD+1~, FINDORD+12* |
LI | CODES+1~, CODES+14*, CODES+15, CODES+16, FINDING+1~, FINDING+11*, FINDING+12, FINDING+13, FINDING+15, FINDING+16 , FINDING+17 |
LIEN | FINDORD+1~, FINDORD+15* |
LIST | CPRSLIST+1~, FINDING+1~, FINDING+4, FINDING+5, FINDING+8, FINDING+11 |
LIST( | CPRSLIST+4*, CPRSLIST+5*, CPRSLIST+6*, CPRSLIST+7*, CPRSLIST+8*, CPRSLIST+9*, CPRSLIST+19 |
LOC | GETCPRSL~, GETCPRSL+2, GETITEMS+1~, GETITEMS+30*, GETITEMS+31, GETITEMS+39*, GETITEMS+40 |
LVL | GETCPRSC+1~, GETCPRSC+4*, GETCPRSC+6, GETCPRSC+7 |
NAME | FINDDIAL+2~, BLDREAS+1~, BLDREAS+3*, BLDREAS+4, CPRSCOM~, CPRSCOM+2, CPRSCOM+5, GETCPRSC+1~, GETCPRSC+3*, GETCPRSC+4 , GETCPRSC+9, GETDIAL+2~, GETDIAL+4*, GETDIAL+23, MERGE+1~, MERGE+2*, MERGE+5, PROMPTS+1~, PROMPTS+2*, PROMPTS+5 , SELECT+1~, SELECT+13* |
NEWP | FINDDIAL+2~, ENC+1, ENU+1, ENR+1 |
NODE | BLDLIST+15*, BLDLIST+16, CPRSCOM+1~, CPRSCOM+4*, CPRSCOM+5, CPRSTDLG+1~, CPRSTDLG+3*, CPRSTDLG+4, FINDING+1~, FINDORD+1~ , FINDORD+6*, FINDORD+9, FINDORD+16*, FINDORD+18, FINDORD+19, FINDORD+20, GETDIAL+2~, GETDIAL+3*, GETDIAL+4, GETDIAL+6 , GETDIAL+7, GETDIAL+10*, GETDIAL+11, GETDIAL+15*, GETDIAL+16, GETDIAL+20*, GETDIAL+21, GETITEMS+1~, GETITEMS+28*, GETITEMS+37* , MERGE+1~, MERGE+4*, MERGE+5 |
NUM | ASK~, ASK+7, CODES+1~, CODES+12*, CODES+13, CPRSLIST+1~, CPRSLIST+3*, CPRSLIST+4*, CPRSLIST+5*, CPRSLIST+6* , CPRSLIST+7*, CPRSLIST+8*, CPRSLIST+9*, CPRSLIST+12, CPRSLIST+18*, CPRSLIST+19, FINDING+1~, FINDING+5*, FINDING+6, FINDING+10 , GETVALS+1~, PROMPTS+1~, PROMPTS+8*, PROMPTS+9, PROMPTS+10, PROMPTS+11 |
OIEN | GETDIAL+2~, GETDIAL+14* |
PARAMS | FINDDIAL+2~ |
PATH | BLDLIST+1~ |
PROMPT | ASK~, ASK+4 |
PXRMCNT | FINDING+1~ |
>> PXRMDAPI | GETITEMS+21 |
>> PXRMDMUL | GETITEMS+19, GETITEMS+42 |
>> PXRMFAIL | GETITEMS+21* |
PXRMORD | FINDORD+1~, FINDORD+2, FINDORD+22 |
PXRMORD( | FINDORD+5, FINDORD+6, FINDORD+12, FINDORD+15, FINDORD+16 |
REASON | ADDDREAS~, ADDDREAS+2, ADDDREAS+4, ADDDREAS+5, ADDFREAS~, ADDFREAS+2, ADDFREAS+4, ADDFREAS+5, BLDLIST+1~, BLDLIST+16* , FINDORD+4*, FINDORD+19, GETDIAL~, GETDIAL+6, GETDIAL+11, GETDIAL+12, GETDIAL+16, GETDIAL+17, GETDIAL+21, GETDIAL+23* , GETDIAL+24, GETITEMS+1~, GETITEMS+29*, GETITEMS+32, GETITEMS+38*, GETITEMS+41 |
RESULT | BLDREAS+1~, BLDREAS+2*, BLDREAS+3, BLDREAS+4, RETTYPE+1~, RETTYPE+2*, RETTYPE+3 |
SEL | SELECT+1~, SELECT+2*, SELECT+4, SELECT+6*, SELECT+7* |
SHOWPATH | BLDLIST+1~, BLDLIST+2* |
SHOWREAS | FINDDIAL+2~, FINDDIAL+4*, ENR+2*, OUTPUT+2 |
SOURCE | FINDING+1~, FINDING+4 |
SOURCE("DIALOG" | FINDING+2* |
SUB | GETITEMS+1~, GETITEMS+17*, GETITEMS+18, GETITEMS+19, GETITEMS+20, GETITEMS+21, GETITEMS+22, GETITEMS+27, GETITEMS+30, GETITEMS+35 , GETITEMS+36, GETITEMS+39, GETITEMS+42 |
T | RETTYPE~, RETTYPE+2 |
TEMP | GETCPRSC+1~, GETCPRSC+8*, GETCPRSC+9*, GETCPRSC+10 |
TEMPDIAL | FINDDIAL+2~, PROCESS+10, OUTPUT+1, OUTPUT+2, CPRSTDLG~ |
TEMPDIAL( | CPRSTDLG+4* |
TEXT | ASK+1~ |
TLIST | FINDDIAL+2~, PROCESS+8, PROCESS+10, CPRSTDLG~ |
TLIST("TEMPLATE" | CPRSTDLG+4 |
TO | PRINT+1~, PRINT+14 |
TO( | PRINT+13* |
TYPE | ADDDREAS~, ADDDREAS+2, ADDDREAS+3, ADDDREAS+4, ADDDREAS+5, ADDFREAS~, ADDFREAS+2, ADDFREAS+3, ADDFREAS+4, ADDFREAS+5 , CPRSLIST+1~, CPRSLIST+19*, CPRSLIST+20, CPRSLIST+21, CPRSLIST+22, CPRSLIST+23, CPRSLIST+24, CPRSLIST+25, GETCPRSC+1~, GETCPRSC+2* , GETCPRSC+3, GETCPRSC+4, GETCPRSC+6, GETCPRSC+7, GETCPRSC+8, GETCPRSC+9, GETITEMS+1~, GETITEMS+31*, GETITEMS+32, GETITEMS+40* , GETITEMS+41, GETVALS~, GETVALS+4, GETVALS+5, PROMPTS+1~, PROMPTS+2*, PROMPTS+3, PROMPTS+4, SELECT~, SELECT+8 , SELECT+9, SELECT+10, SELECT+11, SELECT+12, SELECT+13, SELECT+16, SELECT+17, SELECT+18 |
U | ASK+7, BLDLIST+16, BLDREAS+3, CPRSCOM+4, CPRSCOM+5, CPRSTDLG+3, CPRSTDLG+4, CODES+7, FINDORD+16, FINDORD+18 , FINDORD+19, FINDORD+20, GETDIAL+4, GETDIAL+6, GETDIAL+7, GETDIAL+11, GETDIAL+16, GETDIAL+21, GETDIAL+23, GETITEMS+32 , GETITEMS+41, MERGE+5, PROMPTS+2, PROMPTS+10, PROMPTS+11, SELECT+8, SELECT+9, SELECT+10, SELECT+11, SELECT+16 , SELECT+18 |
USER | FINDDIAL+2~, GETCPRSL~, GETCPRSL+2 |
X | ASK+1~, CPRSLIST+1~, CPRSLIST+16*, CPRSLIST+18, GETVALS+1~, PRINT+1~, PRINT+4* |
Y | ASK+1~, CODES+1~, CODES+12, CODES+14, CPRSLIST+16, CPRSLIST+18, PROMPTS+2, SELECT+1~, SELECT+7, SELECT+8 , SELECT+9, SELECT+10, SELECT+11, SELECT+13, SELECT+16, SELECT+17, SELECT+18 |
Y(0 | ASK+12 |
YESNO | ASK~, ASK+12* |