Routine: IBTRD

Package	Total	Call Graph
Integrated Billing	5	$$GRP^IBCNS $$DAT1^IBOUTL $$EXPAND^IBTRE $$PT^IBTUTL1 ($$DAY,$$MSG)^IBTUTL3
Registration	4	(KVAR,PID)^VADPT EN^VALM $$SETFLD^VALM1 CLEAN^VALM10
VA Fileman	2	DT^DICRW ^DIR
Kernel	1	DISP^XQORM1

Package	Total	Caller Graph
Integrated Billing	4	IBT EDIT APPEALS/DENIALS IBTRD1 IBTRDD IBTRDD1

Entry Points

Name	Comments	DBIA/ICR reference
2	; -- add items to list
EN	; -- main entry point for IBT APPEAL/DENAIL EDITOR
ASKQ
HDR	; -- header code
HDRP	; -- header code for by pat.
EXIT	; -- exit code
SET(X)	; -- set arrays
1	; -- first add denial, then add appeal
ENQ
INIT	; -- init variables and list array
BLDI	; -- Build list of appeals/denials by ins. co.
HELP	; -- help code
ASK	; -- ask for patient or ins. co.
BLD	; -- build list
BLDP	; -- Build list of appeals/denials by patient
HDRI	; -- header code for by ins. co.

External References

