Routine: IBTRV3

Call Graph

Package	Total	Call Graph
Integrated Billing	8	$$TRTP^IBTRE1 EN^IBTRE3 EN^IBTRE4 EN^IBTRE5 EN^IBTRV ($$ASKMORE,$$ASKSAME,$$RDAY,$$RDT,COPY)^IBTRV31 EDIT^IBTRVD1 PRE^IBTUTL2
Registration	2	INP^VADPT (FULL,PAUSE)^VALM1
Kernel	1	$$FMADD^XLFDT

Name	Comments	DBIA/ICR reference
15	; -- Initial edit of admission review
MESS	; -- add message
30	; -- Initial edit for continued stay
50	; -- outpatient review
SAME	; -- ask if same
INSURD(X)	; -- determine if this is tracked as an ins. claim
UNIT(X)	; -- determine if specialty is a specialized unit
ANOTHER	; -- ask if add another if no ask next review date/status
REV(IBTRN,IBTRTP)	; -- Add review
REVQ
ADNXT(IBTRN)	; -- Add next Hospital Review
ADNXTQ
INPT
VDT(IBTRN,IBTRV)	; compute vaindt for day of review

Name	Field # of Occurrence
$$TRTP^IBTRE1	ADNXT+7
EN^IBTRE3	INPT+1
EN^IBTRE4	INPT+2
EN^IBTRE5	INPT+3
EN^IBTRV	%
$$ASKMORE^IBTRV31	ANOTHER+1
$$ASKSAME^IBTRV31	SAME+1
$$RDAY^IBTRV31	ADNXT+19
$$RDT^IBTRV31	REV+5
COPY^IBTRV31	SAME+11
EDIT^IBTRVD1	INPT+4, ANOTHER+3, ANOTHER+8, ANOTHER+12, SAME+2, REV+19
PRE^IBTUTL2	REV+15
INP^VADPT	REV+18, UNIT+6
FULL^VALM1	ADNXT+4
PAUSE^VALM1	ADNXT+8, ADNXT+9, REV+3
$$FMADD^XLFDT	VDT+4

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This doesn't appear to be an admission or outpatient visit.",!,"I don't know how to review this.",! Line Location: ADNXT+8
Function Call: WRITE	Prompt: !!,"DUH, Nothing Added!" Line Location: REV+3
Function Call: WRITE	Prompt: !!,"There must be an admission review first" Line Location: REV+8

Name	Line Occurrences (* Changed, ! Killed)
^DGPM - [#405]	REV+12
^IBT(356 - [#356]	REV+12, INSURD+1, VDT+2
^IBT(356.1 - [#356.1]	ADNXT+12, ADNXT+18, REV+8, INSURD+1, VDT+3

Name	Line Occurrences
$$VDT	UNIT+6
15	50+1
@(	REV+19
ADNXTQ	ADNXT+8, ADNXT+9, INPT+6, ANOTHER+2, ANOTHER+11, SAME+4
ANOTHER	INPT+5, SAME+7
INPT	SAME+15
MESS	SAME+10, REV+16
REV	INPT
REVQ	REV+3, REV+7, REV+17

Name	Field # of Occurrence
DA	UNIT+5~*, UNIT+6
DAY	VDT+1~, VDT+3*, VDT+4
>> DR	REV+19, 15+1, 30+1, 30+2*
DT	ADNXT+6
>> IBATD	UNIT+8*
IBDGPM	ADNXT+3~
IBDGPMD	REV+4~, REV+12*
IBETYP	ADNXT+3~, ADNXT+7*, ADNXT+8, ADNXT+9, ADNXT+18, INPT+6
IBMORE	ADNXT+3~, ANOTHER+1*, ANOTHER+2, ANOTHER+7, ANOTHER+11
>> IBPROV	UNIT+8*
IBQUIT	ADNXT+3~, ADNXT+5, ADNXT+9, ADNXT+14, REV+4~, REV+5, REV+7, REV+8
IBRDAY	ADNXT+3~, ADNXT+19, SAME+8, SAME+16*, MESS+1
IBSAME	ADNXT+3~, SAME+1*, SAME+2, SAME+4, SAME+7, SAME+15
IBSEL	ADNXT+3~, INPT+1, INPT+2, INPT+3, INPT+5
>> IBSPEC	UNIT+8*
>> IBTDAY	ADNXT+10*
IBTRN	ADNXT~, ADNXT+7, ADNXT+12, ADNXT+18, ADNXT+19, INPT, INPT+1, INPT+2, INPT+3, REV~ , REV+3, REV+5, REV+8, REV+12, REV+15, UNIT+6, VDT~, VDT+2
IBTRTP	ADNXT+3~, ADNXT+11, ADNXT+12, ADNXT+18, INPT, SAME+9, SAME+17, REV~, REV+3, REV+7 , REV+15, REV+19, MESS+1, MESS+2, MESS+3
IBTRV	ADNXT+3~, SAME+11, REV+17, UNIT+5, VDT~, VDT+3
IBTRVDT	ADNXT+3~, ADNXT+6, REV+4~, REV+5, REV+15
>> IBUNIT	UNIT+4, UNIT+7
IBX	VDT+1~, VDT+2, VDT+4, VDT+5
U	UNIT+8
VA200	REV+18, UNIT+3~, UNIT+4, UNIT+6*
VAIN	UNIT+3~
VAIN(11	UNIT+8
VAIN(2	UNIT+8
VAIN(3	UNIT+7, UNIT+8
VAINDT	UNIT+3~, UNIT+6*
>> VALMBCK	ADNXT+5, ANOTHER+11
X	UNIT~, INSURD~, INSURD+1
Y	UNIT+3~