Routine: AGGWVAL

Package	Total	Call Graph
Patient Registration GUI	7	$$AGE^AGGAGE $$ROI^AGGALTRG (DTEME,DTEMS)^AGGARVAL EN^AGGELCHK ($$DATE,$$FMTE)^AGGUL1 ($$ISREQ,$$QUANT)^AGGUL2 (FEMP,MEMP,TBQ)^AGGWVAL1
Kernel	3	^%ZTER $$NOW^XLFDT $$STRIP^XLFSTR
VA Fileman	3	DT^DICRW $$IENS^DILF $$GET1^DIQ
IHS Patient Registration	2	$$RQAOB^AGEDERR4 $$USED^AGUTILS
Registration	1	$$FORMAT^DPTNAME

Entry Points

Name	Comments	DBIA/ICR reference
ERR	;
AOB(AOB)	;EP - Assignment of Benefits
MEMP(AGGMTEMN,AGGMTNME,AGGFTNME,AGGFTEMN,DFN)	; EP = Mother's Employer check
DONE	;
VAL(DATA,VFILE,PARMS)	;EP -- AGG WINDOW DATA VALIDATION
ELG(AGB,AGTP,AGQT,AGQI,AGEL)	; EP - Eligibility check
FM(AGGFTNME,AGGMTNME,DFN)	; EP = Family Member check
IBQ(X,DFN,TBQ,AGGPTCLB)	;EP - Indian Blood Quantum
FEMP(AGGFTEMN,AGGMTEMN,AGGFTNME,AGGMTNME,DFN)	; EP = Father's Employer check
HNUM(HNUM)	; EP
MP(INSPTR,DFN)	; EP - for repeating insurers
OTQ(X)	;EP - Other Tribe Quantum
ELGS(AGB,AGTP,AGQT,AGQI,AGEL)	; EP - Eligibility check from Eligibility Status field
VET(DFN,AGGPTVET)	;EP - Veteran validation
CERT(DCER)	; EP - Death Certificate
SSN(ASSN,DFN)	;EP - SSN
ELGC(AGB,AGTP,AGQT,AGQI,AGEL)	; EP - Eligibility check from Classification field
IMP(VALUE,AUPNDOB)	;EP - Imprecise date validation
DELIP(CHOICE,RECORD)	;EP - Delete insurance policy
DTME(TRANSTYP,END,STRT)	; EP
NOSSN(NOSSN,ASSN,DFN)	;EP
HRN(HRN,DFN)	;EP - HRN
DTEMS(STRT,END)	; EP - Elig dates validation for Medicaid and Private Insurance
NAM(NAME)	; EP - Name validation
DRDTS(BDT,EDT)	;EP - Daily Reports Date Validation
ELGT(AGB,AGTP,AGQT,AGQI,AGEL)	; EP - Eligibility check from Tribe of Membership field
ROI(AGGPTROI)	; EP - Release of Information
MAI(NAME)	; EP - Maiden name validation
ZIP(ZIP)	;EP - Zip Code Validation
DTMS(TRANSTYP,STRT,END)	; EP
DOD(DOD,DFN)	; EP - Date of Death validation
DTEME(END,STRT)	; EP
DOB(DOB)	; EP - Date of Birth Validation
TBQ(X,DFN,IBQ,AGGPTCLB)	;EP - Tribal Blood Quantum

Name	Field # of Occurrence
^%ZTER	ERR+1
$$RQAOB^AGEDERR4	AOB+3
$$AGE^AGGAGE	FM+3
$$ROI^AGGALTRG	ROI+3
DTEME^AGGARVAL	DTEME+1, DTME+2
DTEMS^AGGARVAL	DTEMS+1, DTMS+2
EN^AGGELCHK	ELG+1, ELGS+2, ELGC+2, ELGT+2
$$DATE^AGGUL1	IMP+3, DRDTS+6, DRDTS+11, DOB+3, DOD+3
$$FMTE^AGGUL1	DOD+6
$$ISREQ^AGGUL2	NOSSN+1
$$QUANT^AGGUL2	IBQ+41
FEMP^AGGWVAL1	FEMP+1
MEMP^AGGWVAL1	MEMP+1
TBQ^AGGWVAL1	TBQ+1
$$USED^AGUTILS	DELIP+2
DT^DICRW	DRDTS+3
$$IENS^DILF	DELIP+8
$$GET1^DIQ	DELIP+9, DOD+4
$$FORMAT^DPTNAME	NAM+6, MAI+5
$$NOW^XLFDT	ERR+3
$$STRIP^XLFSTR	VAL+32, VAL+44, VAL+45, VAL+55, ZIP+2

RPC Name	Call Tags
AGG WINDOW DATA VALIDATION	VAL

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
9000006.11	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AGFAC - [#9009061]	IBQ+41
^AGG(9009068.3 - [#9009068.3]	VAL+14, VAL+15, VAL+37, VAL+39, VAL+40
^AUPNPAT - [#9000001]	SSN+7, SSN+8, SSN+9
^AUPNPAT("D"	HRN+2, HRN+6
^AUPNPRVT("I"	MP+1
^AUTTBEN("B"	IBQ+4
^AUTTSSN - [#9999999.78]	SSN+8, SSN+9
^DD("DD"	ERR+3
^DPT - [#2]	SSN+13, HRN+9, VET+4
^DPT("SSN"	SSN+12
^TMP("AGGWVAL"	VAL+9

Name	Line Occurrences
@(	VAL+51
DONE	VAL+27
NAM	FM+6, FM+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AE	NAM+7, NAM+8, NAM+9, MAI+1~, MAI+6, MAI+7, MAI+8
AGB	ELG~, ELG+1, ELGS~, ELGS+2, ELGC~, ELGC+2, ELGT~, ELGT+2
AGE	FM+1~, FM+3*, FM+4
AGEL	ELG~, ELG+1, ELGS~, ELGS+2, ELGC~, ELGC+2, ELGT~, ELGT+2
AGGFTEMN	FEMP~, FEMP+1, MEMP~, MEMP+1
AGGFTNME	FM~, FM+6, FM+9, FEMP~, FEMP+1, MEMP~, MEMP+1
AGGL	SSN+3~
AGGMTEMN	FEMP~, FEMP+1, MEMP~, MEMP+1
AGGMTNME	FM~, FM+7, FM+9, FEMP~, FEMP+1, MEMP~, MEMP+1
AGGPTCLB	IBQ~, IBQ+5, TBQ~, TBQ+1
AGGPTDOB	VET+1~, VET+4*, VET+5
AGGPTROI	ROI~, ROI+3
AGGPTVET	VET~, VET+3
AGQI	ELG~, ELG+1, ELGS~, ELGS+2, ELGC~, ELGC+2, ELGT~, ELGT+2
AGQT	ELG~, ELG+1, ELGS~, ELGS+2, ELGC~, ELGC+2, ELGT~, ELGT+2
AGTP	ELG~, ELG+1, ELGS~, ELGS+2, ELGC~, ELGC+2, ELGT~, ELGT+2
AOB	AOB~, AOB+3
ASSN	SSN~, SSN+5, SSN+6, SSN+11, SSN+12, SSN+14, SSN+15, NOSSN~, NOSSN+1, NOSSN+2 , NOSSN+3
AUPNDOB	IMP~, IMP+1*, IMP+2
BDT	DRDTS~, DRDTS+2, DRDTS+5, DRDTS+6*, DRDTS+7, DRDTS+8, DRDTS+10, DRDTS+15
BI	VAL+6~, VAL+43, VAL+54, VAL+55
>> BMXSEC	VAL+13, VAL+29, VAL+38, VAL+46, VAL+47, ERR+4
BN	VAL+6~, VAL+21, VAL+22
BQ	VAL+6~, VAL+29*, VAL+30
CHOICE	DELIP~, DELIP+2, DELIP+8
CLBEN	IBQ+1~, IBQ+4*, IBQ+5
CODE	VAL+7~, VAL+27, VAL+52, IBQ+35, IBQ+38, ELGS+1, ELGS+6, ELGC+1, ELGC+6, ELGT+1* , ELGT+6*
CODN	VAL+6~, VAL+37*, VAL+38, VAL+39, VAL+40
DA	DELIP+7~, DELIP+8*
DA(1	DELIP+8*
DATA	VAL~, VAL+9*, VAL+10, VAL+17, VAL+27, VAL+52, DONE+1, ERR+5
DCER	CERT~, CERT+2, CERT+3
DFN	SSN~, SSN+5, SSN+7, SSN+8, SSN+9, SSN+13, NOSSN~, HRN~, HRN+4, IBQ~ , TBQ~, TBQ+1, VET~, VET+4, MP~, MP+1, DOD~, DOD+4, FM~, FM+3 , FEMP~, FEMP+1, MEMP~, MEMP+1
DG20NAME	NAM+1~, NAM+5, NAM+6, MAI+1~, MAI+4, MAI+5
DGY	SSN+3~, SSN+12*, SSN+13
DOB	DOB~, DOB+2, DOB+3, DOB+4, DOB+5, DOD+4, DOD+6
DOD	DOD~, DOD+2, DOD+3*, DOD+5, DOD+6
DT	DRDTS+3, DRDTS+8, DRDTS+13, VET+5, DOB+5, DOD+5
DUZ(2	HRN+8, IBQ+41, AOB+3
EDFN	HRN+1~, HRN+2*, HRN+3, HRN+4, HRN+6, HRN+9
EDT	DRDTS~, DRDTS+2, DRDTS+5, DRDTS+10, DRDTS+11*, DRDTS+12, DRDTS+13, DRDTS+15
END	DTEMS~, DTEMS+1, DTEME~, DTEME+1, DTMS~, DTMS+2, DTME~, DTME+2
ERRDTM	ERR+2~, ERR+3*, ERR+4
ERROR	NAM+1~, NAM+6, MAI+5
ERROR(	NAM+8, MAI+7
>> FILE	VAL+15*
HDR	VAL+6~
HNDLR	VAL+7~, VAL+27, VAL+52
HNUM	HNUM~, HNUM+2, HNUM+3, HNUM+4
HRN	HRN~, HRN+2, HRN+6, HRN+9
IBQ	TBQ~, TBQ+1
IEN	VAL+7~, VAL+27, VAL+52
IENS	DELIP+7~, DELIP+8*, DELIP+9
II	VAL+6~, VAL+11, VAL+17, VAL+27, VAL+52, DONE+1, ERR+5*
IN3PB	DELIP+1~, DELIP+2*, DELIP+3
INSPTR	MP~, MP+1
LC	HRN+1~, HRN+5, HRN+6, HRN+8
LIST	VAL+6~, VAL+21, VAL+22, VAL+24, VAL+25!
MSG	VAL+7~, VAL+11, VAL+27, VAL+52, SSN+6, SSN+10, SSN+13, SSN+14, SSN+15, NOSSN+1* , NOSSN+3, HRN+9, IBQ+5, IBQ+30, IBQ+35, IBQ+38, IBQ+41, OTQ+10, DELIP+4, DELIP+5 , DELIP+6, DELIP+11, DELIP+12, DELIP+13, DELIP+14, IMP+4, DRDTS+7, DRDTS+8, DRDTS+12, DRDTS+13 , DRDTS+15, VET+7, MP+1, NAM+4, NAM+9, NAM+10, MAI+8, MAI+9, DOB+4, DOB+5 , DOD+5, DOD+6, ELGS+1, ELGS+6, ELGC+1, ELGC+6, ELGT+1, ELGT+6, FM+9, ROI+2 , ROI+3, AOB+1, AOB+3, ZIP+3, ZIP+4, HNUM+3, HNUM+4, CERT+3
NAME	VAL+6~, VAL+31, VAL+32, VAL+33, VAL+36, VAL+37, NAM~, NAM+3, NAM+4, NAM+5 , MAI~, MAI+3, MAI+4
NOSSN	NOSSN~, NOSSN+1, NOSSN+2, NOSSN+3
PARMS	VAL~, VAL+19, VAL+20, VAL+23!, VAL+24, VAL+27, VAL+29, VAL+30
PARMS(	VAL+22
PDATA	VAL+6~, VAL+30*, VAL+31
>> QFL	NAM+7, NAM+8, NAM+9, NAM+10, MAI+6, MAI+7, MAI+8, MAI+9
RECORD	DELIP~, DELIP+2, DELIP+8
REL	DELIP+7~, DELIP+9*, DELIP+10
RES	ROI+1~, ROI+3*
RESULT	VAL+6~, VAL+49, VAL+52, SSN+4, SSN+5, SSN+6, SSN+10, SSN+12, SSN+13, SSN+14 , SSN+15, SSN+17, NOSSN+1, NOSSN+2, NOSSN+3, HRN+3, HRN+4, HRN+8, HRN+9, IBQ+5 , IBQ+25, IBQ+30, IBQ+34, IBQ+35, IBQ+37, IBQ+38, IBQ+41, OTQ+10, OTQ+11, DELIP+4 , DELIP+11, DELIP+15, IMP+1, IMP+4, DRDTS+1, DRDTS+5, DRDTS+7, DRDTS+8, DRDTS+10, DRDTS+12 , DRDTS+13, DRDTS+15, VET+2, VET+7, NAM+2, NAM+4, NAM+9, NAM+10, MAI+2, MAI+8 , MAI+9, DOB+1, DOB+4, DOB+5, DOD+1, DOD+5, DOD+6, ELGS+1, ELGS+6, ELGC+1 , ELGC+6, ELGT+1, ELGT+6, FM+2, FM+6, FM+7, FM+9, ROI+2, ROI+3, AOB+1 , AOB+3, ZIP+1, ZIP+3, ZIP+4, ZIP+5, DTMS+1, DTME+1, HNUM+1, HNUM+3, HNUM+4 , CERT+1, CERT+3
REVAL	VAL+7~, VAL+27, VAL+52, IBQ+28, ELG+2, ELGS+1, ELGS+9, ELGC+1, ELGC+9, ELGT+1* , ELGT+9, FM+8, AOB+2*
RTN	IBQ+1~, IBQ+41*
STRT	DTEMS~, DTEMS+1, DTEME~, DTEME+1, DTMS~, DTMS+2, DTME~, DTME+2
TBQ	IBQ~, IBQ+8!, IBQ+9, IBQ+10!, IBQ+11, IBQ+12!, IBQ+13!, IBQ+14*, IBQ+31, IBQ+34 , IBQ+37, IBQ+41
TRANSTYP	DTMS~, DTMS+1, DTME~, DTME+1
TYPE	VAL+6~
U	VAL+15, VAL+27, VAL+39, VAL+40, VAL+52, SSN+7, SSN+8, SSN+9, HRN+9, IBQ+41 , VET+4, ROI+3
UID	VAL+6~, VAL+8*, VAL+9
VALFLD	VAL+6~, VAL+40*, VAL+43, VAL+54, VAL+55
VALID	VAL+6~, VAL+39, VAL+49, VAL+51
VALUE	VAL+6~, VAL+31, VAL+33, IMP~, IMP+2, IMP+3*, IMP+4
VERIFY	SSN+3~, SSN+4, SSN+9, SSN+10
VFIEN	VAL+7~, VAL+14*, VAL+15, VAL+37, VAL+39, VAL+40
VFILE	VAL~, VAL+13*, VAL+14, VAL+36
VFLD	VAL+6~, VAL+43, VAL+44, VAL+45, VAL+46, VAL+55, VAL+56
X	VAL+6~, IBQ~, IBQ+17!, IBQ+18, IBQ+19!, IBQ+20, IBQ+21!, IBQ+22!, IBQ+23, IBQ+30 , IBQ+34, IBQ+37, IBQ+41, TBQ~, TBQ+1, OTQ~, OTQ+2!, OTQ+3, OTQ+4!, OTQ+5* , OTQ+6!, OTQ+7!, OTQ+8, OTQ+10, VET+1~, VET+6, VET+7, NAM+1~, NAM+5, NAM+6 , MAI+1~, MAI+4, MAI+5
X1	VET+1~, VET+5*, VET+6
X2	VET+1~, VET+5*, VET+6
Y	ERR+2~, ERR+3*
ZIP	ZIP~, ZIP+1, ZIP+2*, ZIP+3, ZIP+4
>> ZTSK	VAL+8

Customize PDF page

Package: Patient Registration GUI

Routine: AGGWVAL

Information

Source Information

Call Graph

Call Graph Total: 16

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: