Routine: IBTRE

Package	Total	Call Graph
Integrated Billing	8	PAT^IBCNSM $$DAT1^IBOUTL $$CDT^IBTODD1 $$PRECRT^IBTRC1 $$ADMDIAG^IBTRE6 PROT^IBTRPR ($$ROIEVT,$$ROIPAT)^IBTRR1 ($$DAY,$$MSG)^IBTUTL3
List Manager	3	EN^VALM ($$SETFLD,FULL)^VALM1 CLEAN^VALM10
Kernel	2	($$FMADD,$$FMDIFF)^XLFDT DISP^XQORM1
VA FileMan	2	DT^DICRW $$EXTERNAL^DILFD
Registration	1	(INP,PID)^VADPT

Package

Total

Call Graph

PAT^IBCNSM $$DAT1^IBOUTL $$CDT^IBTODD1 $$PRECRT^IBTRC1 $$ADMDIAG^IBTRE6 PROT^IBTRPR ($$ROIEVT,$$ROIPAT)^IBTRR1 ($$DAY,$$MSG)^IBTUTL3

List Manager

EN^VALM ($$SETFLD,FULL)^VALM1 CLEAN^VALM10

Kernel

($$FMADD,$$FMDIFF)^XLFDT DISP^XQORM1

VA FileMan

DT^DICRW $$EXTERNAL^DILFD

Registration

(INP,PID)^VADPT

