Routine: BAREDI01

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

Package	Total	Caller Graph
IHS Accounts Receivable	3	BARED0Z BAREDI00 BAREDLM1

Package

Total

Caller Graph

IHS Accounts Receivable

BARED0Z BAREDI00 BAREDLM1

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

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

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

Customize PDF page

Package: IHS Accounts Receivable

Routine: BAREDI01

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: