Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSOPFSU1

Package: Outpatient Pharmacy

Routine: PSOPFSU1


Information

PSOPFSU1 ;BIR/LE,AM - PFSS Charge Message & Utilities ;08/09/93

Source Information

Source file <PSOPFSU1.m>

Call Graph

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

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Outpatient Pharmacy 6 PSOCP  PSOCPA  PSOCPB  PSOCPF1  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+38
GETS^DIQ CHRG+32, CHRGOF+1, CHRGRF+1, GOC+1
$$CHARGE^IBBAPI CHRG+43
$$GETCHGID^IBBAPI CHRG+24
$$SWSTAT^IBBAPI PFSA+3
ACTLOG^PSOCPA PFS+19
MSG^PSOCPB PFS+19, PFS+20
MSGNOCAN^PSOCPB PFS+15
$$NDC^PSOHDR CHRG+33
$$CHLOC^PSOPFSU0 CHRG+11
$$GACT^PSOPFSU0 CHRG+17
DATA^PSS50 CHRG+35

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+25*, CHRG+26*, LF+2, PFSI+1, PFSI+2
^TMP($J CHRG+37, CHRG+39, CHRG+40, CHRG+45!

Label References

Name Line Occurrences
CHRG PFS+19
CHRGOF CHRG+29
CHRGRF CHRG+30
GOC CHRGOF+6, CHRGRF+6
PFSI CHRG+16, 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+6~, CHRG+11*, CHRG+12
I CHRG+6~, 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+6~
J CHRG+6~, 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+6~, CHRG+43*
PSOCHID CHRG+6~, CHRG+22*, CHRG+24*, CHRG+25, CHRG+26, CHRG+27, CHRG+43
PSOCHTYP CHRG~, CHRG+37, CHRG+43
PSODA LF~, LF+2, PFSI~, PFSI+1, PFSI+2, PFSA~, PFSA+4, PFS+9, PFS+12, PFS+19
PSODFN CHRG+6~, CHRG+34*, CHRG+43
PSODG CHRG+6~, CHRG+43, GOC+6*
PSODG( GOC+3*
PSODRG CHRG+6~, CHRG+34*, CHRG+35, CHRG+37, CHRG+39, CHRG+40
PSODRUG CHRG+6~
PSOFD CHRG+6~, CHRGOF+2*, CHRGOF+3, CHRGRF+2*, CHRGRF+3
PSOFLD CHRG+6~, CHRGOF+3*, CHRGRF+3*
PSOFT CHRG+6~, CHRG+29*, CHRGOF+3, CHRGRF+3
PSOFT1 CHRG+6~, CHRG+43
PSOFT1( CHRGOF+3*, CHRGRF+3*
PSOFT1(10 CHRGOF+5, CHRGRF+5
PSOFT1(13 CHRG+37*
PSOFT1(18 CHRG+38*
PSOFT1(22 CHRG+39*
PSOFT1(29 CHRG+33*, CHRG+39*
PSOFT1(31 CHRG+34*
PSOFT1(6 CHRG+37*
PSOFT1(7 CHRG+37*
PSONW PFS+3~
PSOOLD PFS+3~
PSOPFS CHRG~, CHRG+8, CHRG+15, CHRG+16, CHRG+22, PFSI+1*, PFSI+2*, PFSA+3*, PFSA+7*, PFS+19*
PSOPFSA CHRG+6~, CHRG+15*, CHRG+16*, CHRG+17*, CHRG+18, CHRG+43, CHRGOF+4*, CHRGRF+4*, PFS+21*
PSOREF CHRG~, CHRG+16, CHRG+17, CHRG+25, CHRG+26, CHRG+29, CHRG+30, CHRG+33, CHRG+40, 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+6~
PSORX( CHRGRF+3, CHRGRF+4, CHRGRF+5, GOC+2, GOC+3, GOC+4, GOC+5
PSORX(52 CHRG+34, CHRG+38, CHRGOF+3, CHRGOF+4, CHRGOF+5
PSORXE CHRG+6~, CHRG+43
PSORXE(1 CHRGOF+5*, CHRGRF+5*
PSORXE(15 CHRG+42*
PSORXE(17 CHRG+40*
PSORXE(18 CHRG+41*, CHRGOF+4*, CHRGRF+4*
PSORXE(31 CHRG+40*
PSORXN CHRG~, CHRG+16, CHRG+17, CHRG+25, CHRG+26, CHRG+32, CHRG+33, CHRG+34, CHRG+38, CHRG+42
, 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+6~, CHRG+43, GOC+6*
PSOZCL( GOC+5*
>> RELDT CHRG+41
WR PFSA~, PFSA+2, PFSA+7
X PFS+3~, PFS+15
X( PFS+14*, PFS+19
X(0 PFS+11*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All