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! |