PSDRLOG1 ;BIR/JPW-CS Inspector's Log By Date (cont'd) ; 24 Aug 94
Source file <PSDRLOG1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SET | ;sets ^tmp
|
|
| END | ||
| START | ;compile data
|
|
| PRTQUE | ;queues print after compile
|
|
| LOOP1 | ;sets inv typ ^tmp
|
|
| LOOP0 | ;sets sort for inventory type sort
|
|
| LOOP | ;starts drug loop
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | LOOP+11, LOOP+12 |
| ^PSD(58.8 - [#58.8] | START+2, START+3, LOOP+6, LOOP+7, LOOP0+1, LOOP0+3 |
| ^PSD(58.81 - [#58.81] | START+4, START+5, START+6, START+7, LOOP+1, LOOP+3 |
| ^PSDRUG - [#50] | LOOP+9 |
| ^PSI(58.16 - [#58.16] | LOOP0+3 |
| ^PSI(58.2 - [#58.2] | START+2 |
| ^TMP("PSDLOG" | LOOP1+4* |
| ^TMP("PSDRLOG" | START+1!, PRTQUE+3!, END+3!, SET+1*, SET+2*, LOOP1+4*, LOOP1+5*, LOOP1+6*, LOOP1+7*, LOOP1+10* , LOOP1+11*, LOOP1+12* |
| Name | Line Occurrences |
|---|---|
| LOOP | START+4, START+6, START+7 |
| LOOP0 | LOOP+14 |
| LOOP1 | LOOP0+1, LOOP0+3 |
| PRTQUE | START+8 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | START+2, START+3, LOOP+6, LOOP+7, LOOP+9, LOOP0+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | END! |
| %H | END! |
| %I | END! |
| %ZIS | END! |
| ALL | START+3, END! |
| ASK | END!, SET+1, SET+2, LOOP1+3, LOOP1+9 |
| ASKN | START+9, PRTQUE+1, END!, LOOP+14 |
| CNT | START+2*, END! |
| DA | END! |
| DIC | END! |
| DIE | END! |
| DIR | END! |
| DIROUT | END! |
| DIRUT | END! |
| DR | END! |
| DTOUT | END! |
| DUOUT | END! |
| EXP | END!, LOOP+11* |
| EXPD | END!, LOOP+11*, SET+1, SET+2, LOOP1+6, LOOP1+12 |
| FLAG | START+1*, START+6*, START+7*, END!, LOOP+4*, LOOP+5, LOOP+6, LOOP+8, LOOP+10, LOOP+13* |
| JJ | START+5*, START+6, END! |
| KK | START+6*, END! |
| LNUM | END! |
| NAOU | END! |
| NAOU( | START+2*, START+3*, START+4, LOOP+5 |
| NODE | END!, LOOP+1*, LOOP+2, LOOP+5, LOOP+11 |
| NODE1 | END!, LOOP+3*, LOOP+10 |
| NODE3 | END!, LOOP+3*, LOOP+10 |
| NODE7 | END!, LOOP+3*, LOOP+6, LOOP+10 |
| NUM | END!, LOOP+11*, SET+1, SET+2, LOOP1+6, LOOP1+12 |
| OK | END+1! |
| PSD | START+2*, START+3*, START+4*, END+1!, LOOP+5*, LOOP+7, LOOP0+1, LOOP0+3, LOOP1+4, LOOP1+5 , LOOP1+6, LOOP1+7, LOOP1+10, LOOP1+11, LOOP1+12 |
| PSDA | START+4*, START+6*, START+7*, END+1!, LOOP+1, LOOP+3 |
| PSDATE | END+1! |
| PSDCNT | START+1*, END+1!, LOOP+13*, SET+1, SET+2, LOOP1+6, LOOP1+12 |
| PSDDT | END+1!, LOOP+12*, SET+1, SET+2, LOOP1+6, LOOP1+12 |
| PSDG | START+2, END+1! |
| PSDG( | START+2 |
| PSDIO | PRTQUE+1, END+1! |
| PSDN | START+2*, START+4*, START+5*, START+6, START+7*, END+1!, LOOP+12 |
| PSDNA | END+1!, LOOP+7*, SET+1, SET+2, LOOP1+4, LOOP1+10 |
| PSDOK | END+1!, LOOP+8*, SET+1, SET+2, LOOP1+6, LOOP1+12 |
| PSDOUT | START+1*, START+4, START+5, START+6, START+7, END+1! |
| PSDR | END+1!, LOOP+2*, LOOP+9, LOOP0+1, LOOP0+3, LOOP1+6, LOOP1+7, LOOP1+12 |
| PSDRD | START+5, END+1! |
| PSDRET | START+5, END+1! |
| PSDRN | END+1!, LOOP+9*, SET+1, SET+2, LOOP1+7, LOOP1+12 |
| PSDSD | START+4, START+7, END+1! |
| >> PSDSITE | START+2, START+3 |
| PSDST | END+1! |
| PSDTR | START+1*, END+1!, LOOP+6*, SET+1, SET+2, LOOP1+12 |
| PSDTYP | END+1!, LOOP+2*, LOOP+4 |
| QTY | END+2!, LOOP+10*, SET+1, SET+2, LOOP1+6, LOOP1+12 |
| SEL | END+2! |
| STAT | END+2!, LOOP+2* |
| TYP | END+2!, LOOP0+3*, LOOP1+2*, LOOP1+4, LOOP1+5, LOOP1+6, LOOP1+7, LOOP1+10, LOOP1+11, LOOP1+12 |
| TYPN | END+2!, LOOP0+1*, LOOP0+3*, LOOP1+5, LOOP1+11 |
| U | LOOP1+6, LOOP1+12 |
| X | END+2! |
| Y | END+2!, LOOP+11*, LOOP+12* |
| ZTDESC | PRTQUE+1*, END+2! |
| ZTDTH | PRTQUE+1*, END+2! |
| ZTIO | PRTQUE+1!*, END+2! |
| >> ZTQUEUED | START+8, END+4 |
| >> ZTREQ | END+4* |
| ZTRTN | PRTQUE+1*, END+2! |
| ZTSAVE | PRTQUE+1!, END+2! |
| ZTSAVE("ASK" | PRTQUE+2* |
| ZTSAVE("ASKN" | PRTQUE+2* |
| ZTSAVE("CNT" | PRTQUE+2* |
| ZTSAVE("PSDRET" | PRTQUE+2* |
| ZTSAVE("^TMP(""PSDRLOG"",$J," | PRTQUE+2* |
| ZTSK | PRTQUE+3!, END+2! |