Routine: PSSSPD

Information

PSSSPD ;BIR/RLW-PRINT/CREATE PHARMACY ORDERABLE ITEMS ; 09/01/98 7:13

Source file <PSSSPD.m>

Package	Total	Call Graph
National Drug File	1	($$PROD0,$$PSJDF,$$VAGN)^PSNAPIS
Pharmacy Data Management	1	^PSSPOI

Package	Total	Caller Graph
Pharmacy Data Management	2	PSSCREAT PSSMATCH

Name	Comments	DBIA/ICR reference
IVSOL	; IV solutions
EN	; ; name-spaced variables: ADD=iv additive file SOL=iv solution file ; PD=primary drug file DD=dispense drug file ; NDF=national drug file DF=NDF dosage form ; SPD=pharmacy orderable item file
IVADD	; IV Additives
LOOP	; loop through dispense drugs for each primary drug, get NDF entry
DOSE	; get dispense drug name and NDF dosage form

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.3 - [#50.3]	LOOP+1
^PS(52.6 - [#52.6]	IVADD+1, IVADD+2
^PS(52.7 - [#52.7]	IVSOL+1, IVSOL+2
^PSDRUG - [#50]	LOOP+2, IVADD+2, IVSOL+2, DOSE+1
^PSDRUG("AP"	LOOP+1, LOOP+2
^TMP("PSS"	EN+8!, LOOP+4*
^TMP("PSSADD"	EN+8!, IVADD+3, IVADD+4
^TMP("PSSD"	EN+8!, LOOP+3, LOOP+4
^TMP("PSSOL"	EN+8!, IVSOL+2, IVSOL+3

Name	Line Occurrences
DOSE	LOOP+3, IVADD+3, IVSOL+2

Name	Field # of Occurrence
ADDIEN	EN+5~, IVADD+1*, IVADD+2
ADDNAME	EN+5~, IVADD+2*, IVADD+4
CHR	EN+5~, EN+7*, LOOP+4
CML	EN+5~
>> DA	DOSE+1*
DDIEN	EN+5~, EN+7, LOOP+1, LOOP+2, IVADD+2, IVSOL+2*, DOSE+1
DDNAME	EN+5~, LOOP+3, LOOP+4, IVADD+3, IVADD+4, IVSOL+2, IVSOL+3, DOSE+1*
DF	EN+5~, DOSE+1, DOSE+7
DFNAME	EN+5~, LOOP+3, LOOP+4, IVADD+3, IVADD+4, IVSOL+2, IVSOL+3, DOSE+1, DOSE+8
>> GEN	DOSE+1*, DOSE+2, DOSE+4
>> K	DOSE+1*
LIVE	EN+5~
NDF	EN+5~, EN+7, DOSE+1, DOSE+2, DOSE+3
NDFVA	EN+5~
>> NDFVAGN	DOSE+1*, DOSE+6, DOSE+7, DOSE+8
PDIEN	EN+5~, EN+7, LOOP+1, LOOP+2
PDNAME	EN+5~, LOOP+1*, LOOP+4
PGN	EN+5~
>> PROD	DOSE+1*, DOSE+3
>> PSCREATE	EN+7, LOOP+3, IVADD+3, IVSOL+2, IVSOL+5
PSMATCH	EN+5~
SOLIEN	EN+5~, IVSOL+1*, IVSOL+2, IVSOL+3
SOLNAME	EN+5~, IVSOL+1*, IVSOL+3
SPD	EN+5~
SPDFN	EN+5~
SPDNAME	EN+5~
X	EN+5~, EN+7, DOSE+1