Routine: PSOBPSU1

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
Outpatient Pharmacy	8	$$LSTRFL^PSOBPSU1 (ELIG,ELOG,RXACT)^PSOBPSU2 ($$CMOP,$$RXFLDT,$$RXRLDT,$$RXSITE,$$STATUS)^PSOBPSUT ($$GETNDC,$$GPPDU,SAVNDC)^PSONDCUT $$TRIC^PSOREJP1 RETRXF^PSOREJU2 TRICCHK^PSOREJU3 CLSALL^PSOREJUT
Uncategorized	2	$$EN^BPSNCPDP ($$CMOPON,$$ECMEON)^BPSUTIL
Integrated Billing	1	STORESP^IBNCPDP
Pharmacy Data Management	1	($$GETNDC,$$NDCFMT)^PSSNDCUT
VA Fileman	1	($$GET1,GETS)^DIQ

Package	Total	Caller Graph
Outpatient Pharmacy	47	PSOATRF PSOATRF1 PSOATRFC PSOAUTOC PSOBPSU1 PSOBPSU2 PSOBPSUT PSOCAN3 PSOCMOP PSODAWUT PSOHLD PSOHLDA PSOHLDC PSOHLEXP PSOHLNEW PSOLLLH PSOMAUEX PSON52 PSONDCUT PSONDCV PSOORED1 PSOORED2 PSOORED6 PSOORED7 PSOORUT1 PSOORUTL PSOPKIV1 PSOPMP1 PSOR52 PSOREJP1 PSOREJP3 PSOREJU1 PSOREJU2 PSOREJU3 PSOREJU4 PSOREJUT PSORESK PSORN52 PSORXDL PSORXED1 PSORXL1 PSOSULB1 PSOSULBL PSOSUPOE PSOSUPRX PSOVER1 PSOVERC
CMOP	2	PSXRPPL1 PSXRPPL2
IHS Changes To Pharmacy	1	APSPCSM

Package

Total

Caller Graph

Outpatient Pharmacy

PSOATRF  PSOATRF1  PSOATRFC  PSOAUTOC  PSOBPSU1  PSOBPSU2  PSOBPSUT  PSOCAN3
PSOCMOP  PSODAWUT  PSOHLD  PSOHLDA  PSOHLDC  PSOHLEXP  PSOHLNEW  PSOLLLH
PSOMAUEX  PSON52  PSONDCUT  PSONDCV  PSOORED1  PSOORED2  PSOORED6  PSOORED7
PSOORUT1  PSOORUTL  PSOPKIV1  PSOPMP1  PSOR52  PSOREJP1  PSOREJP3  PSOREJU1
PSOREJU2  PSOREJU3  PSOREJU4  PSOREJUT  PSORESK  PSORN52  PSORXDL  PSORXED1
PSORXL1  PSOSULB1  PSOSULBL  PSOSUPOE  PSOSUPRX  PSOVER1  PSOVERC

CMOP

PSXRPPL1 PSXRPPL2

IHS Changes To Pharmacy

APSPCSM

Entry Points

Name	Comments	DBIA/ICR reference
ECMESND(RX,RFL,DATE,FROM,NDC,CMOP,RVTX,OVRC,CNDC,RESP,IGSW,ALTX,CLA,PA)	; - Sends Rx Release	ICR #4702 Status: Active Usage: Controlled Subscription
LSTRFL(RX)	; - Returns the latest fill for the Prescription ; Input: (r) RX - Rx IEN (#52)	ICR #4702 Status: Active Usage: Controlled Subscription
ECMEACT(RX,RFL,COMM,USR)	; - Add an Activity to the ECME Activity Log (PRESCRIPTION file)	ICR #4702 Status: Active Usage: Controlled Subscription
STS(RX,RFL,RSP)	; Adds the Status to the ECME Activity Log according to Rx/fill claim status Response
DOS(RX,RFL,DATE)	; Return the Date Of Service for ECME
REVERSE(RX,RFL,FROM,RSN,RTXT,IGRL,NDC)	; - Reverse a claim and close all OPEN/UNRESOLVED Rejects
RELEASE(RX,RFL,USR)	; - Notifies IB that the Rx was RELEASED

External References

Name	Field # of Occurrence
$$EN^BPSNCPDP	ECMESND+49, REVERSE+23
$$CMOPON^BPSUTIL	ECMESND+26
$$ECMEON^BPSUTIL	ECMESND+24
$$GET1^DIQ	ECMESND+32, ECMESND+58, REVERSE+18
GETS^DIQ	RELEASE+8, RELEASE+17
STORESP^IBNCPDP	RELEASE+20
$$LSTRFL^PSOBPSU1	ECMEACT+5
ELIG^PSOBPSU2	ECMESND+54
ELOG^PSOBPSU2	ECMESND+78
RXACT^PSOBPSU2	ECMESND+76, REVERSE+28, ECMEACT+6
$$CMOP^PSOBPSUT	REVERSE+22
$$RXFLDT^PSOBPSUT	DOS+9, RELEASE+13
$$RXRLDT^PSOBPSUT	REVERSE+16, DOS+7
$$RXSITE^PSOBPSUT	ECMESND+24, ECMESND+26, ECMESND+32
$$STATUS^PSOBPSUT	ECMESND+36, ECMESND+50, REVERSE+10, REVERSE+19, STS+2, STS+5
$$GETNDC^PSONDCUT	ECMESND+30, ECMESND+59, ECMESND+60, ECMESND+61, ECMESND+62, ECMESND+63, ECMESND+64, REVERSE+23, RELEASE+12
$$GPPDU^PSONDCUT	ECMESND+34
SAVNDC^PSONDCUT	ECMESND+33, ECMESND+50
$$TRIC^PSOREJP1	REVERSE+24
RETRXF^PSOREJU2	ECMESND+52, REVERSE+18
TRICCHK^PSOREJU3	ECMESND+80
CLSALL^PSOREJUT	ECMESND+44, REVERSE+15
$$GETNDC^PSSNDCUT	ECMESND+32
$$NDCFMT^PSSNDCUT	ECMESND+31

FileNo	Call Tags
^PSRX - [#52]	GET1^DIQ, GETS^DIQ
52.1	GET1^DIQ, GETS^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PSRX - [#52]	LSTRFL+4

Name	Line Occurrences
$$DOS	ECMESND+49, REVERSE+23
$$LSTRFL	ECMESND+22, REVERSE+9, DOS+5, RELEASE+6
$$STS	ECMESND+70, ECMESND+71, REVERSE+27

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACT	ECMESND+21~, ECMESND+36, ECMESND+37, ECMESND+69, ECMESND+70, ECMESND+71, ECMESND+72, ECMESND+73, ECMESND+74, ECMESND+75* , ECMESND+76, REVERSE+11~, REVERSE+27*, REVERSE+28
ALTX	ECMESND~, ECMESND+56, ECMESND+71
CLA	ECMESND~, ECMESND+42, ECMESND+44, ECMESND+48*, ECMESND+49
CLSCOM	ECMESND+39~, ECMESND+41, ECMESND+42, ECMESND+43*, ECMESND+44
CMOP	ECMESND~, ECMESND+26, ECMESND+32, ECMESND+33, ECMESND+50
CNDC	ECMESND~, ECMESND+28, ECMESND+69
COD1	ECMESND+39~, ECMESND+40*, ECMESND+41, ECMESND+44, ECMESND+68
COD2	ECMESND+39~, ECMESND+40*, ECMESND+41, ECMESND+44, ECMESND+68
COD3	ECMESND+39~, ECMESND+40*, ECMESND+41, ECMESND+44, ECMESND+68
COMM	ECMEACT~, ECMEACT+6
DA	ECMESND+21~, REVERSE+11~
DATE	ECMESND~, ECMESND+49, DOS~, DOS+7, DOS+9, DOS+11*, DOS+12
>> DFN	RELEASE+9*, RELEASE+20
DT	DOS+11, RELEASE+13
DUZ	ECMESND+44, ECMESND+76, REVERSE+15, REVERSE+28
FLDT	RELEASE+5~, RELEASE+13*, RELEASE+14
FROM	ECMESND~, ECMESND+34, ECMESND+47, ECMESND+49, ECMESND+50, ECMESND+58, ECMESND+59, ECMESND+60, ECMESND+61, ECMESND+62 , ECMESND+63, ECMESND+64, ECMESND+65, ECMESND+66, ECMESND+80, REVERSE~, REVERSE+22, REVERSE+23
I	LSTRFL+3~, LSTRFL+4*
IBAR	RELEASE+5~, RELEASE+20
IBAR("CLAIMID"	RELEASE+11*
IBAR("DAYS SU	PPLY" , RELEASE+15, RELEASE+19
IBAR("DRUG"	RELEASE+12*
IBAR("FILL DA	TE" , RELEASE+14*
IBAR("FILL NU	MBER" , RELEASE+14*
IBAR("NDC"	RELEASE+12*
IBAR("PRESCRIPTION"	RELEASE+10*
IBAR("QTY"	RELEASE+15, RELEASE+18
IBAR("RX NO"	RELEASE+10*
IBAR("STATUS"	RELEASE+20*
IBAR("USER"	RELEASE+11*
IGRL	REVERSE~, REVERSE+16
IGSW	ECMESND~, ECMESND+24, ECMESND+26
LSTRFL	LSTRFL+3~, LSTRFL+4*, LSTRFL+5
NDC	ECMESND~, ECMESND+29, ECMESND+31, ECMESND+32*, ECMESND+33, ECMESND+34, ECMESND+49, ECMESND+50, REVERSE~, REVERSE+27
NDCACT	ECMESND+21~, ECMESND+29, ECMESND+30, ECMESND+69
NOACT	REVERSE+11~, REVERSE+19, REVERSE+20, REVERSE+26
OVRC	ECMESND~, ECMESND+40, ECMESND+49, ECMESND+68
PA	ECMESND~, ECMESND+43, ECMESND+44, ECMESND+49
PPDU	ECMESND+34*!
PSOELIG	ECMESND+21~, ECMESND+54*, ECMESND+75, ECMESND+80, STS+5
PSOTRIC	REVERSE+24~*, REVERSE+27
RESP	ECMESND~, ECMESND+24, ECMESND+26, ECMESND+49, ECMESND+54, ECMESND+70, ECMESND+71, ECMESND+72, ECMESND+73, ECMESND+74 , ECMESND+78, ECMESND+80, REVERSE+11~, REVERSE+23, REVERSE+27, STS+4
REVECME	REVERSE+11~, REVERSE+22, REVERSE+23, REVERSE+26
RFAR	RELEASE+5~
RFAR(	RELEASE+18, RELEASE+19
RFL	ECMESND~, ECMESND+22, ECMESND+24, ECMESND+26, ECMESND+30, ECMESND+32, ECMESND+33, ECMESND+34, ECMESND+36, ECMESND+44 , ECMESND+49, ECMESND+50, ECMESND+52, ECMESND+54, ECMESND+58, ECMESND+59, ECMESND+60, ECMESND+61, ECMESND+62, ECMESND+63 , ECMESND+64, ECMESND+70, ECMESND+71, ECMESND+76, ECMESND+80, REVERSE~, REVERSE+9, REVERSE+10, REVERSE+15, REVERSE+16 , REVERSE+18, REVERSE+19, REVERSE+22, REVERSE+23, REVERSE+24, REVERSE+27, REVERSE+28, DOS~, DOS+5, DOS+7 , DOS+9, RELEASE~, RELEASE+6, RELEASE+12, RELEASE+13, RELEASE+14, RELEASE+16, RELEASE+17, RELEASE+18, RELEASE+19 , ECMEACT~, ECMEACT+5*, ECMEACT+6, STS~, STS+2, STS+5
ROUTE	ECMESND+57~, ECMESND+58, ECMESND+59, ECMESND+60
RSN	REVERSE~, REVERSE+11*, REVERSE+12, REVERSE+13, REVERSE+14, REVERSE+15, REVERSE+18
RSP	STS~, STS+3, STS+4, STS+5
RTXT	REVERSE~, REVERSE+11, REVERSE+12, REVERSE+13, REVERSE+14*, REVERSE+15, REVERSE+23, REVERSE+27
RVTX	ECMESND~, ECMESND+47*, ECMESND+49, ECMESND+67, ECMESND+80
RX	ECMESND~, ECMESND+22, ECMESND+24, ECMESND+26, ECMESND+30, ECMESND+32, ECMESND+33, ECMESND+34, ECMESND+36, ECMESND+44 , ECMESND+49, ECMESND+50, ECMESND+52, ECMESND+54, ECMESND+58, ECMESND+59, ECMESND+60, ECMESND+61, ECMESND+62, ECMESND+63 , ECMESND+64, ECMESND+70, ECMESND+71, ECMESND+76, ECMESND+80, REVERSE~, REVERSE+9, REVERSE+10, REVERSE+15, REVERSE+16 , REVERSE+18, REVERSE+19, REVERSE+22, REVERSE+23, REVERSE+24, REVERSE+27, REVERSE+28, DOS~, DOS+5, DOS+7 , DOS+9, RELEASE~, RELEASE+6, RELEASE+8, RELEASE+9, RELEASE+10, RELEASE+11, RELEASE+12, RELEASE+13, RELEASE+15 , RELEASE+17, RELEASE+18, RELEASE+19, LSTRFL~, LSTRFL+4, ECMEACT~, ECMEACT+5, ECMEACT+6, STS~, STS+2 , STS+5
RXAR	RELEASE+5~
RXAR(52	RELEASE+9, RELEASE+10, RELEASE+12, RELEASE+15
STAT	ECMESND+46~, REVERSE+11~
STATUS	REVERSE+11~, REVERSE+19*, REVERSE+20
STS	REVERSE+11~, STS+1~, STS+2, STS+3, STS+4, STS+5, STS+6
USR	RELEASE~, RELEASE+7*, RELEASE+11, ECMEACT~, ECMEACT+6
X	ECMESND+57~, ECMESND+59, ECMESND+60, ECMESND+61, ECMESND+62, ECMESND+63, ECMESND+64, ECMESND+65, ECMESND+66, ECMESND+67 , ECMESND+68, ECMESND+69

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOBPSU1

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 50

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: