Routine: IBCNSU

Information

IBCNSU ;ALB/AAS - INSURANCE UTILITY ROUTINE ; 19-MAY-93

Source Information

Source file <IBCNSU.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
VA Fileman	3	FILE^DICN ^DIE ^DIR

Caller Graph

Caller Graph Total: 8

Package	Total	Caller Graph
Integrated Billing	8	IB20PT1 IB20PT6 IBCNSA IBCNSM1 IBCNSM3 IBCNSOK IBCNSP1 INSURANCE TYPE

Entry Points

Name	Comments	DBIA/ICR reference
STRIP(X,X1)	; -- strip characters from string
ADDH(IBCNS,IBGRP)	; -- add entries to health insurance policy file (355.3)
ADDHQ
ADDBQ
HIP(IBCNS,IBGRP,IBGRNA,IBGRNU)	; -- find internal entry number in policy file	ICR #944 Status: Active Usage: Private
CHIP(IBCDFND)	; -- convert node with no hip pointer to one with hip pointer
DELPQ
ABQ
AB(IBCPOL,IBYR,IBASK)	; -- Return entry in Annual Benefits file
DELP(DFN,INS)	; -- can an insurance policy be deleted
HIPQ
ADDB(IBCPOL,IBYR)	; -- add entries to Annual Benefits file
CHIPQ

External References

Name	Field # of Occurrence
FILE^DICN	ADDB+13, ADDH+11
^DIE	ADDB+15, HIP+26, ADDH+14
^DIR	AB+18

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBA(355.3 - [#355.3]	Classic Fileman Calls
^IBA(355.4 - [#355.4]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	DELP+10
^DIC(36 - [#36]	HIP+10
^IBA(355.3 - [#355.3]	HIP+15, HIP+16, HIP+19, HIP+20
^IBA(355.4 - [#355.4]	AB+14

Label References

Name	Line Occurrences
$$ADDB	AB+19
$$ADDH	HIP+12, HIP+22
$$HIP	CHIP+9
$$STRIP	HIP+25
ABQ	AB+9
ADDBQ	ADDB+8, ADDB+13, ADDH+8
ADDHQ	ADDH+11
HIPQ	HIP+10, HIP+12, HIP+16, HIP+20

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	ADDB+6~, HIP+8~, ADDH+6~
DA	ADDB+6~, ADDB+14, ADDB+15!, HIP+25, HIP+26!, ADDH+6~, ADDH+12*, ADDH+14!
DD	ADDB+6~, ADDB+10!, ADDH+6~, ADDH+9!
DFN	ADDH+13, DELP~, DELP+10
DIC	ADDB+6~, ADDB+10!, ADDB+15!, HIP+26!, ADDH+6~, ADDH+9!, ADDH+14!
DIC(0	ADDB+10, ADDH+9
DIE	ADDB+6~, ADDB+14, ADDB+15!, HIP+25, HIP+26!, ADDH+6~, ADDH+12*, ADDH+14!
DIR	AB+7~
DIR("A"	AB+18*
DIR("B"	AB+18*
DIR(0	AB+18*
>> DIRUT	AB+18
DLAYGO	ADDB+6~, ADDB+10, ADDH+6~, ADDH+9
DO	ADDB+6~, ADDB+10!, ADDH+6~, ADDH+9!
DR	ADDB+6~, ADDB+10!, ADDB+14, ADDB+15!, HIP+25, HIP+26!, ADDH+6~, ADDH+9!, ADDH+12, ADDH+13 , ADDH+14!
DT	AB+10, ADDB+9
I	DELP+7~, STRIP+3~, STRIP+6*
IBASK	AB~, AB+18
IBCAB	AB+7~, AB+8, AB+14, AB+17, AB+19, ABQ, ADDB+6~, ADDB+7, ADDB+14*, ADDBQ , ADDH+6~
IBCDFND	CHIP~, CHIP+7
IBCNS	CHIP+6~, CHIP+7*, CHIP+9, HIP~, HIP+10, HIP+12, HIP+15, HIP+19, HIP+22, ADDH~ , ADDH+8, ADDH+11
>> IBCNTP	ADDH+15*
IBCPOL	AB~, AB+9, AB+14, AB+19, ADDB~, ADDB+8, ADDB+14, CHIP+9, CHIPQ, HIP+9 , HIP+12, HIP+15, HIP+16, HIP+19, HIP+20, HIP+22, HIP+25, HIPQ, ADDH+7, ADDH+12 , ADDHQ
IBGRNA	CHIP+6~, CHIP+7, CHIP+8, CHIP+9, HIP~, HIP+16, HIP+18, HIP+19, HIP+23, HIP+24* , HIP+25
IBGRNU	CHIP+6~, CHIP+7, CHIP+8, CHIP+9, HIP~, HIP+14, HIP+15, HIP+20, HIP+23, HIP+24* , HIP+25
IBGRP	CHIP+6~, CHIP+7, CHIP+8, CHIP+9, HIP~, HIP+11*, HIP+12, HIP+22, ADDH~, ADDH+12 , ADDH+13
IBN1	ADDB+6~, ADDH+6~
IBYR	AB~, AB+10, AB+14, AB+19, ADDB~, ADDB+9, ADDB+13
INS	DELP~, DELP+10
>> J	DELP+10*
>> VALMQUIT	AB+18*
X	ADDB+13, ADDH+11, DELP+7~, DELP+10, DELPQ, STRIP~, STRIP+6
X1	STRIP~, STRIP+4, STRIP+5, STRIP+6
X2	STRIP+3~, STRIP+4, STRIP+6, STRIP+7
Y	AB+18, ADDB+13, ADDB+14, ADDH+11, ADDH+12, DELP+7~

Customize PDF page

Package: Integrated Billing

Routine: IBCNSU

Call Graph Total: 3

Caller Graph Total: 8