Routine: IBAMTI1

Package	Total	Call Graph
Integrated Billing	3	$$UCCL^IBAMTI $$PT^IBEFUNC $$DAT1^IBOUTL
VA Fileman	2	^DIC ^DIE

Package	Total	Caller Graph
Integrated Billing	4	IB MT DISP SPECIAL CASES IBAMTI2 IBECEA3 IBECEA32

Entry Points

Name	Comments	DBIA/ICR reference
DISP	; Manually disposition a case record.
UPD(IND)	; Disposition the case record.
CHK(IBC,IBEVT)	; Review the case after adding a charge from Cancel/Edit/Add.
CHKQ
DSPL(IBC)	; Display a case record.
DASH()	; Return a dashed line.
CEA(IBPM,IBEVT)	; Automatically disposition the case from Cancel/Edit/Add.
DSPLQ
CEAQ
SEL	; Select an inpatient billing case and enter the reason for non-billing.
SELQ

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DISP+6
Function Call: WRITE	Prompt: !!,"You must wait until this patient has been discharged to disposition the case." Line Location: SEL+3
Function Call: WRITE	Prompt: !!,"Please note that it appears as if this case has been billed." Line Location: SEL+4
Function Call: WRITE	Prompt: !!,"Please note that this case has already been dispositioned." Line Location: SEL+5
Function Call: WRITE	Prompt: !!,"No changes made to the case record!" Line Location: SEL+15
Function Call: WRITE	Prompt: !!,"This case record will be dispositioned." Line Location: SEL+16
Function Call: WRITE	Prompt: "..." Line Location: UPD+5
Function Call: WRITE	Prompt: " done." Line Location: UPD+8
Function Call: WRITE	Prompt: !?1,"Charges Billed:" Line Location: DSPL+14
Function Call: WRITE	Prompt: !?1,"Reason for Non-Billing:",!,IBC1,!,$$DASH(),! Line Location: DSPL+23
Routine Call	DIE Line Location: SEL+12 SEL+19 UPD+8
Routine Call	DIC Line Location: SEL+2

FileNo	Call Tags
^IBE(351.2 - [#351.2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DGPM - [#405]	DSPL+9, DSPL+10
^IB - [#350]	DSPL+16
^IB("AF"	DSPL+14, DSPL+15
^IBE(350.1 - [#350.1]	DSPL+17
^IBE(350.21 - [#350.21]	DSPL+20
^IBE(351.2 - [#351.2]	SEL+11, SEL+14, CEA+5, CHK+5, UPD+6!, DSPL+4
^VA(200 - [#200]	DSPL+11

Name	Field # of Occurrence
^(1	CHK+5, DSPL+4
^(2	DSPL+4

Name	Field # of Occurrence
DA	SEL+12, SEL+19, SELQ!, CEA+4~, CHK+4~, UPD+8*
DFN	DSPL+3~, DSPL+5*
DIC	SEL+1*, SELQ!
DIC("A"	SEL+1*
DIC(0	SEL+1*
DIE	SEL+12, SEL+19, SELQ!, CEA+4~, CHK+4~, UPD+8*
DR	SEL+12, SEL+17, SEL+18, SELQ!, CEA+4~, CHK+4~, UPD+7
DUZ	SEL+17, UPD+7
IBATYP	DSPL+3~, DSPL+17, DSPL+18, DSPL+19
IBBILLED	SEL+4*, SEL+12, SELQ!
IBC	SEL+2, SEL+8, SEL+11, SEL+12, SEL+14, SEL+19, SELQ!, CEA+4~, CEA+5, CHK~ , CHK+3, CHK+5, UPD+6, UPD+8, DSPL~, DSPL+2, DSPL+4
IBC1	DSPL+3~, DSPL+4*, DSPL+23
IBC2	DSPL+3~, DSPL+4*, DSPL+9, DSPL+11
IBCD	CHK+4~, CHK+5, CHK+6, DSPL+3~, DSPL+4, DSPL+5, DSPL+7, DSPL+8, DSPL+9, DSPL+10 , DSPL+13
IBCD1	CHK+4~, CHK+5*, CHK+6
IBCL	DSPL+3~, DSPL+5*, DSPL+7, DSPL+8
IBDIS	DSPL+3~, DSPL+10*, DSPL+11
IBEVT	CEA~, CEA+3, CHK~, CHK+3, UPD+7, DSPL+3~, DSPL+13*, DSPL+14, DSPL+15
IBHC	SEL+11*, SEL+15, SELQ!
IBHR	SEL+11*, SEL+15, SELQ!
IBN	DSPL+3~, DSPL+15*, DSPL+16
IBNC	SEL+14*, SEL+15, SELQ!
IBND	DSPL+3~, DSPL+16*, DSPL+17, DSPL+19, DSPL+20
IBNR	SEL+14*, SEL+15, SEL+16, SEL+18, SELQ!
IBPM	CEA~, CEA+5
IBPT	DSPL+3~, DSPL+5*, DSPL+6
IBQ	DISP+6, DISP+7!, SEL+2
IND	UPD~, UPD+5
Y	SEL+2, DSPL+3~
Y(0	SEL+3, SEL+4, SEL+5, SEL+11