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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BARUP

Package: IHS Accounts Receivable

Routine: BARUP


Information

BARUP ; IHS/SD/LSL - UPLOAD BILL FROM 3P ;

Source Information

Source file <BARUP.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS Accounts Receivable 2 ^BARBLCN  (MSGTX,UPLOAD)^BARUP1  
VA Fileman 2 ^DIC  FILE^DICN  
IHS Patient 1 $$BEN^AUPNPAT1  
IHS VA Utilities 1 EN^XBNEW  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Third Party Billing 3 ABMAPAS1  ABMAPASS  ABMDPAY  

Entry Points

Name Comments DBIA/ICR reference
PATDATA ;** patient data from patient file
GETPRV ;** primary provider
SET ;EP - set up variables
GETTYP ;** bill type from file ^BAR(90052.01
SETACC(BARACC) ;EP - establish record in A/R FACILITY ACCOUNT file
GETACC ;** a/r facility account
GETPAR ;** visit location comes from #.03 of 3p bill file
GETSTAT ;** bill status = open
INIT ;
ERRMSG(BARERR) ;P.OTTIS HEAT # 73895 - DISPLAY BARERR TYPE BAR*1.8*23
NEW0 ;
INSORD ;
TPB(BAR3PUP)
CHECK ;
GETSERV ;** hospital service section

External References

Name Field # of Occurrence
$$BEN^AUPNPAT1 PATDATA+10
^BARBLCN CHECK+3
MSGTX^BARUP1 CHECK+11
UPLOAD^BARUP1 CHECK+7
^DIC GETSTAT+5
FILE^DICN SETACC+11
EN^XBNEW INIT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$ZN," ",DA
  • Line Location: GETPAR+7
Function Call: WRITE
  • Prompt: !,"A bill could not be created in A/R. Reason:"
  • Line Location: ERRMSG+1
Function Call: WRITE
  • Prompt: !,"Parent site not defined in: Site Parameter File"
  • Line Location: ERRMSG+2
Function Call: WRITE
  • Prompt: !,"Satellite site not defined in: Parent/Satellit File"
  • Line Location: ERRMSG+3
Function Call: WRITE
  • Prompt: !,"Parent/Satellite marked as 'not usable'"
  • Line Location: ERRMSG+4
Function Call: WRITE
  • Prompt: !,"'Date of Service' is before the 'visit location activated date'"
  • Line Location: ERRMSG+5
Function Call: WRITE
  • Prompt: !,"'Date of Service' is AFTER the 'visit location closed date'"
  • Line Location: ERRMSG+6
Routine Call
  • DIC
  • Line Location:
    • GETSTAT+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BARTBL - [#90052.02] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" PATDATA+9
^AUPNPAT - [#9000001] PATDATA+5
^BAR(90052.05 GETPAR+9, GETPAR+10, GETPAR+12, GETPAR+14, GETPAR+15
^BAR(90052.06 GETPAR+6, GETPAR+8, GETPAR+35
^BARAC( GETACC+3, INSORD+7
^BARTMP("BARUP" GETPAR+21, GETPAR+24, GETPAR+26*
^DIC(49 - [#49] GETSERV+1
^DPT - [#2] PATDATA+4

Label References

Name Line Occurrences
$$SETACC GETACC+4, INSORD+8
ERRMSG GETPAR+16
GETPRV PATDATA+3
SET CHECK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BAR3PUP TPB~, TPB+2, CHECK+2, CHECK+3, CHECK+10, GETPAR+3, GETPAR+12, GETPAR+14, GETPAR+23, GETPAR+26
, GETACC+1, GETACC+2, GETTYP+1, INSORD+1, INSORD+2, INSORD+3, PATDATA+2, PATDATA+5, GETPRV+1
BARACC GETACC+1*, GETACC+2*, GETACC+3, GETACC+4, INSORD+6*, INSORD+7, INSORD+8, SETACC~, SETACC+4
>> BARACEIN GETACC+3*, GETACC+4*
BARACODA INSORD+7*, INSORD+8*, INSORD+9, SETACC+1~, SETACC+13*, SETACC+14
>> BARBLTYP GETTYP+1*
BARDUZ2 TPB+3~, CHECK+1*, CHECK+12, CHECK+13!
BARERR GETPAR+5*, GETPAR+8*, GETPAR+9*, GETPAR+10*, GETPAR+12*, GETPAR+14*, GETPAR+15*, GETPAR+16, GETPAR+24*, GETPAR+25*
, GETPAR+26, GETPAR+27, ERRMSG~, ERRMSG+2, ERRMSG+3, ERRMSG+4, ERRMSG+5, ERRMSG+6, ERRMSG+7
BARGO CHECK+4!, CHECK+6, GETPAR+36*
>> BARHRN PATDATA+1*, PATDATA+5*
>> BARMIEN CHECK+9*, CHECK+10*
>> BARPAR GETPAR+4*, GETPAR+6, GETPAR+15*, GETPAR+16, GETPAR+21, GETPAR+30, GETPAR+35
>> BARPBEN PATDATA+1*, PATDATA+7*, PATDATA+10*, PATDATA+11*
>> BARPRV GETPRV+1*
>> BARPTDA PATDATA+2*, PATDATA+3, PATDATA+4, PATDATA+5, PATDATA+10
>> BARPTYP PATDATA+6*
>> BARSAT GETPAR+3*, GETPAR+9, GETPAR+10, GETPAR+12, GETPAR+14, GETPAR+15
>> BARSERV GETSERV+1*
>> BARSSN PATDATA+1*, PATDATA+4*
>> BARSTAT GETSTAT+7*
>> BARTMP1( INSORD+5, INSORD+6, INSORD+9*
>> BARTMP1(205 INSORD+1*
>> BARTMP1(206 INSORD+2*
>> BARTMP1(207 INSORD+3*
>> BARTOC PATDATA+1*
>> BARTYP PATDATA+1*
D GETSTAT+4!
>> DA GETPAR+5*, GETPAR+6*, GETPAR+8, GETPAR+9, GETPAR+10, GETPAR+12, GETPAR+14, GETPAR+15
DD SETACC+10!
DIC GETSTAT+1~, GETSTAT+2*, GETSTAT+6!, SETACC+1~, SETACC+2*, SETACC+12!
DIC("DR" SETACC+5*, SETACC+6*, SETACC+7*, SETACC+8*
DIC("S" GETSTAT+3*
DIC(0 GETSTAT+2*, SETACC+3*
DLAYGO SETACC+9*, SETACC+12!
DO GETSTAT+4!, SETACC+10!
DUZ(2 CHECK+1, CHECK+12*, GETPAR+30*, GETACC+3, INSORD+7
>> J INSORD+4*, INSORD+5, INSORD+6, INSORD+9
U GETPAR+10, GETPAR+12, GETPAR+14, GETPAR+15, GETPAR+26, GETPAR+35, PATDATA+4, PATDATA+5
>> X CHECK+2*, GETSTAT+2*, PATDATA+8*, SETACC+4*
>> Y GETSTAT+7, SETACC+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All