PXRMXQUE ;SLC/PJH - Reminder reports general queuing routine. ;23-Mar-2015 10:41;DU
Source file <PXRMXQUE.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| QUE(ZTDESC,ZTRTN,ZTDTH,SAVERTN) | ;Queue a task. | |
| JOB | ;Get the output device. | |
| SAVE | ;Save the variables for queing. | |
| DEVICE(RTN,DESC,SAVE,%ZIS,RETZTSK) | ; | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^TMP("XM-MESS" | SAVE+69 | 
| Name | Line Occurrences | 
|---|---|
| @( | QUE+5 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %ZIS | DEVICE~, DEVICE+4, JOB+1~, JOB+2* | 
| DESC | DEVICE~, DEVICE+4, DEVICE+5, JOB+12~, JOB+13*, JOB+15, QUE+7 | 
| IO | JOB+6 | 
| IO("DOC" | JOB+8 | 
| IO("Q" | JOB+7 | 
| IOM | JOB+8 | 
| ION | JOB+8 | 
| IOSL | JOB+8 | 
| IOST | JOB+8 | 
| >> IOT | JOB+6 | 
| POP | JOB+1~, JOB+5 | 
| >> PXRMHFIO | JOB+6* | 
| >> PXRMIDOD | SAVE+64 | 
| >> PXRMIOP | JOB+8* | 
| >> PXRMQUE | JOB+7*, JOB+10, JOB+18 | 
| RETZTSK | DEVICE~, DEVICE+4 | 
| ROUTINE | JOB+12~, JOB+14*, JOB+15 | 
| RTN | DEVICE~, DEVICE+4 | 
| SAVE | DEVICE~, DEVICE+4 | 
| SAVERTN | QUE~, QUE+5 | 
| TASK | JOB+12~, JOB+15*, JOB+16, JOB+17 | 
| ZTDESC | QUE~ | 
| ZTDTH | QUE~ | 
| >> ZTIO | QUE+4* | 
| ZTRTN | QUE~ | 
| >> ZTSAVE("DBDUZ" | SAVE+55* | 
| >> ZTSAVE("DBERR" | SAVE+56* | 
| >> ZTSAVE("NCAT" | SAVE+40* | 
| >> ZTSAVE("NCGRP" | SAVE+3* | 
| >> ZTSAVE("NCS" | SAVE+2* | 
| >> ZTSAVE("NFAC" | SAVE+4* | 
| >> ZTSAVE("NHL" | SAVE+13* | 
| >> ZTSAVE("NOTM" | SAVE+35* | 
| >> ZTSAVE("NPAT" | SAVE+37* | 
| >> ZTSAVE("NPCM" | SAVE+38* | 
| >> ZTSAVE("NPRV" | SAVE+36* | 
| >> ZTSAVE("NREM" | SAVE+39* | 
| >> ZTSAVE("PATCREAT" | SAVE+49* | 
| >> ZTSAVE("PATLST" | SAVE+50* | 
| >> ZTSAVE("PLISTPUG" | SAVE+53* | 
| >> ZTSAVE("PXRMBDT" | SAVE+1* | 
| >> ZTSAVE("PXRMCCS" | SAVE+67* | 
| >> ZTSAVE("PXRMCGRN(" | SAVE+47* | 
| >> ZTSAVE("PXRMCGRP(" | SAVE+3* | 
| >> ZTSAVE("PXRMCS(" | SAVE+2* | 
| >> ZTSAVE("PXRMCSN(" | SAVE+46* | 
| >> ZTSAVE("PXRMDBUG" | SAVE+59* | 
| >> ZTSAVE("PXRMDBUS" | SAVE+60* | 
| >> ZTSAVE("PXRMDLOC" | SAVE+7* | 
| >> ZTSAVE("PXRMDPAT" | SAVE+63* | 
| >> ZTSAVE("PXRMEDT" | SAVE+1* | 
| >> ZTSAVE("PXRMFAC(" | SAVE+4* | 
| >> ZTSAVE("PXRMFACN(" | SAVE+5* | 
| >> ZTSAVE("PXRMFCMB" | SAVE+6* | 
| >> ZTSAVE("PXRMFD" | SAVE+8* | 
| >> ZTSAVE("PXRMFUT" | SAVE+7* | 
| >> ZTSAVE("PXRMHFIO" | SAVE+9* | 
| >> ZTSAVE("PXRMHRCN" | SAVE+25* | 
| >> ZTSAVE("PXRMIDOD" | SAVE+64* | 
| >> ZTSAVE("PXRMINP" | SAVE+10* | 
| >> ZTSAVE("PXRMIO" | SAVE+11* | 
| >> ZTSAVE("PXRMIOP" | SAVE+12* | 
| >> ZTSAVE("PXRMLCHL(" | SAVE+13* | 
| >> ZTSAVE("PXRMLCMB" | SAVE+14* | 
| >> ZTSAVE("PXRMLCSC" | SAVE+15* | 
| >> ZTSAVE("PXRMLIS1" | SAVE+52* | 
| >> ZTSAVE("PXRMLIST(" | SAVE+51* | 
| >> ZTSAVE("PXRMLOCN(" | SAVE+45* | 
| >> ZTSAVE("PXRMOTM(" | SAVE+35* | 
| >> ZTSAVE("PXRMPAT(" | SAVE+37* | 
| >> ZTSAVE("PXRMPCM(" | SAVE+38* | 
| >> ZTSAVE("PXRMPER" | SAVE+66* | 
| >> ZTSAVE("PXRMPML" | SAVE+65* | 
| >> ZTSAVE("PXRMPRIM" | SAVE+16* | 
| >> ZTSAVE("PXRMPRV(" | SAVE+36* | 
| >> ZTSAVE("PXRMQUE" | SAVE+17* | 
| >> ZTSAVE("PXRMRCAT(" | SAVE+40* | 
| >> ZTSAVE("PXRMREM(" | SAVE+39* | 
| >> ZTSAVE("PXRMREP" | SAVE+18* | 
| >> ZTSAVE("PXRMRERR(" | SAVE+57* | 
| >> ZTSAVE("PXRMRT" | SAVE+19* | 
| >> ZTSAVE("PXRMSCAT" | SAVE+20* | 
| >> ZTSAVE("PXRMSCAT(" | SAVE+20* | 
| >> ZTSAVE("PXRMSDT" | SAVE+1* | 
| >> ZTSAVE("PXRMSEL" | SAVE+21* | 
| >> ZTSAVE("PXRMSRT" | SAVE+22* | 
| >> ZTSAVE("PXRMSSN" | SAVE+23* | 
| >> ZTSAVE("PXRMTABC" | SAVE+26* | 
| >> ZTSAVE("PXRMTABS" | SAVE+27* | 
| >> ZTSAVE("PXRMTCMB" | SAVE+28* | 
| >> ZTSAVE("PXRMTMP" | SAVE+29* | 
| >> ZTSAVE("PXRMTOT" | SAVE+30* | 
| >> ZTSAVE("PXRMTPAT" | SAVE+62* | 
| >> ZTSAVE("PXRMUSER" | SAVE+41* | 
| >> ZTSAVE("PXRMXCCS" | SAVE+68* | 
| >> ZTSAVE("PXRMXST" | SAVE+33* | 
| >> ZTSAVE("PXRMXTMP" | SAVE+31* | 
| >> ZTSAVE("REMINDER(" | SAVE+43* | 
| >> ZTSAVE("^TMP(""XM-MESS"",$J," | SAVE+69* | 
| ZTSK | DEVICE+2~, DEVICE+5, DEVICE+6, QUE+1~, QUE+7, QUE+8 |