©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PSDPWK1 ;BIR/JPW-Print Pharm Disp. Worksheet (cont'd) ; 17 Oct 93
Source file <PSDPWK1.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | ^%ZISC ^%ZTLOAD |
| Controlled Substances | 1 | PRINT^PSDPWK2 |
| VA Fileman | 1 | ^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ;compile data
|
|
| PRTQUE | ;queues print after compile
|
|
| END |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PSD(58.8 - [#58.8] | START+2, START+7 |
| ^PSD(58.85 - [#58.85] | START+3, START+4!*, START+5, START+6, START+8, START+9, START+10, START+11 |
| ^PSDRUG - [#50] | START+8 |
| ^PSI(58.2 - [#58.2] | START+2 |
| ^TMP("PSDWK" | START+1!, START+12*, START+13*, START+14, PRTQUE+3!, END+2! |
| ^TMP("PSDWKT" | START+1!, START+8*, START+9*, PRTQUE+3!, END+2! |
| ^VA(200 - [#200] | START+10 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | START+2, START+5, START+7, START+8, START+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | END! |
| %H | END! |
| %I | END! |
| %ZIS | END! |
| ALL | START+3, START+5, END! |
| ANS | START+12, START+13, END! |
| C | END! |
| CNT | START+2*, START+12, START+13, END! |
| COMM | START+11*, START+12, START+13, END! |
| DA | START+15!*, END! |
| DIC | END! |
| DIE | START+15!* |
| DIR | END! |
| DIROUT | END! |
| DIRUT | END! |
| DR | START+15!* |
| DTOUT | END! |
| DUOUT | END! |
| IO("Q" | END! |
| JJ | START+3*, START+4, START+14*, END! |
| JJ1 | START+14*, END! |
| JJDA | START+3*, START+4, START+14*, START+15, END! |
| LOOP | END! |
| LOOP2 | END! |
| NAOU | END! |
| NAOU( | START+2*, START+3, START+5 |
| NODE | END! |
| OK | END+1! |
| ORD | START+10*, END+1! |
| ORDN | START+10*, START+12, START+13, END+1! |
| PG | END+1! |
| POP | END+1! |
| PRT | START+1*, START+15*, END+1! |
| PSD | START+2*, START+5*, START+6, START+8, START+9, START+10, START+11, START+12, START+13, END+1! |
| PSDCPY | END+1! |
| PSDEV | END+1! |
| PSDG | START+2, END+1! |
| PSDG( | START+2 |
| PSDIO | PRTQUE+1, END+1! |
| PSDN | START+2*, START+5*, START+7, END+1! |
| PSDNA | START+7*, START+8, START+9, START+12, START+13, END+1! |
| PSDOUT | END+1! |
| PSDR | START+8*, END+1! |
| PSDRN | START+8*, START+9, START+12, START+13, END+1! |
| PSDS | START+2, START+3, START+4, START+5, END+1! |
| PSDSN | END+1! |
| PSDT | END+1! |
| QTY | START+9*, START+12, START+13, END+2! |
| SEL | END+2! |
| SUM | END+2! |
| U | START+3 |
| X | END+2! |
| Y | END+2! |
| ZTDESC | PRTQUE+1*, END+2! |
| ZTDTH | PRTQUE+1*, END+2! |
| ZTIO | PRTQUE+1!*, END+2! |
| >> ZTQUEUED | START+16, END+3 |
| >> ZTREQ | END+3* |
| ZTRTN | PRTQUE+1*, END+2! |
| ZTSAVE | PRTQUE+1!, END+2! |
| ZTSAVE("ANS" | PRTQUE+2* |
| ZTSAVE("CNT" | PRTQUE+2* |
| ZTSAVE("PSDS*" | PRTQUE+2* |
| ZTSAVE("SUM" | PRTQUE+2* |
| ZTSAVE("^TMP(""PSDWK"",$J," | PRTQUE+2* |
| ZTSAVE("^TMP(""PSDWKT"",$J," | PRTQUE+2* |
| ZTSK | PRTQUE+3!, END+2! |