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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BAR50I01

Package: IHS Accounts Receivable

Routine: BAR50I01


Information

BAR50I01 ; IHS/SD/LSL - EDI TRANSPORT ;

Source Information

Source file <BAR50I01.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
IHS VA Utilities 4 ^XBDBQUE  ($$DIC,$$VAL)^XBDIQ1  $$DIR^XBDIR  VIEWR^XBLM  
VA Fileman 4 ^DDS  ^DIC  ^DIE  ^DIR  
IHS Accounts Receivable 1 $$EN^BARVDF  
Registration 1 (CLEAR,FULL)^VALM1  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Accounts Receivable 3 BAR500Z  BAR50I00  BAR50LM1  

Entry Points

Name Comments DBIA/ICR reference
EDTELEM ;EP EDIT ELEMENTS
EDTPROV ;EP EDIT PROVIDER LEVEL CODES
DICSTYP ;EP Set DIC("S") for selection of postable CATEGORY/TYPE tables
SELTAB(X)
EDTLINE ;EP EDIT LINE LEVEL CODES
SETTAB ;EP Set Table names of data types that are tables to SEG_"-"_ELEMENT
; ie field #1 of element & add forward & backward pointer values
TABNM() ;EP RETURN A TABLE NAME FOR TABLE ELEMENT DATA TYPES
VARPRT ;EP XBLM CALL FOR VARPRT
DEMOG ;EP EDIT DEMOGRAPHICS OF TRANSPORT
DEVE
PRTVARS ;EP PRINT VARIABLES LOCATED IN THE TRANPORT
EDTVROU ;EP EDIT VARIABLE ROUTINES
PRT ;EP
; GET DEVICE (QUEUEING ALLOWED)
EDTCLAIM ;EP EDIT CLAIM LEVEL CODES
GENTAB ;EP SCAN ELEMENTS AND GENERATE TABLE NAMES
EDTSEG ;EP EDIT SEGMENTS
EDTTAB ;EP EDIT Entries of a Table
DICSREA ;EP Set DIC("S") for selection of reasons based on the Posting CATEGORY/TYPE selected
SELTRAN() ;EP SELECT TRANSPORT
EDTDATA ;EP EDIT DATA TYPES & CONVERSIONS
ENDJOB ;
SELSEG(X)

External References

Name Field # of Occurrence
$$EN^BARVDF PRT+11
^DDS EDTELEM+9, EDTTAB+9, EDTCLAIM+6, EDTLINE+6, EDTPROV+6, EDTVROU+6, EDTDATA+3, EDTSEG+6
^DIC SELTRAN+6, SELSEG+8, SELTAB+8, SETTAB+13
^DIE DEMOG+6, SETTAB+18, SETTAB+25
^DIR DEVE+11
CLEAR^VALM1 PRT+12
FULL^VALM1 PRT+10
^XBDBQUE DEVE+7
$$DIC^XBDIQ1 SELSEG+4, SELTAB+4, DEMOG+4, SETTAB+5, SETTAB+20
$$VAL^XBDIQ1 SELSEG+3, SELTAB+3, TABNM+3, TABNM+4, GENTAB+4, GENTAB+9
$$DIR^XBDIR PRT+2
VIEWR^XBLM PRT+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Transport: ",$$VAL^XBDIQ1(90056.01,X,.01)
  • Line Location: SELSEG+3
Function Call: WRITE
  • Prompt: @IOF,!,"Transport: ",$$VAL^XBDIQ1(90056.01,X,.01)
  • Line Location: SELTAB+3
Function Call: WRITE
  • Prompt: !,"TABLE ID NOT SET - EXITING",!
  • Line Location: GENTAB+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: GENTAB+8
Function Call: WRITE
  • Prompt: !,$$VAL^XBDIQ1(90056.01,TRANDA,01),!
  • Line Location: GENTAB+9
Function Call: WRITE
  • Prompt: !,"NO SEGMENTS - EXITING",!
  • Line Location: GENTAB+11
Function Call: WRITE
  • Prompt: !,"TABLES ALREADY EXIST - EXITING",!
  • Line Location: GENTAB+14
Function Call: WRITE
  • Prompt: !,"HM .. CHECK FAILED"
  • Line Location: GENTAB+16
Function Call: WRITE
  • Prompt: !,?10,X
  • Line Location: SETTAB+11
Function Call: WRITE
  • Prompt: $$EN^BARVDF("IOF")
  • Line Location: PRT+11
Routine Call
  • DIE
  • Line Location:
    • DEMOG+6
    • SETTAB+18
    • SETTAB+25
Routine Call
  • DDS
  • Line Location:
    • EDTELEM+9
    • EDTTAB+9
    • EDTCLAIM+6
    • EDTLINE+6
    • EDTPROV+6
    • EDTVROU+6
    • EDTDATA+3
    • EDTSEG+6
Routine Call
  • DIC
  • Line Location:
    • SELTRAN+6
    • SELSEG+8
    • SELTAB+8
    • SETTAB+13
