Routine: IBCNS2

Information

IBCNS2 ;ALB/AAS - INSURANCE POLICY CALLS FROM FILE 399 DD ; 22-JULY-91

Source file <IBCNS2.m>

Package	Total	Caller Graph
Integrated Billing	6	IBXX11 ^DGCR(399 IBTRC2 IBXSC3 IBXSC31 IBXX1

Name	Comments	DBIA/ICR reference
DDHQ
IX(DA,XREF)	; -- create i1, aic xrefs for fields 112, 113, 114
TRANS(IBDA,Y)	; -- output transform
DDQ
CHKQ
SEL(IBX,DFN,INSDT,ACTIVE)	; -- Select insurance policy
DDHELP(IBDA,LEVEL)	; -- Executable help
INSCO(IBDA,IBCDFN)	; -- return pointer value of 36 from pt. file
DD(IBX,IBDA,LEVEL)	; - called from input transform for field 111,112,113
KIX(DA,XREF)	; -- kill logic for above xref
VAR
BLD
CQ
SELQ
CHK(IBCDFN,ACTIVE,INSDT)	; -- see if active

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No Insurance Policies to Select From" Line Location: DDHELP+5
Routine Call	%ZIS Line Location: DDHELP+7
Routine Call	DIC Line Location: SEL+21

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	VAR, IX+2, IX+3, KIX+1!, KIX+2!
^DIC(36 - [#36]	CHK+5, TRANS+3, INSCO+4
^DPT - [#2]	BLD+1, CHK+2, DDHELP+10, TRANS+3, INSCO+3, IX+3, KIX+2

Name	Field # of Occurrence
^("U"	VAR

Name	Field # of Occurrence
ACTIVE	DD+6~, DD+8, VAR, SEL~, SEL+11, BLD+1, CHK~, CHK+4, DDHELP+2~, TRANS+1~ , INSCO+1~
DA	SEL+9~, IX~, IX+2, IX+3, KIX~, KIX+1, KIX+2
DE	SEL+9~
DFN	DD+6~, DD+8, VAR*, SEL~, SEL+13, SEL+18, BLD+1, CHK+2, DDHELP+2~, DDHELP+10 , TRANS+1~, TRANS+3, INSCO+1~, INSCO+3
DIC	SEL+9~, SEL+18*
DIC("S"	SEL+19*
DIC("W"	SEL+20*
DIC(0	SEL+18*
DIE	SEL+9~
DIR	SEL+9~
DIV	SEL+9~
DQ	SEL+9~
DR	SEL+9~
DT	VAR, SEL+12
I	SEL+9~, DDHELP+2~, DDHELP+9*, DDHELP+10
IBCDFN	BLD+1*, CHK~, CHK+2, CHK+3, CQ, CHKQ, INSCO~, INSCO+3
IBD	SEL+9~, BLD!
IBD(	CHKQ*, DDHELP+9, DDHELP+10
IBDA	DD~, VAR, DDHELP~, TRANS~, INSCO~
IBDD	SEL+9~, BLD!, BLD+1, CHKQ, DDHELP+5
IBDD(	CHK+3*, CQ!, CHKQ
IBINS	DDHELP+2~, DDHELP+10*
IBSEL	SEL+9~, SEL+10*
IBX	DD~, DD+8, SEL~, SEL+17
INSDT	DD+6~, DD+8, VAR, SEL~, SEL+12, BLD+1, CHK~, CHK+6, CHK+7, DDHELP+2~ , TRANS+1~, INSCO+1~
IOM	DDHELP+7
J	SEL+9~
LEVEL	DD~, DDHELP~
U	TRANS+3
X	DD+8, DD+9!, SEL+17, CHK+1~, CHK+2*, CHK+3, CHK+5, CHK+6, CHK+7, IX+2 , IX+3, KIX+2
X1	CHK+1~, CHK+5*, CHK+8, CHK+9
XREF	IX~, IX+2, KIX~, KIX+1
Y	SEL+9~, SEL+10, SELQ, TRANS~, TRANS+3, TRANS+4, INSCO+3*, INSCO+4