Routine: PSOMGREP

Package	Total	Call Graph
Outpatient Pharmacy	4	(EN,ENQ)^PSOMGRP1 EN^PSOMGRP2 EN^PSOMGRP3 EN^PSOMGRP4
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	3	(,DD)^%DT ^DIC ^DIR

Package

Total

Call Graph

(EN,ENQ)^PSOMGRP1 EN^PSOMGRP2 EN^PSOMGRP3 EN^PSOMGRP4

(,DD)^%DT ^DIC ^DIR

Package	Total	Caller Graph
Outpatient Pharmacy	5	PSO MGMT REPORT IV PSO MGMT REPORT RX COSTS PSO MGMT REPORT RX COUNTS PSO MGMT REPORT TYPE OF RX PSO MGMT REPORTS ALL DAILY

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?13,$C(7),$C(7),"There is no prescription data available to print.",!?8,"Use the Date Range Compile data option to make the data available." Line Location: DISP+1
Function Call: WRITE	Prompt: !!?18,$C(7),$C(7),"There is no IV data available to print." Line Location: DISP+3
Function Call: WRITE	Prompt: !!,"There is no prescription and IV data available to print." Line Location: DISP+4
Function Call: WRITE	Prompt: !! Line Location: PRTDV+0
Function Call: WRITE	Prompt: ! Line Location: PRTDV+2
Function Call: WRITE	Prompt: !!,"PLEASE PRINT ON WIDE PAPER, I.E., 132 COLUMNS." Line Location: PAP+0
Function Call: WRITE	Prompt: !! Line Location: SDT+0
Function Call: WRITE	Prompt: !!,$C(7),"Data available to print starts with "_PSDT_".",! Line Location: SDT+1
Function Call: WRITE	Prompt: !!,$C(7),"Data available to print starts with "_PIVSDT_".",! Line Location: SDT+2
Function Call: WRITE	Prompt: ! Line Location: EDT+0
Function Call: WRITE	Prompt: $C(7)," INVALID ENDING DATE ???" Line Location: EDT+0
Function Call: WRITE	Prompt: !!?5,$C(7),$C(7),"There is no prescription data between "_SDATE_" and "_EDATE_".",!?7,"Use the Date Range Compile data option to make the data available." Line Location: EDT+2
Function Call: WRITE	Prompt: !,$C(7),$C(7),"Report not Queued!" Line Location: QUE+1
Routine Call	DIC Line Location: PRTDV+2
Routine Call	DIR Line Location: PRTDV+1
Routine Call	%ZIS Line Location: QUE QUE+1

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	EDT+1
^PS(50.8 - [#50.8]	IV, IV+1
^PS(59 - [#59]	DISP+6
^PS(59.12 - [#59.12]	BEG, EDT+1

Name	Line Occurrences
DISP	IV, IV+2
EDT	EDT
END	BEG, DISP+1, DISP+3, DISP+4, PRTDV+2, SDT, EDT, EDT+2, QUE+1, QUE+3
IV	BEG
PAP	DISP+5
PRTDV	PRTDV+2, SDT+3
SDT	SDT+1, SDT+2

Name	Field # of Occurrence
%	END+1!
%DT	SDT*, QUE!, QUE+3!, END+1!
%DT("A"	SDT, EDT
%DT(0	SDT*
%ZIS	QUE!*
%ZIS("B"	QUE*
ANS	DISP+5, PRTDV, PRTDV+1*, PRTDV+2, END+1!
BEG	END+1!
CNT	END+1!
DIC	PRTDV+2*!
DIC("A"	PRTDV+2*
DIC(0	PRTDV+2*
DIR	PRTDV+1!, END+1!
DIR("?"	PRTDV*
DIR("??"	PRTDV+1*
DIR("A"	PRTDV*
DIR(0	PRTDV*
DIRUT	PRTDV+1, END+1!
DIV	DISP+6, PRTDV, PRTDV+2*, END+1!
DT	SDT
DTOUT	PRTDV+2, END+1!
DUOUT	PRTDV+2, END+1!
DV	DISP+6*, PRTDV, END+1!
DVCNT	DISP+6*, PRTDV, PRTDV+2, QUE!, QUE+2!
DVMN	END+1!
EDATE	EDT+1*, EDT+2, END+1!
EDT	EDT*, EDT+1, END+1!
END	END+1!
FND	EDT+1*, END+1!
G	QUE+2*, QUE+3!, END+1!
I	END+1!
IEN	IV+1*, END+1!
IO	QUE+1
IO("Q"	QUE+2, QUE+3!
ION	QUE
IOP	QUE!, QUE+1*!
IVE	END+1!
IVS	IV+1*, END+1!
IVSDT	IV+1*, IV+2, DISP+2, DISP+3!, DISP+4, SDT+2
K	END+1!
M1	END+1!
M2	END+1!
M3	END+1!
OK	IV*, DISP!
OUT	PRTDV+1!*, PRTDV+2, END+1!
PDATE	END+1!
PG	END+1!
PIVSDT	IV+2*, DISP+2, SDT+2, END+1!
POP	QUE+1, END+1!
PRT	END+1!
PRV	END+1!
PSDT	BEG*, DISP, SDT+1, END+1!
PSOION	QUE!*, QUE+1!, END+1!
RUN	BEG, DISP, DISP+1, DISP+3, DISP+5, SDT+1, SDT+2, EDT+1, QUE+2, QUE+4 , END+1!
S1	END+1!
S2	END+1!
S3	END+1!
SDATE	EDT+1*, EDT+2, END+1!
SDT	BEG, DISP, DISP+1!, DISP+4, SDT+1, SDT+3, EDT, EDT+1, END+1!
T1	END+1!
T2	END+1!
T3	END+1!
X	SDT, EDT, QUE+3!, END+1!
Y	BEG, IV+2, PRTDV+1, PRTDV+2, SDT+1, SDT+2, SDT+3, EDT, EDT+1*, QUE+3! , END+1!
ZTDESC	QUE+2*, END+1!
>> ZTQUEUED	END
>> ZTREQ	END*
ZTRTN	QUE+2*, END+1!
ZTSAVE	END+1!
ZTSAVE(	QUE+2*
ZTSK	QUE!, QUE+3, END+1!

Information