XQ81 ;SEA/AMF/LUKE,SF/RWF,ISD/HGW - Build menu trees ;03/19/13 09:21
Source file <XQ81.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MERGEX | ;Merge ^DIC(19,"AXQ") into ^XUTL("XQO")
|
|
KIDS | ;Entry from KIDS
|
|
VER | ||
ERR | ;Come here on error
|
|
RD3 | ;Update counter an rebuild it if necessary
|
|
RD2 | ||
MICRO | ;Turn off micro surgery
|
|
BLDEND1 | ;Quit and clean
|
|
MERGET | ;Merge ^TMP("XQO",$J) into ^DIC(19,"AXQ")
|
|
BLDEND | ;File a report, cleanup, and quit.
|
|
SET1 | ||
SET | ||
SEC | ||
BUILD | ;
|
|
CLEAN | ;Clean out unused menu trees from ^DIC(19,"AXQ")
|
|
QUE | ;Entry point for the option XQBUILDTREEQUE, and XQBUILDALL
|
|
STATUS() | ||
DQ | ;Entry from taskman Write if $D(XQFG)
|
Name | Field # of Occurrence |
---|---|
YMD^%DTC | VER+11 |
%XY^%RCR | MERGET+9, MERGEX+8 |
$$EC^%ZOSV | ERR+2 |
^%ZTER | ERR+3 |
$$NEWERR^%ZTER | KIDS+8 |
UNWIND^%ZTER | ERR+5 |
^%ZTLOAD | RD2+14 |
^DIR | RD2+7, RD2+8, RD2+10, RD2+21, RD3+9 |
$$HTE^XLFDT | RD2+5, KIDS+20, DQ+2, QUE+3, BLDEND+28 |
EXIT^XPDID | BLDEND+34, ERR+4 |
INIT^XPDID | KIDS+12 |
TITLE^XPDID | KIDS+15 |
UPDATE^XPDID | KIDS+17, RD3+5, BLDEND+26, BLDEND+27 |
CHK^XQ8 | RD3+8 |
PM2^XQ8 | RD3+10 |
REPORT^XQ84 | BLDEND+21 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TRAP" | KIDS+9 |
^DIC(19 - [#19] | RD2+18!, RD2+19*, KIDS+1, KIDS+2, KIDS+3*, DQ+6*, DQ+7*, DQ+24, VER+11, SET+3 , SET1, BLDEND+14!, BLDEND+16!, BLDEND+17!, BLDEND+18, MERGET+4, MERGET+7!, MERGET+10, MERGET+17, CLEAN+2 , CLEAN+5!, MERGEX+2, MERGEX+16, STATUS+2, STATUS+3, STATUS+4, MICRO+1, MICRO+2*, MICRO+3! |
^TMP("XQO" | DQ+10, DQ+11, DQ+12, DQ+14!, DQ+27, SEC, SEC+1, BLDEND+10!, MERGET+3 |
^TMP($J | DQ+17!, DQ+19, DQ+20, DQ+24, DQ+26, VER+2, VER+8, SET+2, SET+3*, SET1* , BLDEND+10!, CLEAN+5 |
^VA(200 - [#200] | DQ+17, SET, SET+1, SET1 |
^XUTL("XQO" | BLDEND+13!, BLDEND+15*, CLEAN+5!, MERGEX+3, MERGEX+6!, MERGEX+9 |
Name | Line Occurrences |
---|---|
$$STATUS | RD2, KIDS+1 |
BLDEND | RD2+18, DQ+28 |
BLDEND1 | RD2+7, RD2+8, RD2+10, RD2+21 |
CLEAN | BLDEND+7 |
DQ | QUE+4 |
MERGET | BLDEND+6 |
MERGEX | BLDEND+8 |
MICRO | RD2+3, KIDS+2 |
RD2 | RD2+21 |
RD3 | SEC, SEC+2 |
SEC | DQ+26 |
SET | DQ+17 |
SET1 | SET |
VER | DQ+24 |
Name | Field # of Occurrence |
---|---|
^( | DQ+27*, SET1 |
^("P0" | STATUS+4! |
^(0 | DQ+10*, DQ+11*, DQ+12, VER+11, SET+3, SET1 |
^(1.1 | SET+1 |
^(201 | SET |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | DQ+19*, DQ+20*, RD3+2~, RD3+4*, RD3+5, BLDEND+2!, BLDEND+20*, BLDEND+21, BLDEND+26*, BLDEND+39! , MERGET+15~, MERGET+17*, MERGET+18, MERGEX+14~, MERGEX+16*, MERGEX+17, STATUS+1~, STATUS+2*, BLDEND1+1! |
%H | VER+11*, BLDEND+2!, BLDEND1+1! |
%TG | BLDEND+2!, BLDEND1+1! |
%X | MERGET+5*, MERGET+11!, MERGEX+4*, MERGEX+10! |
%Y | MERGET+6*, MERGET+11!, MERGEX+5*, MERGEX+10! |
C | BLDEND+2!, BLDEND1+1! |
D | BLDEND+2!, BLDEND1+1! |
DIC | BLDEND+2!, BLDEND1+1! |
>> DILOCKTM | RD2+19, KIDS+3 |
DIR | RD2+7!, RD2+10!, RD2+21!, BLDEND+2!, BLDEND1+1! |
DIR("??" | RD2+7*, RD2+8* |
DIR("A" | RD2+7*, RD2+8*, RD2+10*, RD2+21*, RD3+9* |
DIR("B" | RD2+7*, RD2+8*, RD2+10*, RD2+21*, RD3+9* |
DIR(0 | RD2+7*, RD2+8*, RD2+10*, RD2+21*, RD3+9* |
>> DIRUT | RD2+7, RD2+8, RD2+10, RD2+21, RD3+9 |
I | BLDEND+2!, BLDEND1+1! |
J | BLDEND+2!, BLDEND1+1! |
K | BLDEND+2!, BLDEND1+1! |
L | BLDEND+2!, BLDEND1+1! |
Q | MERGET+1~*, MERGET+5, MERGET+6, MERGEX+1~*, MERGEX+4, MERGEX+5 |
U | DQ+10, DQ+11, DQ+17, DQ+24, VER+2, VER+4, VER+5, VER+6, SET+1, SET+2 , SET+3, SET1 |
UU | BLDEND+2!, BLDEND1+1! |
V | BLDEND+2!, BLDEND1+1! |
VALMCOFF | BLDEND+39! |
VALMCON | BLDEND+39! |
VALMIOXY | BLDEND+39! |
VALMSGR | BLDEND+39! |
VALMWD | BLDEND+39! |
X | KIDS+9*, KIDS+15*, DQ+24*, DQ+26*, VER+11, BLDEND+2!, MERGET+1~*, MERGET+3*, MERGET+4, MERGET+5 , MERGET+6, MERGET+7, MERGET+10, MERGET+16, CLEAN+1~*, CLEAN+2*, CLEAN+3, CLEAN+4, CLEAN+5, MERGEX+1~* , MERGEX+2*, MERGEX+3, MERGEX+4, MERGEX+5, MERGEX+6, MERGEX+9, MERGEX+15, BLDEND1+1! |
XPDIDTOT | KIDS+14, KIDS+16*, RD3+4, BLDEND+26, BLDEND+27, BLDEND+35!, BLDEND+38* |
XPDIDVT | KIDS+13, RD3+1, BLDEND+24, BLDEND+26, BLDEND+27, BLDEND+35! |
>> XPDNM | KIDS+12, BLDEND+20, BLDEND+33 |
XQ81T | DQ+9*, DQ+12*, DQ+13*, VER+11*, BLDEND+2!, BLDEND1+1! |
XQ8FLG | DQ+3~, DQ+4* |
XQALLDON | RD2+18*, BLDEND+4! |
XQBLD | DQ+24*, DQ+26*, DQ+27*, SEC, SEC+1, VER+2, VER+8, VER+11, RD3+8, BLDEND+2! , BLDEND1+1! |
XQBSEC | RD2+8*, KIDS+4*, DQ+25, DQ+26, SET1, QUE+2*, BLDEND+2!, BLDEND1+1! |
XQDATE | BLDEND+2!, BLDEND1+1! |
>> XQDIC | RD3+8* |
XQERROR | ERR+1~, ERR+2* |
XQFG | RD2+6!, KIDS+4*, KIDS+22*, DQ+22, DQ+23, DQ+25, VER, VER+11, RD3+1, RD3+8 , QUE+2!, BLDEND+24!, BLDEND+26, BLDEND+27, BLDEND+28, BLDEND+39!, MERGET+2, MERGET+14, MERGEX+13, MERGEX+21 |
>> XQFG1 | RD3+10* |
XQFLAG | MERGET+1~*, MERGET+4*, MERGET+14, MERGEX+1~*, MERGEX+3*, MERGEX+13, MERGEX+21 |
XQH | DQ+17*, DQ+27, BLDEND+2!, BLDEND1+1! |
XQI | DQ+10*, DQ+11*, DQ+12*, DQ+14*, DQ+17*, SET, SET+1, SET1, BLDEND+2!, BLDEND1+1! |
XQII | BLDEND+2!, BLDEND1+1! |
XQJ | DQ+24*, VER+4, VER+5, VER+6, BLDEND+2!, BLDEND1+1! |
XQK | DQ+10*, DQ+11*, DQ+12*, DQ+14*, DQ+17*, DQ+27*, VER+2*, VER+3*, VER+8, VER+11* , SET*, SET+2, SET+3, BLDEND+2!, BLDEND1+1! |
XQL | SEC*, SEC+1*, SEC+2, SET1*, BLDEND+2!, BLDEND1+1! |
XQMT | VER+1~, VER+5*, VER+8 |
XQN | SEC+1*, SET1*, BLDEND+2!, BLDEND1+1! |
XQNDONE | KIDS+5~*, RD3+3*, RD3+4, BLDEND+26, BLDEND+39! |
XQNOW | DQ+3~, DQ+5*, DQ+6, DQ+7 |
XQNTREE | KIDS+5~*, DQ+19*, DQ+20*, RD3+4, BLDEND+26, BLDEND+39! |
XQOPNM | VER+1~, VER+4*, VER+7 |
XQP | SET+1*, SET+2*, SET+3, BLDEND+2!, BLDEND1+1! |
XQPX | BLDEND+2!, BLDEND1+1! |
XQR | SET+1*, SET+2, BLDEND+2!, BLDEND1+1! |
XQRE | RD3+8, BLDEND+2!, BLDEND1+1! |
XQSAV | BLDEND+2!, BLDEND1+1! |
XQSAVTOT | KIDS+14*, BLDEND+38, BLDEND+39! |
XQSEC | DQ+9*, DQ+25*, RD3+9, BLDEND+2!, BLDEND1+1! |
XQSTART | RD2+5*, KIDS+20*, KIDS+21, DQ+2*, QUE+3*, BLDEND+22! |
XQSTAT | RD2~*, RD2+1, KIDS+1*! |
XQTASK | DQ+3~ |
XQTHEN | STATUS+1~ |
XQVE | RD2+7*, RD2+10, RD2+15, RD2+21, KIDS+4*, DQ+9, DQ+27, RD3+9, QUE+2*, BLDEND+2! , BLDEND1+1! |
XQXUF | BLDEND+2!, BLDEND1+1! |
Y | RD2+7, RD2+8, RD2+10, RD2+21, RD3+9, BLDEND+2!, MERGET+1~, MERGET+15~, MERGET+16*, MERGET+17 , MERGET+18*, MERGET+19, CLEAN+1~, CLEAN+4*, CLEAN+5, MERGEX+1~, MERGEX+14~, MERGEX+15*, MERGEX+16, MERGEX+17* , MERGEX+18, BLDEND1+1! |
Z | BLDEND+2!, BLDEND1+1! |
>> ZTDESC | RD2+13* |
>> ZTIO | RD2+11* |
>> ZTQUEUED | RD3+11 |
ZTREQ | DQ+1!, RD3+11* |
>> ZTRTN | RD2+11* |
>> ZTSAVE("XQBSEC" | RD2+12* |
>> ZTSAVE("XQSTART" | RD2+12* |
>> ZTSAVE("XQVE" | RD2+12* |
ZTSK | RD2+2!, RD2+15, RD2+18, BLDEND+20, BLDEND+22! |