Routine: IBCNS1

Information

IBCNS1 ;ALB/AAS - INSURANCE MANAGEMENT SUPPORTED FUNCTIONS ; 22-JULY-91

Source file <IBCNS1.m>

Package	Total	Call Graph
Integrated Billing	2	$$GRP^IBCNS $$DAT1^IBOUTL

Package	Total	Caller Graph
Integrated Billing	34	IB20PT81 IB20PT88 IB20PT8A IB20PT8B IBCNS IBCNS2 IBCNSBL IBCNSM IBCNSM31 IBCNSOK1 IBCNSP2 IBCONS1 IBCONS2 IBCSC3 IBCU5 IBCU82 IBCVA0 IBOVOP1 IBRFN2 IBTOAT1 IBTOBI1 IBTOSA IBTOSUM IBTOUA IBTOUR1 IBTRC3 IBTRC4 IBTRKR IBTRKR2 IBTRKR3 IBTRKR41 IBTRKR5 IBTUTL IBTUTL1
Registration	4	DG3PR0 DGRPTL3 DGRPTP2 VAFHLFNC
Automated Information Collection System	2	IBDFN6 IBDFOSG1
Health Summary	1	GMTSDEM2
Order Entry Results Reporting	1	ORDV07

Name	Comments	DBIA/ICR reference
HDR
DD	; - called from input transform and x-refs for field 101,102,103
CHKQ
URQ
INSQ
INDEMQ
UR(DFN,IBINDT)	; -- is ur required for patient
ALLQ
ZND(DFN,NODE)	; -- set group number and group name back into zeroth node of ins. type
CHK(X,Z,Y)	; -- check one entry for active
ACTIVE(IBCIFN)	; -- is this company active for this patient for this date
INSURED(DFN,IBINDT)	; -- Is patient insured	ICR #10145 Status: Retired Usage: Supported
DDQ
ACTIVEQ
ALL(DFN,VAR,ACT,ADT)	; -- find all insurance data on a patient	ICR #10145 Status: Retired Usage: Supported
PRE(DFN,IBINDT)	; -- is pre-certification required for patient
ZNDQ
ALLACTQ
INDEM(X)	; -- is this and indemnity plan
PREQ
ALLACT	; -- return active insurance zeroth nodes in ibdd(ins co,entry in mult)
D1

Name	Field # of Occurrence
$$GRP^IBCNS	D1+3
$$DAT1^IBOUTL	D1+5

Name	Line Occurrences
Function Call: WRITE	Prompt: !?4,X Line Location: HDR+0
Function Call: WRITE	Prompt: ?52,$S(X="v":"SELF",X="s":"SPOUSE",1:"OTHER") Line Location: D1+4

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	ACTIVE+4, DD+3
^DIC(36 - [#36]	CHK+9, D1+1, INDEM+4
^DPT - [#2]	INSURED+8, PRE+4, UR+4, ALLACT+3, ALL+18, ALL+19, ALL+22, ALL+23, ALL+24, ZND+3
^IBA(355.3 - [#355.3]	PRE+4, UR+4, ALL+24, ZND+4, INDEM+5
^IBE(355.1 - [#355.1]	INDEM+6

Name	Field # of Occurrence
ACT	ALL~, ALL+17, ALL+19
ACTIVE	ACTIVE+3~, ACTIVEQ
ADT	ALL~, ALL+17*, ALL+19
>> DA	ACTIVE+4, DD+3
DFN	INSURED~, INSURED+8, PRE~, PRE+4, UR~, UR+4, ACTIVE+3~, ACTIVE+4, DD+3~, ALLACT+3 , ALL~, ALL+18, ALL+19, ALL+21, ALL+22, ALL+23, ALL+24, ZND~, ZND+2, ZND+3
DT	INSURED+7, PRE+3, UR+3, ACTIVE+4, DD+3, ALL+17
IBCIFN	ACTIVE~
IBCTP	INDEM+2~, INDEM+5*, INDEM+6
>> IBDD	ALLACT+2*
>> IBDD(	ALLACT+3*
IBINDEM	INDEM+2~, INDEM+3, INDEM+7, INDEMQ
IBINDT	INSURED~, INSURED+7, INSURED+8, PRE~, PRE+3, PRE+4, UR~, UR+3, UR+4, ACTIVE+3~ , ACTIVE+4, DD+3*, DDQ!, ALLACT+3
IBINS	INSURED+6~, INSURED+8, INSQ, D1, D1+1, D1+2, D1+3, D1+4, D1+5
IBPRE	PRE+1~, PRE+2, PRE+4, PREQ, UR+1~
>> IBUR	UR+2, UR+4, URQ
IOM	HDR
J	INSURED+6~, INSURED+8, PRE+1~, PRE+2, PRE+4, UR+1~, UR+2, UR+4
NODE	ZND~, ZND+2, ZND+3
VAR	ALL~, ALL+20, ALL+21, ALL+22, ALL+23, ALL+24
X	INSURED+6~, INSURED+8, PRE+1~, PRE+4, UR+1~, UR+4, CHK~, CHK+8, CHK+9, CHK+10 , CHK+11, ALLACT+1~, ALLACT+3, HDR, D1~, D1+4, ALL+16~, ALL+17, ALL+18, ALL+19 , ALL+21, ALL+22, ALL+23, ALL+24, ZND+1~, ZND+3, ZND+4, ZND+5, ZND+6, ZNDQ , INDEM~, INDEM+4, INDEM+5
X1	CHK+7~, CHK+9, CHK+12, CHK+13, ALLACT+1~, ALLACT+2, ALLACT+3*
Y	PRE+1~, UR+1~, CHK~, CHK+13, ZND+1~, ZND+4, ZND+5, ZND+6
Z	CHK~, CHK+10, CHK+11
Z1	CHK+7~, CHK+14, CHKQ