Routine: PSXPRE

Package	Total	Call Graph
VA FileMan	3	^%DT %XY^%RCR ^DIR

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Consolidated Mail Outpatient Pharmacy Install for Host Facility.",!! Line Location: START+1
Function Call: WRITE	Prompt: !!,"Consolidated Mail Outpatient Pharmacy Install for Remote Medical Center.",!! Line Location: START+2
Function Call: WRITE	Prompt: !!,"You must be a valid user and ",!,"DUZ(0) must be set to the ""@"" sign!!",!! Line Location: DUZ+0
Function Call: WRITE	Prompt: !!,*7,"This install of the Consolidated Mail Outpatient Pharmacy",!,"software at your medical center requires that you select the CMOP Host",!,"Facility which will be receiving your Outpatient Pharmacy prescription data.",!! Line Location: ASK+2
Function Call: WRITE	Prompt: !!,"Validating required RX CONSULT FILE entries......" Line Location: RXC+2
Function Call: WRITE	Prompt: !!,"You must have Outpatient Pharmacy patch PSO6148 installed before installing CMOP Software.",!,"...INITIALIZATION ABORTED!",!! Line Location: RXC+3
Function Call: WRITE	Prompt: !!,"You do not have an RX CONSULT FILE........INITIALIZATION ABORTED!",!! Line Location: RXC+5
Function Call: WRITE	Prompt: !,"Your RX CONSULT File entry # "_X_" is invalid.!!" Line Location: RXC+6
Routine Call	DIR Line Location: ASK+3

Name	Line Occurrences (* Changed, ! Killed)
^DIC(54	RXC+3
^DIC(9.4 - [#9.4]	ENV+3, ENV+4, ENV+5
^PS(54 - [#54]	RXC+5, RXC+6
^PSX(550 - [#550]	ASK+1
^TMP("PSXCMOP"	ASK+5*
^TMP("PSXDD"	RXC+4!
^TMP("PSXDIC"	RXC+4!
^TMP("PSXPS"	RXC+4!
^VA(200 - [#200]	DUZ
^XMB("NETNAME"	START+1, START+2, ASK, ENV+2, RXC+1

Name	Field # of Occurrence
>> %DT	CKDT*
%X	RXC+8~, RXC+9~, RXC+10~*
%Y	RXC+8~, RXC+9~, RXC+10~*
DIFQ	DUZ!, ASK+4!, QUIT+1!, DONE+3!
DIR	ASK+3!
DIR("A"	ASK+3*
DIR(0	ASK+3*
DT	CKDT*, CKU
DUZ	DUZ, CKU
DUZ(0	DUZ, CKU
ERROR	CKU, QUIT+1!, DONE+2!, DONE+4!, RXC+1, RXC+3, RXC+5, RXC+6, RXC+7
HOST	DONE, DONE+1, DONE+4!, ENV+1, ENV+2
KNL	DONE, DONE+1, DONE+4!, ENV+1, ENV+4
NDF	DONE, DONE+1, DONE+4!, ENV+1, ENV+5
OP	DONE, DONE+1, DONE+4!, ENV+1, ENV+3
PKG	DONE+4!, ENV+3, ENV+4, ENV+5*
PSX	CKU, QUIT+1!, DONE, DONE+1, DONE+2, DONE+3, DONE+4!
PSXDZ	DUZ*, CKU, QUIT+1!, DONE, DONE+1, DONE+4!
RXC	RXC+5*, RXC+7!
U	CKU
X	CKDT, ASK+4, ASK+5, RXC+6, RXC+7!
>> XQABT1	START*
>> XQABT2	DONE+5*
>> XQABT3	DONE+5*
Y	CKDT, RXC+6*, RXC+7!

Name	Field # of Occurrence
$T(CON+X	RXC+6