Routine: AGGELCHK

Information

AGGELCHK ;VNGT/HS/ALA - Eligibility Checks ; 24 May 2010 6:44 PM

Source file <AGGELCHK.m>

Package	Total	Call Graph
Kernel	2	^%ZTER $$NOW^XLFDT

Package	Total	Caller Graph
Patient Registration GUI	1	AGGWVAL

Name	Comments	DBIA/ICR reference
TRIBE	;
NON	;BEN - NON INDIAN TR=000,970
ELIG	;Check Eligibility
BEN	;
ERR	;
TRBQT	; Check Tribe and Indian Quantum consistency
QTCHK	;
IND	;check BEN=1 TR'=000,970
END	;
EN(AGB,AGTP,AGQT,AGQI,AGEL)	; EP - AGG ELIGIBILITY VALID ; Input parameters ; AGB = AGGPTCLB = Classification/Beneficiary ; AGTP = AGGPTTRI = Tribe of Membership ; AGQT = AGGPTTRQ = Tribe Quantum ; AGQI = AGGPTBLQ = Indian Blood Quantum ; AGEL = AGGPTELG = Eligibility Status

Name	Field # of Occurrence
^%ZTER	ERR+1
$$NOW^XLFDT	ERR+3

RPC Name	Call Tags
AGG ELIGIBILITY VALID	EN

Name	Line Occurrences (* Changed, ! Killed)
^AUTTBEN("B"	BEN+6
^AUTTTRI - [#9999999.03]	TRIBE+1
^DD("DD"	ERR+3

Name	Line Occurrences
ELIG	TRIBE+2, TRIBE+11, IND+1, IND+4, NON+1, NON+2, NON+4, NON+7
END	BEN+7
IND	TRIBE+8
NON	TRIBE+9
QTCHK	BEN+1, ELIG+1, ELIG+3, TRBQT+4

Name	Field # of Occurrence
^(0	TRIBE+1

Name	Field # of Occurrence
AGB	EN~, BEN+1, BEN+7, TRIBE+7*, TRIBE+8, TRIBE+9, NON+1, NON+2, ELIG+3, TRBQT+3
AGEL	EN~, ELIG+1, ELIG+3, TRBQT+4
AGQF	TRBQT+5, TRBQT+6, TRBQT+7, END+2!
AGQI	EN~, TRBQT+6
AGQT	EN~
AGT	TRIBE+1, TRIBE+3, TRIBE+6*, IND+1, NON+1, NON+4, TRBQT+2, TRBQT+3, END+2!
AGTF	TRBQT+1, TRBQT+2, TRBQT+3*, TRBQT+4, TRBQT+7, END+2!
AGTP	EN~, TRIBE+1, TRIBE+4
AGZ	TRBQT+3*, END+2!
>> BMXSEC	ERR+4*
CLBEN	BEN+5~, BEN+6*, BEN+7, BEN+8!, END+2!
>> CODE	BEN+2, TRIBE+4, TRIBE+5, IND+3, NON+3, NON+6, ELIG+2, ELIG+4, TRBQT+4, TRBQT+9 , END+1*
>> DATA	ERR+5
ERRDTM	ERR+2~, ERR+3*, ERR+4
>> I	TRIBE+9*
>> II	ERR+5*
>> MSG	BEN+2, TRIBE+4, TRIBE+5, IND+3, NON+3, NON+6, ELIG+2, ELIG+4, TRBQT+4, TRBQT+9 , END+1*
>> RESULT	BEN+2, BEN+7, TRIBE+4, TRIBE+5, IND+3, NON+3, NON+6, ELIG+2, ELIG+4, TRBQT+4 , TRBQT+9, END+1
U	TRIBE+1
Y	ERR+2~, ERR+3*