PSDEM1 ;BIR/LTL-Print NAOU Priority Order Report by Drug ;12/14/99 15:11
Source file <PSDEM1.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | ^%ZISC $$FMTE^XLFDT |
| VA Fileman | 2 | ^%DT ^DIR |
| Controlled Substances | 1 | ^PSDEM3 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALL | ;loops for all drugs
|
|
| SET | ;sets data
|
|
| END | ;
|
|
| HDR | ;lists header information
|
|
| TOT | ||
| NTOT | ||
| START | ;entry point for report
|
|
| DONE | ||
| ;prints data for stock drugs
|
||
| GTOT | ;grand total
|
| 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 |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | PRINT+2 |
| ^PSD(58.8 - [#58.8] | SET+2, SET+4 |
| ^PSD(58.81 - [#58.81] | START+3, START+4, ALL+2, ALL+3, SET+1, SET+6, SET+7 |
| ^PSDRUG - [#50] | SET+3 |
| ^TMP("PSDNU" | START+1!, PRINT+3, PRINT+4, PRINT+5, PRINT+6, END+4!, SET+9* |
| ^TMP("PSDNUG" | START+1!, END+4!, GTOT+2, SET+14* |
| ^TMP("PSDNUQ" | START+1!, END+4!, TOT, SET+13* |
| ^TMP("PSDNUQT" | START+1!, END+4!, NTOT, SET+11* |
| ^TMP("PSDNUS" | START+1!, END+4!, TOT, SET+12* |
| ^TMP("PSDNUT" | START+1!, END+4!, NTOT, SET+10* |
| ^VA(200 - [#200] | SET+8 |
| Name | Line Occurrences |
|---|---|
| ALL | START+2 |
| DONE | PRINT+1, PRINT+3 |
| GTOT | PRINT+4 |
| HDR | PRINT+3, PRINT+4, PRINT+7 |
| NTOT | PRINT+4 |
| START+2 | |
| SET | START+4, ALL+3 |
| TOT | PRINT+5 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | SET+3, SET+4, SET+8 |
| ^(1 | SET+7 |
| ^(4 | SET+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | END+1! |
| %DT | PRINT+2*, END+1! |
| %H | END+1! |
| %I | END+1! |
| %ZIS | END+1! |
| ALL | START+2, END+1!, ALL+1 |
| ANS | END+1! |
| DA | END+1!, HDR+1! |
| DATE | PRINT+6*, PRINT+8, END+1! |
| DIR | DONE+1!, END+1!, HDR+1! |
| DIR("A" | DONE+1* |
| DIR(0 | DONE+1*, HDR+1* |
| DIROUT | END+1! |
| DIRUT | DONE+1!, END+1! |
| DTOUT | END+1! |
| DUOUT | END+1! |
| IO("Q" | END+1! |
| IOF | DONE, HDR+2 |
| IOSL | PRINT+7 |
| IOST | DONE, DONE+1, HDR+1 |
| JJ | START+3*, START+4, PRINT+5*, PRINT+6, END+1!, ALL+2*, ALL+3, SET+9 |
| JJ1 | START+3*, START+4, END+1!, ALL+2*, ALL+3 |
| JJ2 | END+1! |
| KK | START+4*, END+1!, ALL+3*, SET+1, SET+6, SET+7 |
| LN | PRINT+2!*, END+1!, HDR+5 |
| LOC | END+1! |
| LOC( | START+3 |
| NAOU | PRINT+4*, PRINT+5, PRINT+6, PRINT+7, END+2!, TOT |
| NAOUN | END+2!, SET+4*, SET+9, SET+12, SET+13 |
| NODE | PRINT+6*, PRINT+8, END+2!, SET+1*, SET+5 |
| NUM | PRINT+5*, PRINT+6, PRINT+8, END+2! |
| NURS | END+2!, SET+7*, SET+8*, SET+9 |
| PG | PRINT+2*, END+2!, HDR+1, HDR+2* |
| POP | END+2! |
| PSD | END+2!, SET+1*, SET+2, SET+4 |
| PSDATE | END+2!, HDR+4 |
| PSDED | START+3, END+2!, ALL+2 |
| PSDOK | END+2!, SET+2*, SET+10, SET+12, SET+14, SET+15* |
| PSDOUT | PRINT+2*, PRINT+4, PRINT+5, PRINT+7, DONE+1, END+2!, HDR+1*, TOT, NTOT, GTOT+1 |
| PSDPN | END+2!, SET+5*, SET+8, SET+9 |
| PSDR | START+3*, START+4, PRINT+4*, PRINT+5, PRINT+6, END+2!, ALL+2*, ALL+3, HDR+3, TOT , NTOT, SET+3 |
| PSDRN | END+2!, SET+3*, SET+9, SET+10, SET+11, SET+12, SET+13 |
| PSDSD | START+3, END+2!, ALL+2 |
| >> PSDSITE | SET+2 |
| PSDT | END+2! |
| PSDTR | END+2! |
| QTY | END+2!, SET+5*, SET+6*, SET+9, SET+11, SET+13 |
| RPDT | PRINT+2*, END+2!, HDR+2 |
| SUM | PRINT+1, END+2! |
| X | PRINT+2*, END+2! |
| Y | PRINT+2, END+2!, HDR+1 |
| ZTDESC | END+3! |
| ZTDTH | END+3! |
| ZTIO | END+3! |
| >> ZTQUEUED | END+5 |
| >> ZTREQ | END+5* |
| ZTRTN | END+3! |
| ZTSAVE | END+3! |
| ZTSK | END+3! |