Routine: PSOSUTL

Package	Total	Call Graph
VA Fileman	3	NOW^%DTC ^DIE ^DIK
Outpatient Pharmacy	2	(KCMPX,SCMPX)^PSOCMOP EN^PSOHLSN1
National Drug File	1	(,$$PROD2)^PSNAPIS

Package

Total

Call Graph

VA Fileman

NOW^%DTC ^DIE ^DIK

Outpatient Pharmacy

(KCMPX,SCMPX)^PSOCMOP EN^PSOHLSN1

National Drug File

(,$$PROD2)^PSNAPIS

Package	Total	Caller Graph
Outpatient Pharmacy	29	^PSRX PARTIAL DATE PSOHLDS1 PSOHLSG1 PSOHLSG2 PSOLBL PSOLBLN2 PSOLBLS PSOLLL5 PSOLLL7 PSOLLLH PSOLLLI PSOQMCAL PSORELD1 PSOSUDEL PSOSULBL PSOSUPAT PSOSUPOE PSOSUPRX PSOTALK PSOTRLBL PSOXZA1 PSOXZA11 PSOXZA12 PSOXZA4 PSOXZA5 PSOXZA8 REFILL ^PS(52.5
IHS Changes To Pharmacy	1	APSPLBL

Package

Total

Caller Graph

Outpatient Pharmacy

^PSRX  PARTIAL DATE  PSOHLDS1  PSOHLSG1  PSOHLSG2  PSOLBL  PSOLBLN2  PSOLBLS
PSOLLL5  PSOLLL7  PSOLLLH  PSOLLLI  PSOQMCAL  PSORELD1  PSOSUDEL  PSOSULBL
PSOSUPAT  PSOSUPOE  PSOSUPRX  PSOTALK  PSOTRLBL  PSOXZA1  PSOXZA11  PSOXZA12
PSOXZA4  PSOXZA5  PSOXZA8  REFILL  ^PS(52.5

IHS Changes To Pharmacy

APSPLBL

Entry Points

Name	Comments	DBIA/ICR reference
CPMSG	;
ARECD
SET	; Set DEA in Suspense File
SAS1	;Refill Division x-ref
AREC
SAS2	;For partials
SDIV
KAS1	;
KAS2	;
KAS	;
ZZ(RX)	; Returns VA print name, Trade Name, Generic Name
SDEA	;Update Suspense with DEA
DEL
EX
AREC1	;
SAS	;X-ref on Division field
KILL
END
CPMS	;

Name	Field # of Occurrence
NOW^%DTC	AREC1+3, AREC+1, ARECD, EX
^DIE	AREC1+9, AREC1+14
^DIK	DEL
^PSNAPIS	ZZ+7
$$PROD2^PSNAPIS	ZZ+7
KCMPX^PSOCMOP	KAS+5, KAS1+7
SCMPX^PSOCMOP	SAS+6, SAS1+8
EN^PSOHLSN1	CPMS+1, CPMSG+1, ARECD+4, EX+5

FileNo	Call Tags
^PS(52.5 - [#52.5]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.5 - [#52.5]	AREC1+2, AREC+1, AREC+2!, AREC+3, AREC+6, ARECD+2, EX+2, SET+3, KILL, KILL+1* , SAS+1, SAS+2, SAS+3, SAS+4, SAS+5!, KAS+1, KAS+2!, KAS+3!, KAS+4, SAS1+1 , SAS1+2, SAS1+4, SAS1+5, SAS1+6, SAS1+7!, KAS1+1, KAS1+4!, KAS1+5!, KAS1+6, SAS2+1 , SAS2+2, SAS2+3, SAS2+4, SAS2+5!, KAS2+1, KAS2+2, KAS2+3!, KAS2+4!, SDEA+1, SDEA+2 , SDIV+1, SDIV+2
^PSDRUG - [#50]	SET+3, SDEA+2, ZZ+1, ZZ+4, ZZ+5
^PSDRUG("AQ"	ZZ+4
^PSNDF(	ZZ+8
^PSRX - [#52]	AREC1+1, AREC1+3, AREC1+4, AREC1+7, AREC1+12, AREC1+15, AREC1+16, AREC, AREC+1, AREC+2 , AREC+4, AREC+5, ARECD, ARECD+1, ARECD+3, EX, EX+1, EX+4*, SET+2, SET+3 , SAS+1, KAS+1, SAS1+1, SAS1+3, KAS1+1, KAS1+2, SDIV+3, SDIV+4, SDIV+5, SDIV+6 , ZZ+1, ZZ+3

Name	Line Occurrences
CPMS	AREC1+2, AREC1+17
CPMSG	AREC+1, AREC+7
DEL	AREC1+4
END	ZZ+2, ZZ+3

Naked Globals

Name	Field # of Occurrence
^("ND"	ZZ+5
^("P"	SDEA+2
^("TN"	ZZ+3
^(0	SAS+1, SAS+3, SAS+4, SAS+5, KAS+1, KAS+2, KAS+3, SAS1+1, SAS1+5, SAS1+6 , SAS1+7, KAS1+1, KAS1+4, KAS1+5, SAS2+1, SAS2+2, SAS2+3, SAS2+4, SAS2+5, KAS2+1 , KAS2+3, KAS2+4, SDIV+3, SDIV+5*
^(2	SDIV+6*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	AREC1+3, AREC+1, ARECD, EX
AAA	EX*, EX+6!
>> CNT	AREC1+3, AREC1+15, AREC1+16, AREC+2, AREC+5, ARECD, ARECD+3
>> COM	AREC1+3, AREC1+16, AREC+1, AREC+5, ARECD+3, ARECD+4
>> DA	AREC1+9, AREC1+14, DEL*, SET+3, KILL, KILL+1, SAS+1, KAS+1, SAS1+4, KAS1+3 , SAS2+2, KAS2+2, SDEA+1, SDIV+1, SDIV+2
>> DA(1	AREC1+14*, SAS1+1, SAS1+3, KAS1+1, KAS1+2, SAS2+1, KAS2+1
>> DFN	AREC+2
DIE	AREC1+7!, AREC1+9!, AREC1+12!, AREC1+14!
DIK	DEL*!
>> DR	AREC1+9, AREC1+14
DT	AREC1+9, AREC1+12, AREC1+14
>> DTTM	AREC1+3, AREC1+16, AREC+1, AREC+5, ARECD, ARECD+3, EX, EX+4
DUZ	AREC1+15, AREC+5, ARECD+3, EX+4
I50	ZZ+1*, ZZ+2, ZZ+4, ZZ+5, ZZ+9!, END!
>> JJ	AREC1+3, AREC+2, ARECD*
>> OLD	AREC1+7, AREC1+12
>> PDUZ	AREC1+15*, AREC1+16, AREC+6
PSCOU	EX, EX+4, EX+6!
PSDVP	SDIV~, SDIV+2, SDIV+3, SDIV+4, SDIV+5
PSLOOP	SDIV~, SDIV+4*
PSOC7	SAS+1~, SAS+2, SAS+6, KAS+1~, KAS+4, KAS+5, SAS1+1~, SAS1+2, SAS1+8, KAS1+1~ , KAS1+6, KAS1+7
PSODEL	AREC1+4!
PSODINT	SDIV~, SDIV+1*, SDIV+3, SDIV+4, SDIV+5, SDIV+6
PSOEXPI	EX+3*, EX+4, EX+5, EX+6!
PSOPRT	EX+2*, EX+4, EX+6!
>> PSOSITE	AREC1+9, AREC1+14, AREC+6
PSOSPIEN	SAS1+1~, SAS1+2, SAS1+4, SAS1+5, SAS1+6, SAS1+7, SAS1+8, KAS1+1~, KAS1+4, KAS1+5 , KAS1+6, KAS1+7
PSOSUDEA	SET+1~, SET+3*
>> PSOTIME	AREC+3, AREC+6
PSOXN	ZZ+7*!
PSOZZDD	CPMS+1~*!
PSOZZDDD	CPMSG+1~*!
PSOZZDMS	AREC~*, AREC+1, AREC+7
PSPSPIEN	SAS2+1~, SAS2+2, SAS2+3, SAS2+4, SAS2+5, KAS2+1~, KAS2+2, KAS2+3, KAS2+4
PSREFCNT	SAS1+1~, SAS1+3, SAS1+4, KAS1+1~, KAS1+2, KAS1+3
PSSSPIEN	SDEA+1~*, SDEA+2
PSUSPIEN	SAS+1~, SAS+2, SAS+3, SAS+4, SAS+5, SAS+6, KAS+1~, KAS+2, KAS+3, KAS+4 , KAS+5
QQQ	EX+1*, EX+6!
>> RF	AREC1+4, AREC+4, ARECD+1*
>> RFCNT	AREC1+4, AREC1+7, AREC1+12, AREC1+14, AREC1+16, AREC+4, AREC+5, ARECD+1*, ARECD+3
RX	AREC1+1, AREC1+2, AREC1+3, AREC1+4, AREC1+7, AREC1+9, AREC1+12, AREC1+14, AREC1+15, AREC1+16 , CPMS+1, AREC, AREC+1, AREC+2, AREC+4, AREC+5, CPMSG+1, ARECD, ARECD+1, ARECD+3 , ARECD+4, ZZ~, ZZ+1, ZZ+3
RXP	AREC1+3, AREC1+7, AREC1+12, AREC1+16, AREC+1, AREC+5, ARECD+2*, ARECD+3!
>> RXREC	EX, EX+1, EX+4, EX+5
>> RXRP(	AREC1+3, AREC1+7, AREC1+12, AREC+1
>> RXRS(	AREC1+7, AREC1+12
>> SFN	AREC1+2, DEL, AREC+1, AREC+2, AREC+3, AREC+6, ARECD+2, EX+2
U	ZZ+1, ZZ+5
VVV	EX+1*, EX+4, EX+6!
>> X	AREC1+7, AREC1+12, SET+2, SET+3, SAS+3, SAS+4, SAS+5, KAS+2, KAS+3, SAS1+4 , SAS1+5, SAS1+6, SAS1+7, KAS1+4, KAS1+5, SAS2+2, SAS2+3, SAS2+4, SAS2+5, KAS2+3 , KAS2+4, SDEA+2, SDIV+3, SDIV+5, SDIV+6
Z1	ZZ+5*, ZZ+6, ZZ+7, ZZ+8, ZZ+9!
Z2	ZZ+5*, ZZ+6, ZZ+7, ZZ+8, ZZ+9!
>> ZDRUG	ZZ+1, ZZ+2, ZZ+3, ZZ+7, ZZ+8*, END+1
ZZZ	SAS1+1~, SAS1+3, KAS1+1~, KAS1+2

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOSUTL

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 30

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items