Package	Total	Caller Graph
Integrated Billing	142	IB20P407 IBACCWLEE1 IBACCWLEE3 IBCA1 IBCAPR IBCAPR2 IBCB IBCC1 IBCEBUL IBCECOB2 IBCECOB4 IBCECSA2 IBCEF6 IBCEF61 IBCEF62 IBCEF83 IBCEFG3 IBCEM IBCEM01 IBCEM02 IBCEM03 IBCEM1 IBCEM3 IBCEMSG IBCEMSG1 IBCEP IBCEP0 IBCEP0A IBCEP1 IBCEP2A IBCEP4 IBCEP4A IBCEP5 IBCEP5B IBCEP5C IBCEP5D IBCEP9B IBCEQBS IBCERP1 IBCERP4 IBCERP5 IBCERPT1 IBCEU IBCEU0 IBCEU5 IBCEXTR1 IBCNBLA1 IBCNBLE IBCNBLP IBCNBLP1 IBCNBU1 IBCNRPM2 IBCNRPS2 IBCNSA1 IBCNSC01 IBCNSC1 IBCNSC2 IBCNSC4 IBCNSJ12 IBCNSJ3 IBCNSM6 IBCNSM9 IBCNSP IBCNSP0 IBCNSP01 IBCNSP3 IBCNSU2 IBCNSUR2 IBCOMD1 IBCSC102 IBCSC10H IBCSC4D IBCSC8 IBCU81 IBCVA1 IBEFUNC IBEPAR IBJPS2 IBJTBA1 IBJTCA1 IBJTED IBJTEP IBJTLA1 IBJTLB1 IBJTRA1 IBJTRX IBJTU1 IBOSCDC1 IBRBUL IBT CLAIMS TRACKING EDITOR IBT EDIT BI TRACKING ENTRY IBT EDIT HR TRACKING ENTRY IBT EDIT IR TRACKING ENTRY IBT EDIT TRACKING ENTRY IBTOBI IBTOBI1 IBTOBI2 IBTOBI3 IBTODD1 IBTODD2 IBTOSA IBTOTR IBTOUA IBTOUR4 IBTRC IBTRC3 IBTRCD IBTRCD0 IBTRCD1 IBTRD IBTRDD IBTRE DIAGNOSIS UPDATE IBTRE PROCEDURE UPDATE IBTRE PROVIDER UPDATE IBTRE0 IBTRE1 IBTRE2 IBTRE20 IBTRE3 IBTRE4 IBTRE5 IBTRED IBTRED0 IBTRED01 IBTRED1 IBTRH2 IBTRKR0 IBTRKRBA IBTRKRBD IBTRKRBR IBTRP IBTRPR01 IBTRR IBTRR1 IBTRV IBTRVD0 IBXSA21 IBXSAH1 IBXSC821 IBXSC8H1 IBYOPRE ^IBA(364.7
Kernel	2	^DIC(19 ^ORD(101
Accounts Receivable	1	RCDPEWL2

Package

Total

Caller Graph

Integrated Billing

142

IB20P407  IBACCWLEE1  IBACCWLEE3  IBCA1  IBCAPR  IBCAPR2  IBCB  IBCC1
IBCEBUL  IBCECOB2  IBCECOB4  IBCECSA2  IBCEF6  IBCEF61  IBCEF62  IBCEF83
IBCEFG3  IBCEM  IBCEM01  IBCEM02  IBCEM03  IBCEM1  IBCEM3  IBCEMSG
IBCEMSG1  IBCEP  IBCEP0  IBCEP0A  IBCEP1  IBCEP2A  IBCEP4  IBCEP4A
IBCEP5  IBCEP5B  IBCEP5C  IBCEP5D  IBCEP9B  IBCEQBS  IBCERP1  IBCERP4
IBCERP5  IBCERPT1  IBCEU  IBCEU0  IBCEU5  IBCEXTR1  IBCNBLA1  IBCNBLE
IBCNBLP  IBCNBLP1  IBCNBU1  IBCNRPM2  IBCNRPS2  IBCNSA1  IBCNSC01  IBCNSC1
IBCNSC2  IBCNSC4  IBCNSJ12  IBCNSJ3  IBCNSM6  IBCNSM9  IBCNSP  IBCNSP0
IBCNSP01  IBCNSP3  IBCNSU2  IBCNSUR2  IBCOMD1  IBCSC102  IBCSC10H  IBCSC4D
IBCSC8  IBCU81  IBCVA1  IBEFUNC  IBEPAR  IBJPS2  IBJTBA1  IBJTCA1
IBJTED  IBJTEP  IBJTLA1  IBJTLB1  IBJTRA1  IBJTRX  IBJTU1  IBOSCDC1
IBRBUL  IBT CLAIMS TRACKING EDITOR  IBT EDIT BI TRACKING ENTRY  IBT EDIT HR TRACKING ENTRY  IBT EDIT IR TRACKING ENTRY  IBT EDIT TRACKING ENTRY  IBTOBI  IBTOBI1
IBTOBI2  IBTOBI3  IBTODD1  IBTODD2  IBTOSA  IBTOTR  IBTOUA  IBTOUR4
IBTRC  IBTRC3  IBTRCD  IBTRCD0  IBTRCD1  IBTRD  IBTRDD  IBTRE DIAGNOSIS UPDATE
IBTRE PROCEDURE UPDATE  IBTRE PROVIDER UPDATE  IBTRE0  IBTRE1  IBTRE2  IBTRE20  IBTRE3  IBTRE4
IBTRE5  IBTRED  IBTRED0  IBTRED01  IBTRED1  IBTRH2  IBTRKR0  IBTRKRBA
IBTRKRBD  IBTRKRBR  IBTRP  IBTRPR01  IBTRR  IBTRR1  IBTRV  IBTRVD0
IBXSA21  IBXSAH1  IBXSC821  IBXSC8H1  IBYOPRE  ^IBA(364.7

Kernel

^DIC(19 ^ORD(101

Accounts Receivable

RCDPEWL2

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
ENQ
HDR	; -- header code
INIT	; -- init variables and list array
INITQ
BLD	; -- Build list of tracking entries
BLDQ
1	; -- build the entry
BQ
HELP	; -- help code
EXIT	; -- exit code
SET(X)	; -- set arrays
EXPAND(FILE,FIELD,VALUE)	; -- return special conditions
EXPQ
DAY(X)	; -- compute number of days approved for tracking id
ECME(IBBIL,IBNCAN)	;ECME flag

Name	Field # of Occurrence
DT^DICRW	EN+1
$$EXTERNAL^DILFD	EXPAND+4
PAT^IBCNSM	INIT+9
$$DAT1^IBOUTL	HDR+4, 1+9
$$CDT^IBTODD1	DAY+9
$$PRECRT^IBTRC1	1+19
$$ADMDIAG^IBTRE6	1+15
PROT^IBTRPR	BLD+5
$$ROIEVT^IBTRR1	1+14
$$ROIPAT^IBTRR1	HDR+3
$$DAY^IBTUTL3	DAY+8
$$MSG^IBTUTL3	BLD+6
INP^VADPT	BLD+7
PID^VADPT	HDR+1
EN^VALM	EN+3
$$SETFLD^VALM1	1+7, 1+8, 1+9, 1+10, 1+12, 1+13, 1+14, 1+15, 1+16, 1+17 , 1+18, 1+19, 1+20, 1+21
FULL^VALM1	EXIT+3
CLEAN^VALM10	EXIT+3
$$FMADD^XLFDT	INIT+7, INIT+10, INIT+11
$$FMDIFF^XLFDT	DAY+9
DISP^XQORM1	HELP+1

Name

Field # of Occurrence

EN+1

EXPAND+4

INIT+9

HDR+4, 1+9

DAY+9

1+19

1+15

BLD+5

1+14

HDR+3

DAY+8

BLD+6

BLD+7

HDR+1

EN+3

1+7, 1+8, 1+9, 1+10, 1+12, 1+13, 1+14, 1+15, 1+16, 1+17
, 1+18, 1+19, 1+20, 1+21

FULL^VALM1

EXIT+3

CLEAN^VALM10

EXIT+3

$$FMADD^XLFDT

INIT+7, INIT+10, INIT+11

$$FMDIFF^XLFDT

DAY+9

DISP^XQORM1

HELP+1

Name	Line Occurrences
Function Call: WRITE	Prompt: "." Line Location: 1+2
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	VALM Line Location: EN+3

Name

Line Occurrences

Function Call: WRITE

Prompt: "."
Line Location: 1+2

Function Call: WRITE

Prompt: !!
Line Location: HELP+1

Routine Call

VALM
Line Location:

EN+3

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	1+18, ECME+2, ECME+3
^DPT - [#2]	HDR+2
^IBE(356.6 - [#356.6]	1+8
^IBE(356.7 - [#356.7]	DAY+6
^IBT(356 - [#356]	BLD+8, BLD+16, 1+3, DAY+9
^IBT(356.2 - [#356.2]	DAY+3, DAY+4, DAY+7
^TMP("DIERR"	EXPAND+5!
^TMP("IBTRE"	INIT+2!, BLD+1!, EXIT+1!, SET+2, SET+3
^TMP("IBTREDX"	INIT+2!, BLD+1!, EXIT+1!, SET+4*
^TMP($J	INIT+6

Name

Line Occurrences (* Changed, ! Killed)

^DGCR(399 - [#399]

1+18, ECME+2, ECME+3

^DPT - [#2]

HDR+2

^IBE(356.6 - [#356.6]

1+8

^IBE(356.7 - [#356.7]

DAY+6

^IBT(356 - [#356]

BLD+8, BLD+16, 1+3, DAY+9

^IBT(356.2 - [#356.2]

DAY+3, DAY+4, DAY+7

^TMP("DIERR"

EXPAND+5!

^TMP("IBTRE"

INIT+2!, BLD+1!, EXIT+1!, SET+2*, SET+3*

^TMP("IBTREDX"

INIT+2!, BLD+1!, EXIT+1!, SET+4*

^TMP($J

INIT+6

Name	Line Occurrences
$$DAY	1+17
$$ECME	1+13
$$EXPAND	1+10, 1+20
1	BLD+9, BLD+16
BLD	INIT+8, INIT+12
EXPQ	EXPAND+3
INITQ	INIT+4, INIT+9
SET	1+22

Name

Line Occurrences

$$DAY

1+17

$$ECME

1+13

$$EXPAND

1+10, 1+20

BLD+9, BLD+16

BLD

INIT+8, INIT+12

EXPQ

EXPAND+3

INITQ

INIT+4, INIT+9

SET

1+22

Name	Field # of Occurrence
^(0	HDR+2
^(1	1+3

Name

Field # of Occurrence

^(0

HDR+2

^(1

1+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	INIT+3!
DFN	EN+2!, ENQ!, HDR+2, HDR+3, INIT+7*, BLD+6, BLD+16, EXIT+2!
DIE	INIT+3!
DNM	INIT+3!
DQ	INIT+3!
DR	INIT+3!
DT	EN+1, HDR+3, INIT+10, INIT+11
FIELD	EXPAND~, EXPAND+3, EXPAND+4
FILE	EXPAND~, EXPAND+3, EXPAND+4
>> GOTPAT	INIT+4
I	INIT+3!
I1	ENQ+1!
I3	ENQ+1!
IBAMNT	ENQ!
IBAPEAL	ENQ+1!
IBBIL	ECME~, ECME+1, ECME+2, ECME+3
IBCDFN	EN+2!, ENQ!, ENQ+1!
IBCDT	DAY+1~, DAY+9*
IBCNS	EN+2!, ENQ!
IBCNT	EN+2!, ENQ!, ENQ+1!, BLD+3, 1+5, 1+7, SET+3, SET+4
IBCUR	BLD+2~, BLD+8, BLD+15, 1+8
IBDAY	DAY+1~, DAY+3, DAY+7, DAY+8, DAY+10, DAY+11
IBDEN	ENQ+1!
IBDENIAL	ENQ+1!
IBDENT	ENQ+1!
IBDGCR	ENQ!
IBDGCRU1	ENQ!
IBETYP	ENQ!
IBETYPD	ENQ!
IBFASTXT	EN+2!, ENQ!
IBI	EN+2!, ENQ!, BLD+15, BLD+16, DAY+1~, DAY+3*, DAY+4, DAY+7
IBII	BLD+2~
IBLCNT	ENQ!
IBMAX	DAY+1~, DAY+9*, DAY+10
IBNCAN	ECME~, ECME+3
IBNEW	ENQ+1!
IBOE	ENQ+1!
IBOTB	ENQ!
IBPARNT	ENQ+1!
IBPEN	ENQ+1!
IBPENAL	ENQ+1!
IBSAV	BLD+2~, BLD+10*, 1+1
IBSCP	ENQ!, BLD+2~
IBTBDT	EN+2!, ENQ!, HDR+4, INIT+3!, INIT+7, INIT+10, BLD+16
IBTCOD	ENQ+1!
IBTEDT	EN+2!, ENQ!, HDR+4, INIT+3!, INIT+7, INIT+11, BLD+15
IBTEXT	ENQ!
IBTMPNM	ENQ!
IBTRC	EN+2!, ENQ!, DAY+1~
IBTRCD	DAY+1~, DAY+4*, DAY+5, DAY+6, DAY+8
IBTRD	EN+2!, ENQ!
IBTRDD	ENQ+1!
IBTRN	EN+2!, ENQ!, BLD+2~, BLD+8, BLD+9, BLD+10, BLD+16, 1+1, 1+3, 1+14 , 1+15, 1+17, 1+19, SET+4, DAY+3, DAY+8, DAY+9
IBTRND	ENQ!, BLD+2~, 1+3*, 1+4, 1+8, 1+9, 1+10, 1+11, 1+13, 1+16 , 1+18, 1+20
IBTRND1	BLD+2~, 1+3*
IBTRPRF	ENQ!, BLD+4*, BLD+5
IBTRSV	ENQ+1!
IBTRV	EN+2!, ENQ!
IBTYPE	ENQ+1!
IBUR	EN+2!, ENQ!, 1+11*, 1+12
IBXR	HDR+1~, HDR+3*
J	BLD+2~
OFFSET	ENQ+1!
PRECERT	ENQ!
REC	INIT+5~, INIT+6*, INIT+7
SDCNT	ENQ+1!
T	ENQ+1!
U	INIT+1*, INIT+7, 1+18, ECME+2, ECME+3
VA	EN+2!, ENQ!, ENQ+1!
VA("BID"	HDR+2
VA200	EN+2!, ENQ!, BLD+7*, BLD+12!
VAEL	EN+2!, ENQ!
VAERR	EN+2!, ENQ!
VAIN	EN+2!, ENQ!, BLD+2~, BLD+12!
VAIN(1	BLD+7, BLD+8
VAIN(4	1+21
VAINDT	ENQ+1!, BLD+7!, BLD+12!
VALMBCK	ENQ+1!
>> VALMBG	INIT+1*
>> VALMCNT	INIT+1, BLD+3, SET+1*, SET+2, SET+3, SET+4
VALMEVL	EN+2!, ENQ!
>> VALMHDR(1	HDR+2, HDR+3
>> VALMHDR(2	HDR+4*
>> VALMQUIT	INIT+9
>> VALMSG	BLD+6, BLD+11
VALUE	EXPAND~, EXPAND+2, EXPAND+3, EXPAND+4
X	ENQ!, INIT+3!, BLD+5, 1+6, 1+7, 1+8, 1+9, 1+10, 1+12, 1+13 , 1+14, 1+15, 1+16, 1+17, 1+18, 1+19, 1+20, 1+21, 1+22, HELP+1* , SET~, SET+2, DAY~
XQORNOD	INIT+3!
XQORS	EN+2!, ENQ!
Y	ENQ!, EXPAND+1~, EXPAND+2, EXPAND+4, EXPQ
Z	ENQ!
Z1	ENQ+1!

Customize PDF page

Package: Integrated Billing

Routine: IBTRE

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 145

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: