Routine: PSOPFSU1

Information

PSOPFSU1 ;BIR/LE,AM - PFSS Charge Message & Utilities ;29-May-2012 15:04;PLS

Source Information

Source file <PSOPFSU1.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Outpatient Pharmacy	4	ACTLOG^PSOCPA (MSG,MSGNOCAN)^PSOCPB $$NDC^PSOHDR ($$CHLOC,$$GACT)^PSOPFSU0
Integrated Billing	1	($$CHARGE,$$GETCHGID,$$SWSTAT)^IBBAPI
Pharmacy Data Management	1	DATA^PSS50
VA Fileman	1	($$GET1,GETS)^DIQ

Caller Graph

Caller Graph Total: 5

Package	Total	Caller Graph
Outpatient Pharmacy	5	PSOCP PSOCPA PSOCPB PSOHLNE3 PSOHLNE4

Entry Points

Name	Comments	DBIA/ICR reference
PFSI(PSODA,PSOREF)	;get PFSS Acct Ref and Charge ID and store in PSOPFS; Called from multiple places in this routine
PFSA(PSODA,PSOREF,WR)	;called from PSOCP (WR=2) and PSOCPB (WR=3)
CHRG(PSORXN,PSOREF,PSOCHTYP,PSOPFS)	;ENTRY POINT:
CHRGRF	;Retrieve charge fields for refills
CG	;Called from PSOCPB; for the last fill, send chrg message if released; PSOCPB too large for more code. ; this is used for SC/EI changes when no charges are cancelled. Expects to have PSODA = RXIEN and PSOLFIL= fill#
GOC	;Called from CHRGOF, CHRGRF. Parse OP classifications and ICD's. Don't send null values.
LF(PSODA)	;return last fill number;CALLED from PSOCPB
PFS	;;Called from PSOCPB; PSOCPB is too large to hold more code. Processes copay cancels for PFS only.
CHRGOF	;Retrieve charge fields for orig fills

External References

