PSDLBL4 ;BIR/JPW-CS Label Print for CS Disp Drug ; 5 Oct 94
Source file <PSDLBL4.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 3 | (,HOME)^%ZIS ^%ZISC ^%ZTLOAD |
VA Fileman | 2 | ^DIC Y^DIQ |
Controlled Substances | 1 | ^PSDLBL5 |
Name | Comments | DBIA/ICR reference |
---|---|---|
GROUP | ;select group of naous
|
|
SAVE | ;save queued variables
|
|
END | ;kill variables and exit
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(58.8 | PSDLBL4+2 |
^PSD(58.8 - [#58.8] | PSDLBL4+2 |
^TMP("PSDLBL" | END+4! |
Name | Line Occurrences |
---|---|
END | PSDLBL4+3, PSDLBL4+4 |
SAVE | PSDLBL4+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | END+1! |
%DT | END+1! |
%H | END+1! |
%I | END+1! |
%ZIS | PSDLBL4+3!*, END+1! |
%ZIS("B" | PSDLBL4+3* |
ALL | END+1!, SAVE+1 |
ANS | END+1! |
C | PSDLBL4+2*, END+1! |
CNT | END+1!, SAVE+3 |
DA | END+1!, GROUP+1! |
DIC | END+1!, GROUP+1!* |
DIC("A" | GROUP+1* |
DIC("S" | GROUP+1* |
DIC(0 | GROUP+1* |
DIE | END+1! |
DIR | END+1! |
DIROUT | END+1! |
DIRUT | END+1! |
DR | END+1! |
DRUG | END+1! |
DTOUT | END+1! |
DUOUT | END+1! |
IO | PSDLBL4+5 |
IO("Q" | PSDLBL4+3!, PSDLBL4+4! |
IOP | PSDLBL4+3! |
JJ | END+1! |
JLP1 | END+1! |
LIQ | END+1! |
NAOU | END+1!, SAVE+3 |
NAOUN | END+1! |
NODE | END+1! |
OK | END+1! |
POP | PSDLBL4+3!, END+2! |
PSD | END+2! |
PSD1 | END+2!, SAVE+3 |
PSD2 | END+2! |
PSDA | END+2! |
PSDBAR0 | END+2! |
PSDBAR1 | END+2! |
PSDCNT | END+2! |
PSDEV | PSDLBL4+2*, PSDLBL4+3, END+2! |
PSDG | END+2!, SAVE+3 |
PSDG( | GROUP+1* |
PSDJ | END+2! |
PSDN | END+2! |
PSDOUT | END+2! |
PSDPN | END+2! |
PSDPRT | END+2! |
PSDR | END+2! |
PSDRG | END+2! |
PSDRN | END+2! |
PSDS | PSDLBL4+2, END+2!, SAVE+2 |
PSDSN | END+2! |
PSDT | END+2! |
PSDX1 | END+2! |
PSDX2 | END+2! |
SEL | END+3! |
STAT | END+3! |
TEMP | END+3! |
TEST | END+3! |
TEXT | END+3! |
X | END+3! |
Y | PSDLBL4+2*, END+3!, GROUP+1 |
ZTDESC | PSDLBL4+4*, END+3! |
ZTDTH | PSDLBL4+4! |
ZTIO | END+3! |
>> ZTQUEUED | END+5 |
>> ZTREQ | END+5* |
ZTRTN | PSDLBL4+4*, END+3! |
ZTSAVE | PSDLBL4+4!, END+3! |
ZTSAVE("ALL" | SAVE+1* |
ZTSAVE("ANS" | SAVE+4* |
ZTSAVE("CNT" | SAVE+3* |
ZTSAVE("NAOU(" | SAVE+3* |
ZTSAVE("PSD1(" | SAVE+3* |
ZTSAVE("PSDG(" | SAVE+3* |
ZTSAVE("PSDS" | SAVE+2* |
ZTSAVE("PSDSITE" | SAVE+4* |
ZTSAVE("PSDSN" | SAVE+2* |
ZTSK | PSDLBL4+4!, END+3! |