Routine: IBCORC1

Name	Comments	DBIA/ICR reference
EVALQ
ENQ1
HDR	; Display report header.
ENQ
DASH()	; Write dashed line.
PAUSE	; Pause for screen output.
EVAL	; Accumulate amount billed for the carrier if the bill type is correct.
INSDIS(X)	; Display Insurance Company name and address.
START(X1,X2)	; Return the Start Date for the search, less one day.
DQ	; Tasked entry point to generate and print the rankings.

Name	Line Occurrences
Function Call: WRITE	Prompt: ?55,X Line Location: DQ+19
Function Call: WRITE	Prompt: ?55,X Line Location: DQ+25
Function Call: WRITE	Prompt: !!,"Sending the report in a bulletin to the MCCR Program Office... " Line Location: DQ+27
Function Call: WRITE	Prompt: "done." Line Location: DQ+27
Function Call: WRITE	Prompt: ! Line Location: PAUSE+3
Function Call: WRITE	Prompt: @IOF,*13 Line Location: HDR+4
Routine Call	DIR Line Location: PAUSE+4

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	DQ+4, DQ+5, EVAL+1
^DIC(36 - [#36]	DQ+16
^DIC(5 - [#5]	INSDIS+7
^TMP("IBORIC"	DQ+8*, DQ+12, DQ+13, ENQ!, EVAL+7

Name	Field # of Occurrence
^(	DQ+8, DQ+16, EVAL+7*

Name	Field # of Occurrence
%H	START+1~
DIR	ENQ+3!, PAUSE+2~
DIR(0	PAUSE+4*
DIROUT	ENQ+3!, PAUSE+2~
DIRUT	ENQ+3!, PAUSE+2~, PAUSE+4
DT	HDR+7
DTOUT	ENQ+3!, PAUSE+2~
DUOUT	ENQ+3!, PAUSE+2~, PAUSE+4
>> IBABEG	DQ+3, HDR+8
>> IBAEND	DQ+4, HDR+8
IBAMT	DQ+11, DQ+12, DQ+13, DQ+15, ENQ+3!, EVAL+6*, EVAL+7
IBAMTP	DQ+15*, DQ+19, ENQ+3!
IBCNT	DQ+11, DQ+12, DQ+13, DQ+14, DQ+18, ENQ+4!
IBDT	DQ+3, DQ+4, DQ+5, ENQ+4!
>> IBFLG	DQ+27
IBI	ENQ+3!, EVAL+1, PAUSE+2~, PAUSE+3
IBINS	DQ+8, DQ+13, DQ+16, ENQ+4!, EVAL+4*, EVAL+7
IBINS0	DQ+16*, DQ+18, ENQ+3!
IBINSA	DQ+16*, DQ+20, ENQ+3!
IBN	DQ+5*, ENQ+4!, EVAL+1, EVAL+6
IBND	ENQ+4!
IBND(	EVAL+1*
IBND("M"	EVAL+4
IBND("S"	EVAL+5
IBND(0	EVAL+2, EVAL+3
IBNR	DQ+12, DQ+13, DQ+14, ENQ+4!, HDR+2
IBPAG	DQ+11, ENQ+4!, HDR+4, HDR+5, HDR+8
IBQ	DQ+11, DQ+12, DQ+13, DQ+17, DQ+21, DQ+24, ENQ+4!, PAUSE+4
IBTAMT	DQ+11, DQ+15, DQ+25, ENQ+4!
IOF	HDR+4
IOSL	DQ+17, DQ+24, PAUSE+3
IOST	PAUSE+1, HDR+4
X	DQ+19, DQ+25, ENQ+4!, HDR+1~, HDR+2*, HDR+6, INSDIS~, INSDIS+2, INSDIS+3, INSDIS+4 , INSDIS+5, INSDIS+6, INSDIS+7, INSDIS+8, INSDIS+9, START+1~, START+2
X1	ENQ+4!, START~
X2	DQ+19, DQ+25, ENQ+4!, START~
X3	DQ+19, DQ+25, ENQ+4!
Y	ENQ+4!, HDR+1~, HDR+3*, HDR+7
>> ZTQUEUED	ENQ+1
>> ZTREQ	ENQ+1*

Information