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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BARUTL0

Package: IHS Accounts Receivable

Routine: BARUTL0


Information

BARUTL0 ; IHS/SD/LSL - Utility programs for user/fac ;

Source Information

Source file <BARUTL0.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIE  ^DIR  
IHS Accounts Receivable 1 EOP^BARUTL  
IHS VA Utilities 1 ($$DIC,$$VAL,EN,ENM)^XBDIQ1  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
IHS Accounts Receivable 6 BAR SERVICE/SECTION  BARDMU  BARMPAS  BARPPY02  BARPPY1A  BARUTL  

Entry Points

Name Comments DBIA/ICR reference
BARSPAR ;EP setup BARSPAR( A/R Site Parameter array
ADDREGON ;EP add a regional site (needs DUZ(2))
HOSPSRVC ;
EADD ;
BARPSAT ;EP built BARPS arrary with Parent Satellite
BARUSR ;EP setup BARUSR( user array from DUZ:200
BARSITE ;EP setup BARSITE( site array
SRVSEC ;EP switch Service Section
EFNUM ;----------
ARSPAC ;set up two special A/R accounts
FNUM ;;$T filenumber to be regionally added/deleted

External References

Name Field # of Occurrence
EOP^BARUTL ADDREGON+9, ADDREGON+18, HOSPSRVC+18
^DIC BARUSR+15, ARSPAC+7, HOSPSRVC+7, HOSPSRVC+14, SRVSEC+6
^DIE SRVSEC+13
^DIR ADDREGON+14
$$DIC^XBDIQ1 ARSPAC+2
$$VAL^XBDIQ1 SRVSEC+11
EN^XBDIQ1 BARUSR+8, BARSPAR+8, BARSITE+7, ADDREGON+6
ENM^XBDIQ1 BARPSAT+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?5,BARTMP(.01)," EXISTS"
  • Line Location: ADDREGON+8
Function Call: WRITE
  • Prompt: !,"You can change your Default A/R Facility and return here if necessary!",!
  • Line Location: ADDREGON+16
Function Call: WRITE
  • Prompt: !,"ADDED: ",?10,$P(@BARGL,U)
  • Line Location: ADDREGON+26
Function Call: WRITE
  • Prompt: !!,BARTMP(.01)," Has been added",!
  • Line Location: ADDREGON+27
Function Call: WRITE
  • Prompt: !,"ERROR IN SETUP OF UN-ALLOCATED"
  • Line Location: ARSPAC+10
Function Call: WRITE
  • Prompt: !,"ERROR IN SETUP OF BUSINESS OFFICE",!
  • Line Location: HOSPSRVC+10
Function Call: WRITE
  • Prompt: !,"ERROR IN SETUP OF FISCAL SERVICE",!
  • Line Location: HOSPSRVC+17
Routine Call
  • DIE
  • Line Location:
    • SRVSEC+13
Routine Call
  • DIC
  • Line Location:
    • BARUSR+15
    • ARSPAC+7
    • HOSPSRVC+7
    • HOSPSRVC+14
    • SRVSEC+6
Routine Call
  • DIR
  • Line Location:
    • ADDREGON+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^DIC(49 - [#49] Classic Fileman Calls
^BARTBL - [#90052.02] Classic Fileman Calls
^AUTTSITE - [#9999999.39] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BARBL( ADDREGON+7
^DIC - [#1] ADDREGON+23, ADDREGON+25
^DIC(49 - [#49] HOSPSRVC+4, HOSPSRVC+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BARFLNUM ADDREGON+22*, ADDREGON+23, ADDREGON+25
BARGL BARPSAT+1~, ADDREGON+23*, ADDREGON+24, ADDREGON+25*, ADDREGON+26
>> BARI ADDREGON+22*
BARPSAT BARPSAT+2!
>> BARQUIT ARSPAC+9*, HOSPSRVC+9*, HOSPSRVC+16*, HOSPSRVC+18
BARSPAR BARSPAR+2!
BARTMP ADDREGON+17!
BARTMP( ADDREGON+8, ADDREGON+13, ADDREGON+27
BARUSR BARUSR+2!
BARUSR(29 BARUSR+9, BARUSR+10, BARUSR+17*, BARUSR+18*
DA BARUSR+1~, BARUSR+7*, BARSPAR+1~, BARSPAR+5*, BARSITE+1~, BARSITE+5*, BARPSAT+1~, BARPSAT+8*, ADDREGON+5*, SRVSEC+1!
, SRVSEC+10*
DD BARUSR+14!, ARSPAC+6!, HOSPSRVC+6!, HOSPSRVC+13!, SRVSEC+5!
DIC BARUSR+1~, BARUSR+5*, BARUSR+11*, BARSPAR+1~, BARSPAR+3*, BARSITE+1~, BARSITE+2*, BARPSAT+1~, BARPSAT+3*, ADDREGON+2*
, ARSPAC+1!, ARSPAC+2*, ARSPAC+4, HOSPSRVC+1*, SRVSEC+1!, SRVSEC+2*
DIC("S" SRVSEC+4*
DIC(0 BARUSR+12*, ARSPAC+3*, HOSPSRVC+2*, SRVSEC+3*
DIDEL SRVSEC+12*, SRVSEC+14!
DIE SRVSEC+1!, SRVSEC+9*
DIQ BARUSR+1~, BARUSR+3*, BARSPAR+1~, BARSPAR+6*, BARSITE+3*, BARPSAT+4*, ADDREGON+1!, ADDREGON+3*
DIQ(0 BARUSR+4*, BARSPAR+7*, BARSITE+4*, BARPSAT+5*, BARPSAT+7*
DIR ADDREGON+10!, ADDREGON+17!
DIR("A" ADDREGON+13*
DIR("B" ADDREGON+12*
DIR(0 ADDREGON+11*
>> DLAYGO HOSPSRVC+3*
DO BARUSR+14!, ARSPAC+6!, HOSPSRVC+6!, HOSPSRVC+13!, SRVSEC+5!
DR BARUSR+6*, BARSPAR+1~, BARSPAR+4*, BARSITE+1~, BARSITE+6*, BARPSAT+1~, BARPSAT+6*, ADDREGON+4*, SRVSEC+1!, SRVSEC+11*
DUZ BARUSR+7, SRVSEC+10
DUZ(2 BARSPAR+5, ADDREGON+5, ADDREGON+7
U BARUSR+17, ADDREGON+26
>> X BARUSR+13*, ARSPAC+5*, HOSPSRVC+5*, HOSPSRVC+12*
XB BARUSR+1~, BARSPAR+1~, BARSITE+1~
Y BARUSR+16, BARUSR+17, BARUSR+18, BARPSAT+1~, ADDREGON+15, ARSPAC+8, HOSPSRVC+8, HOSPSRVC+15, SRVSEC+7, SRVSEC+8*
, SRVSEC+11

Marked Items

Name Field # of Occurrence
$T(FNUM+BARI ADDREGON+22
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  Marked Items |  All