Name	Field # of Occurrence
$$GET1^DIQ	CHRG+39
GETS^DIQ	CHRG+33, CHRGOF+1, CHRGRF+1, GOC+1
$$CHARGE^IBBAPI	CHRG+44
$$GETCHGID^IBBAPI	CHRG+25
$$SWSTAT^IBBAPI	PFSA+3
ACTLOG^PSOCPA	PFS+19
MSG^PSOCPB	PFS+19, PFS+20
MSGNOCAN^PSOCPB	PFS+15
$$NDC^PSOHDR	CHRG+34
$$CHLOC^PSOPFSU0	CHRG+12
$$GACT^PSOPFSU0	CHRG+18
DATA^PSS50	CHRG+36

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSRX - [#52]	GETS^DIQ
52.1	GETS^DIQ
^PS(53 - [#53]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PSRX - [#52]	CHRG+26, CHRG+27, LF+2, PFSI+1, PFSI+2
^TMP($J	CHRG+38, CHRG+40, CHRG+41, CHRG+46!

Label References

Name	Line Occurrences
CHRG	PFS+19
CHRGOF	CHRG+30
CHRGRF	CHRG+31
GOC	CHRGOF+6, CHRGRF+6
PFSI	CHRG+17, PFSA+4, PFS+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CANTYPE	PFS+15, PFS+19, PFS+20
CLDIV	CHRG+7~, CHRG+12*, CHRG+13
I	CHRG+7~, CHRGOF+3, CHRGRF+3, GOC+2, GOC+3, GOC+4, GOC+5, PFS+3~, PFS+8, PFS+9 , PFS+10, PFS+11, PFS+12, PFS+13, PFS+14
IFN	CHRG+7~
J	CHRG+7~, GOC+4*, GOC+5
LF	LF+1~, LF+2*
PREA	PFS+3~, PFS+18*
>> PSOCAN	PFS+20
>> PSOCAN(	PFS+8, PFS+9, PFS+10!, PFS+11!, PFS+12, PFS+13!, PFS+14!
PSOCHG	CHRG+7~, CHRG+44*
PSOCHID	CHRG+7~, CHRG+23, CHRG+25, CHRG+26, CHRG+27, CHRG+28, CHRG+44
PSOCHTYP	CHRG~, CHRG+38, CHRG+44
PSODA	LF~, LF+2, PFSI~, PFSI+1, PFSI+2, PFSA~, PFSA+4, PFS+9, PFS+12, PFS+19
PSODFN	CHRG+7~, CHRG+35*, CHRG+44
PSODG	CHRG+7~, CHRG+44, GOC+6*
PSODG(	GOC+3*
PSODRG	CHRG+7~, CHRG+35*, CHRG+36, CHRG+38, CHRG+40, CHRG+41
PSODRUG	CHRG+7~
PSOFD	CHRG+7~, CHRGOF+2, CHRGOF+3, CHRGRF+2, CHRGRF+3
PSOFLD	CHRG+7~, CHRGOF+3, CHRGRF+3
PSOFT	CHRG+7~, CHRG+30*, CHRGOF+3, CHRGRF+3
PSOFT1	CHRG+7~, CHRG+44
PSOFT1(	CHRGOF+3, CHRGRF+3
PSOFT1(10	CHRGOF+5, CHRGRF+5
PSOFT1(13	CHRG+38*
PSOFT1(18	CHRG+39*
PSOFT1(22	CHRG+40*
PSOFT1(29	CHRG+34, CHRG+40
PSOFT1(31	CHRG+35*
PSOFT1(6	CHRG+38*
PSOFT1(7	CHRG+38*
PSONW	PFS+3~
PSOOLD	PFS+3~
PSOPFS	CHRG~, CHRG+9, CHRG+16, CHRG+17, CHRG+23, PFSI+1, PFSI+2, PFSA+3, PFSA+7, PFS+19*
PSOPFSA	CHRG+7~, CHRG+16, CHRG+17, CHRG+18, CHRG+19, CHRG+44, CHRGOF+4, CHRGRF+4, PFS+21
PSOREF	CHRG~, CHRG+17, CHRG+18, CHRG+26, CHRG+27, CHRG+30, CHRG+31, CHRG+34, CHRG+41, CHRGRF+1 , CHRGRF+3, CHRGRF+4, CHRGRF+5, PFSI~, PFSI+1, PFSI+2, PFSA~, PFSA+4, PFS+3~, PFS+8* , PFS+9, PFS+12, PFS+14, PFS+18, PFS+19
>> PSORSN	PFS+11, PFS+14
PSORX	CHRG+7~
PSORX(	CHRGRF+3, CHRGRF+4, CHRGRF+5, GOC+2, GOC+3, GOC+4, GOC+5
PSORX(52	CHRG+35, CHRG+39, CHRGOF+3, CHRGOF+4, CHRGOF+5
PSORXE	CHRG+7~, CHRG+44
PSORXE(1	CHRGOF+5, CHRGRF+5
PSORXE(15	CHRG+43*
PSORXE(17	CHRG+41*
PSORXE(18	CHRG+42, CHRGOF+4, CHRGRF+4*
PSORXE(31	CHRG+41*
PSORXN	CHRG~, CHRG+17, CHRG+18, CHRG+26, CHRG+27, CHRG+33, CHRG+34, CHRG+35, CHRG+39, CHRG+43 , CHRGOF+1, CHRGOF+3, CHRGOF+4, CHRGOF+5, CHRGRF+1, CHRGRF+3, CHRGRF+4, CHRGRF+5, GOC+1, GOC+2 , GOC+3, GOC+4, GOC+5
PSOZCL	CHRG+7~, CHRG+44, GOC+6*
PSOZCL(	GOC+5*
>> RELDT	CHRG+42
WR	PFSA~, PFSA+2, PFSA+7
X	PFS+3~, PFS+15
X(	PFS+14*, PFS+19
X(0	PFS+11*

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOPFSU1

Call Graph Total: 7

Caller Graph Total: 5