Name	Field # of Occurrence
DT^DICRW	EN+1
^DIR	ASK+3
$$GRP^IBCNS	2+20
$$DAT1^IBOUTL	2+22, 2+27
$$EXPAND^IBTRE	2+23, 2+28, 2+30
$$PT^IBTUTL1	HDRP+2
$$DAY^IBTUTL3	2+29
$$MSG^IBTUTL3	BLDP+3
KVAR^VADPT	ENQ+3
PID^VADPT	HDRP+1, 2+10
EN^VALM	EN+5, EN+6
$$SETFLD^VALM1	2+12, 2+15, 2+16, 2+19, 2+20, 2+22, 2+23, 2+24, 2+26, 2+27 , 2+28, 2+29, 2+30, 2+31, 2+32, 2+33
CLEAN^VALM10	EXIT+2
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	VALM Line Location: EN+5 EN+6
Routine Call	DIR Line Location: ASK+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	HDRI+1, 2+19
^DPT - [#2]	2+15, 2+20
^IBE(356.11 - [#356.11]	1+5, 2+24
^IBE(356.6 - [#356.6]	2+26
^IBE(356.7 - [#356.7]	BLDI+3, BLDI+5, BLDP+4, BLDP+6
^IBT(356 - [#356]	2+26, 2+27, 2+30
^IBT(356.2 - [#356.2]	BLDI+4, BLDI+6, BLDP+5, BLDP+7, 1+1, 1+6, 2+1, 2+2
^TMP("IBTRC"	INIT+2!
^TMP("IBTRCDX"	INIT+2!
^TMP("IBTRD"	BLD+1!, SET+2, SET+3, EXIT+1!
^TMP("IBTRDDX"	BLD+1!, SET+4*, EXIT+1!

Label References

Name	Line Occurrences
1	BLDI+4, BLDI+6, BLDP+5, BLDP+7
2	1+3, 1+6
ASK	EN+3
ASKQ	ASK+3
BLDI	BLD+4
BLDP	BLD+3
ENQ	EN+4
HDRI	HDR+2, BLDI+1
HDRP	HDR+1, BLDP+1
SET	2+34

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	INIT+3!
DFN	EN+2!, EN+5, ENQ!, HDRP+2, INIT+4, BLD+3, BLDP+3, BLDP+5, BLDP+7, 2+10* , 2+15, 2+20
DIE	INIT+3!
DIR	ASK+1~, ASK+3!
DIR("A"	ASK+2*
DIR(0	ASK+2*
>> DIRUT	ASK+3
DNM	INIT+3!
DQ	INIT+3!
DR	INIT+3!
DT	EN+1
I	INIT+3!
I1	ENQ+2!
I3	ENQ+2!
IBADG	ENQ+1!
IBAMT	ENQ+1!
IBAPEAL	ENQ+2!, 1+5*
IBAPR	ENQ+1!
IBCDFN	ENQ+2!
IBCNS	EN+2!, EN+6, ENQ!, HDRI+1, BLD+4, BLDI+4, BLDI+6
IBCNT	ENQ+2!, BLDI+2, BLDP+2, 2+8*, 2+12, SET+3, SET+4
IBDA	ENQ+1!
IBDEN	ENQ+2!, BLDI+3, BLDI+4, BLDP+4, BLDP+5
IBDENIAL	ENQ+2!
IBDENT	ENQ+2!
IBDGCR	ENQ+1!
IBDGCRU1	ENQ+1!
IBDV	ENQ+1!
IBETYP	ENQ+1!
IBETYPD	ENQ+1!
IBFASTXT	EN+2!, ENQ!
IBI	ENQ+1!, BLD+2~
IBICD	ENQ+1!
IBLCNT	ENQ+1!
IBNEW	ENQ+2!
IBOE	ENQ+2!
IBPARNT	ENQ+2!
IBPEN	ENQ+2!, BLDI+5, BLDI+6, BLDP+6, BLDP+7
IBPENAL	ENQ+2!
IBSEL	ENQ+1!
IBT	ENQ+1!
IBTCOD	ENQ+2!
IBTEXT	ENQ+1!
IBTNOD	ENQ+1!
IBTRC	EN+2!, ENQ!, INIT+3!, BLD+2~, BLDI+2, BLDI+4, BLDI+6, BLDP+2, BLDP+5, BLDP+7 , 1+1, 1+2, 1+4~, 1+6*, 2+1, 2+2, 2+6, SET+4
IBTRCD	BLD+2~, 1+4~, 2+1*, 2+3, 2+6, 2+10, 2+19, 2+22, 2+23, 2+24 , 2+28, 2+29, 2+31, 2+32, 2+33
IBTRCD1	BLD+2~, 1+4~, 2+2*, 2+20
IBTRD	EN+2!, EN+5, EN+6, ENQ!, INIT+4, INIT+5, BLD+3, BLD+4, ASK+4, ASK+5
IBTRDD	ENQ+2!
IBTRN	EN+2!, ENQ!, BLD+2~, 1+1*, 2+26, 2+27, 2+29, 2+30
IBTRSV	ENQ+2!, INIT+6, 1+2, 1+6, 2+6
IBTRV	EN+2!, ENQ!
IBTSAV	ENQ+1!
IBTYPE	EN+5, EN+6, ENQ+2!, HDR+1, HDR+2, BLD+3, BLD+4, 2+10, 2+14, 2+18
J	BLD+2~
OFFSET	ENQ+2!
SDCNT	ENQ+2!
T	ENQ+2!
U	INIT+1*
VA	ENQ+2!
VA("BID"	2+16
VAINDT	ENQ+2!
VALMBCK	ENQ+2!
>> VALMBG	INIT+1*
>> VALMCNT	INIT+1, BLDI+2, BLDP+2, SET+1, SET+2, SET+3, SET+4
VALMEVL	EN+2!, ENQ!
>> VALMHDR(1	HDRI+1, HDRP+2
>> VALMHDR(2	HDRI+2, HDRP+3
VALMQUIT	EN+2!, EN+4, ENQ!, INIT+5, INIT+7, ASK+3, ASK+5*
>> VALMSG	BLDP+3*
VAUTD	ENQ+1!
X	INIT+3!, 2+11, 2+12, 2+15, 2+16, 2+19, 2+20, 2+22, 2+23, 2+24* , 2+26, 2+27, 2+28, 2+29, 2+30, 2+31, 2+32, 2+33, 2+34, SET~ , SET+2, HELP+1*
XQORNOD	INIT+3!
XQORS	EN+2!, ENQ!
>> Y	ASK+4
Z1	ENQ+2!

Customize PDF page

Package: Integrated Billing

Routine: IBTRD

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: