Routine: IBOTR3

Package	Total	Call Graph
VA Fileman	3	^%DTC D^DIQ ^DIR
Integrated Billing	2	(ADDFLD,GTOT,SUBTOT)^IBOTR4 $$STOP^IBOUTL

Package

Total

Call Graph

^%DTC D^DIQ ^DIR

(ADDFLD,GTOT,SUBTOT)^IBOTR4 $$STOP^IBOUTL

Package	Total	Caller Graph
Integrated Billing	2	IBOTR2 IBOTR4

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
BILLNO	; Loop through all bills for an Insurance company.
PAUSE
END
HDR	; Print the report header.
DETAIL	; Write out detail lines.
INS	; Loop through each Insurance company.
INSADD	; Display Insurance Company name and address. Input: IBINS
DATE(IBX)
INSADDQ

Name	Line Occurrences
Function Call: WRITE	Prompt: !!," NO INFORMATION MATCHES SELECTION CRITERIA." Line Location: IBOTR3+9
Function Call: WRITE	Prompt: ?75,$J(X,4) Line Location: DETAIL+5
Function Call: WRITE	Prompt: @IOF Condition for execution: $E(IOST,1,2)["C-"!(IBPAG>1) Line Location: HDR+1
Function Call: WRITE	Prompt: IBRTN," PAYMENT TREND REPORT -- " Line Location: HDR+1
Function Call: WRITE	Prompt: ! Line Location: PAUSE+1
Routine Call	DIR Line Location: PAUSE+2

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	INSADD+4
^DIC(5 - [#5]	INSADD+10
^TMP($J	IBOTR3+7, IBOTR3+11, END!, INS+1, BILLNO+3

Name	Field # of Occurrence
^(	BILLNO+3

Name	Field # of Occurrence
D	INSADD+1~, INSADD+4*, INSADD+5, INSADD+6, INSADD+7, INSADD+8, INSADD+9, INSADD+10, INSADD+11, INSADD+12
DIR	PAUSE+2!
DIR(0	PAUSE+2*
DIRUT	PAUSE+2!
DT	IBOTR3+5
DTOUT	PAUSE+2!
DUOUT	PAUSE+2!
>> IBAF	IBOTR3+6, HDR+5
IBAFT	END!, HDR+5
>> IBBDT	HDR+4
IBBN	END!, BILLNO+2, BILLNO+3, DETAIL+1, DETAIL+3
>> IBBRN	IBOTR3+8
>> IBBRT	IBOTR3+8
IBCALC	IBOTR3+7, END!, BILLNO+1, DETAIL+2*, PAUSE+1
IBD	END!, BILLNO+3*, DETAIL+1, DETAIL+3, DETAIL+4, DETAIL+5, DETAIL+6, DETAIL+7, DETAIL+8, DETAIL+9 , DETAIL+10
>> IBDFN	HDR+4
>> IBEDT	HDR+4
IBI	END!, PAUSE+1*
IBINS	END!, INS+1*, BILLNO+3, INSADD+2, INSADD+3
IBLINE	IBOTR3+5*, END!, HDR+10
IBPAG	IBOTR3+5, END!, HDR+1, HDR+3
IBPEN	DETAIL+1~*, DETAIL+7, DETAIL+9, DETAIL+10
IBQUIT	IBOTR3+5, IBOTR3+11, END!, INS+1, INS+2, BILLNO+1, BILLNO+3, BILLNO+4, DETAIL+2, HDR+11 , PAUSE+2*
>> IBRTN	HDR+1
IBTDT	IBOTR3+5*, END!, HDR+3
IBTI	END!, INS+1, DETAIL+9
IBTT	IBOTR3+11, END!, DETAIL+10
IBX	IBOTR3+8, IBOTR3+11, END!, INS+1, BILLNO+3, HDR+2, DATE~*
IEN	INSADD+1~, INSADD+3*, INSADD+4
IOF	HDR+1
IOM	IBOTR3+5
IOSL	BILLNO+1, DETAIL+2, PAUSE+1
IOST	HDR+1, PAUSE
X	END!, DETAIL+5
X1	END!, DETAIL+5*
X2	END!, DETAIL+5*
>> Y	IBOTR3+5*

Information