Routine Call
  • DIR
  • Line Location:
    • DEVE+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BAREDI("1T" - [#90056.01] GENTAB+10, GENTAB+13

Label References

Name Line Occurrences
$$SELSEG EDTELEM+3
$$SELTAB EDTTAB+3
$$SELTRAN DEMOG+2, PRTVARS+2, EDTELEM+2, EDTTAB+2, EDTCLAIM+2, EDTLINE+2, EDTPROV+2, EDTVROU+2, EDTDATA+2, EDTSEG+2
, GENTAB+1
VARPRT PRTVARS+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BARIOSL PRT+7*, DEVE+1, DEVE+2!
DA SELSEG+1~, SELTAB+1~, DEMOG+3*, EDTELEM+4*, EDTTAB+4*, EDTCLAIM+3*, EDTLINE+3*, EDTPROV+3*, EDTVROU+3*, EDTDATA+3*
, EDTSEG+3*, SETTAB+4!, SETTAB+14*, SETTAB+19!, SETTAB+21*, SETTAB+26!, PRT+3!
DA(1 SELSEG+2*, SELTAB+2*, EDTELEM+5*, EDTTAB+5*, SETTAB+9*, SETTAB+22*
DA(2 SETTAB+23*
DD SELTRAN+5!, SELSEG+7!, SELTAB+7!, SETTAB+12!
>> DDSFILE EDTELEM+7*, EDTTAB+7*, EDTCLAIM+4*, EDTLINE+4*, EDTPROV+4*, EDTVROU+4*, EDTDATA+3*, EDTSEG+4*
>> DDSFILE(1 EDTELEM+8*, EDTTAB+8*
DIC SELTRAN+1~, SELTRAN+2*, SELSEG+1~, SELSEG+4*, SELTAB+1~, SELTAB+4*, SETTAB+4!, SETTAB+5*, SETTAB+16, SETTAB+19!
, SETTAB+26!
DIC("P" SETTAB+8*
DIC("S" DICSTYP+1*, DICSREA+1*
DIC(0 SELTRAN+3*, SELSEG+5*, SELTAB+5*, SETTAB+6*
DIE DEMOG+4*, SETTAB+16*, SETTAB+19!, SETTAB+20*, SETTAB+26!
DIR DEVE+8!, DEVE+12!
DIR("A" DEVE+10*
DIR(0 DEVE+9*
>> DIRUT PRT+4
>> DLAYGO SELTRAN+4*, SELSEG+6*, SELTAB+6*, SETTAB+7*
DO SELTRAN+5!, SELSEG+7!, SELTAB+7!, SETTAB+12!
DR DEMOG+5*, EDTELEM+6*, EDTTAB+6*, EDTCLAIM+5*, EDTLINE+5*, EDTPROV+5*, EDTVROU+5*, EDTDATA+3*, EDTSEG+5*, SETTAB+4!
, SETTAB+17*, SETTAB+19!, SETTAB+24*, SETTAB+26!
>> ELEM( SETTAB+3, SETTAB+10
>> ELEMDA SETTAB+2*, SETTAB+3*, SETTAB+10, SETTAB+15, SETTAB+21
IOF SELSEG+3, SELTAB+3, GENTAB+8
IOSL PRT+7, PRT+8*, DEVE+1*
>> SEGDA SETTAB+15, SETTAB+22
TABDA SETTAB+14*, SETTAB+24, SETTAB+26!
>> TABID GENTAB+4*, GENTAB+5
>> TRANDA GENTAB+3*, GENTAB+4, GENTAB+9, GENTAB+10, GENTAB+13, SETTAB+9, SETTAB+15, SETTAB+23, SETTAB+24
>> TRDA PRTVARS+3*
>> VAL SETTAB+15*
VALM PRT+13!
VALMAR PRT+13!
VALMBCK PRT+13!
VALMBG PRT+13!
VALMCAP PRT+13!
VALMCNT PRT+13!
VALMCOFF PRT+15!
VALMCON PRT+14!
VALMDN PRT+14!
VALMEVL PRT+14!
VALMIOXY PRT+14!
VALMKEY PRT+13!
VALMLFT PRT+14!
VALMLST PRT+14!
VALMMENU PRT+14!
VALMOFF PRT+13!
VALMSGR PRT+14!
VALMUP PRT+14!
VALMY PRT+15!
X SELSEG~, SELSEG+2, SELSEG+3, SELTAB~, SELTAB+2, SELTAB+3, TABNM+2~, TABNM+3*, TABNM+4*, TABNM+5
, SETTAB+10*, SETTAB+11
X1 DEMOG+1~, DEMOG+2*, DEMOG+3, PRTVARS+1~, PRTVARS+2*, PRTVARS+3, EDTELEM+1~, EDTELEM+2*, EDTELEM+3, EDTELEM+5
, EDTTAB+1~, EDTTAB+2*, EDTTAB+3, EDTTAB+5, EDTCLAIM+1~, EDTCLAIM+2*, EDTCLAIM+3, EDTLINE+1~, EDTLINE+2*, EDTLINE+3
, EDTPROV+1~, EDTPROV+2*, EDTPROV+3, EDTVROU+1~, EDTVROU+2*, EDTVROU+3, EDTDATA+1~, EDTDATA+2*, EDTDATA+3, EDTSEG+1~
, EDTSEG+2*, EDTSEG+3
X2 EDTELEM+1~, EDTELEM+3*, EDTELEM+4, EDTTAB+1~, EDTTAB+3*, EDTTAB+4
>> XBFLD("BROWSE" PRT+6*
>> XBNS DEVE+5*
>> XBRP DEVE+4*
>> XBRX DEVE+6*
XQORNEST PRT+13!
XQORS PRT+15!
XQORSPEW PRT+15!
Y SELTRAN+1~, SELTRAN+7, SELSEG+1~, SELSEG+9, SELTAB+1~, SELTAB+9, GENTAB+1*, GENTAB+2, GENTAB+3, SETTAB+14
, PRT+2*, PRT+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All