Routine: AGGMCTRG

Package	Total	Call Graph
Kernel	2	^%ZTER $$NOW^XLFDT
Patient Registration GUI	1	($$DATE,$$FMTE)^AGGUL1
VA Fileman	1	$$GET1^DIQ

Name	Comments	DBIA/ICR reference
XELG
ECCOV(DATA,DFN,AGGMCCOV,AGGMCNME,AGGMCNUM,AGGMCDOB)	; EP -- AGG MEDICARE PART D TRIGGER ; Input ; AGGMCCOV - Type of Medicare coverage ; AGGMCNME - Medicare Name - From Parent Form ; AGGMCNUM - Medicare Number - From Parent Form ; AGGMCDOB - Medicare DOB - From Parent Form
HDR	;
ERR	;
MGND(DFN)	;EP - Return Gender
UP	;
XECCOV
MCNM(DFN,AGGMCNME)	;EP - Medicare Name - Plug in parent form value and if blank - Patient File name
ELG(DATA,AGGMCCOV)	; EP -- AGG MEDICARE ELIG TRIGGER ; Input ; AGGMCCOV - Coverage Type
MCDOB(DFN,AGGMCDOB)	;EP - Date of Birth - Plug in parent value and if blank - Patient File value

Name	Field # of Occurrence
^%ZTER	ERR+1
$$DATE^AGGUL1	ECCOV+15
$$FMTE^AGGUL1	MCDOB+1, MCDOB+2
$$GET1^DIQ	MGND+1, MCNM+2
$$NOW^XLFDT	ERR+3

RPC Name	Call Tags
AGG MEDICARE PART D TRIGGER	ECCOV
AGG MEDICARE ELIG TRIGGER	ELG

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

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	ERR+3
^DPT - [#2]	MCDOB+2
^TMP("AGGMCTRG"	ECCOV+9, ELG+6

Name	Line Occurrences
$$MCDOB	ECCOV+54
$$MCNM	ECCOV+50
$$MGND	ECCOV+53
HDR	ECCOV+18, ELG+10
UP	ECCOV+23, ECCOV+24, ECCOV+25, ECCOV+26, ECCOV+27, ECCOV+28, ECCOV+29, ECCOV+30, ECCOV+31, ECCOV+35 , ECCOV+36, ECCOV+37, ECCOV+38, ECCOV+39, ECCOV+40, ECCOV+41, ECCOV+42, ECCOV+43, ECCOV+47, ECCOV+48 , ECCOV+49, ECCOV+50, ECCOV+51, ECCOV+52, ECCOV+53, ECCOV+54, ECCOV+55, ELG+16, ELG+17, ELG+18 , ELG+19, ELG+20, ELG+21, ELG+22, ELG+23, ELG+24, ELG+28, ELG+29, ELG+30, ELG+31 , ELG+32, ELG+33, ELG+34, ELG+35, ELG+36, ELG+40, ELG+41, ELG+42, ELG+43, ELG+44 , ELG+45, ELG+46, ELG+47, ELG+48
XECCOV	ECCOV+22, ECCOV+34, ELG+15, ELG+27

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABLE	ECCOV+7~, ECCOV+23, ECCOV+24, ECCOV+25, ECCOV+26, ECCOV+27, ECCOV+28, ECCOV+29, ECCOV+30, ECCOV+31* , ECCOV+35, ECCOV+36, ECCOV+37, ECCOV+38, ECCOV+39, ECCOV+40, ECCOV+41, ECCOV+42, ECCOV+43, ECCOV+47 , ECCOV+48, ECCOV+49, ECCOV+50, ECCOV+51, ECCOV+52, ECCOV+53, ECCOV+54, ECCOV+55, ELG+4~, ELG+16* , ELG+17, ELG+18, ELG+19, ELG+20, ELG+21, ELG+22, ELG+23, ELG+24, ELG+28, ELG+29 , ELG+30, ELG+31, ELG+32, ELG+33, ELG+34, ELG+35, ELG+36, ELG+40, ELG+41, ELG+42 , ELG+43, ELG+44, ELG+45, ELG+46, ELG+47, ELG+48, UP+1
AGGMCCOV	ECCOV~, ECCOV+12, ECCOV+22, ECCOV+34, ECCOV+46, ELG~, ELG+14, ELG+15, ELG+27, ELG+39
AGGMCDOB	ECCOV~, ECCOV+15*, ECCOV+54, MCDOB~, MCDOB+1
AGGMCNME	ECCOV~, ECCOV+13*, ECCOV+50, MCNM~, MCNM+1
AGGMCNUM	ECCOV~, ECCOV+14*, ECCOV+51
>> BMXSEC	ERR+4*
>> CLEAR	ECCOV+23, ECCOV+24, ECCOV+25, ECCOV+26, ECCOV+27, ECCOV+28, ECCOV+29, ECCOV+30, ECCOV+31, ECCOV+35 , ECCOV+36, ECCOV+37, ECCOV+38, ECCOV+39, ECCOV+40, ECCOV+41, ECCOV+42, ECCOV+43, ECCOV+47, ECCOV+48 , ECCOV+49, ECCOV+50, ECCOV+51, ECCOV+52, ECCOV+53, ECCOV+54, ECCOV+55, ELG+16, ELG+17, ELG+18 , ELG+19, ELG+20, ELG+21, ELG+22, ELG+23, ELG+24, ELG+28, ELG+29, ELG+30, ELG+31 , ELG+32, ELG+33, ELG+34, ELG+35, ELG+36, ELG+40, ELG+41, ELG+42, ELG+43, ELG+44 , ELG+45, ELG+46, ELG+47, ELG+48, UP+1
DATA	ECCOV~, ECCOV+9, ECCOV+10, ECCOV+19, XECCOV, ELG~, ELG+6, ELG+7, ELG+11, XELG , ERR+5, UP+1
DFN	ECCOV~, ECCOV+50, ECCOV+53, ECCOV+54, MGND~, MGND+1, MCNM~, MCNM+2, MCDOB~, MCDOB+2
ECREL	ECCOV+7~, ELG+4~
ERRDTM	ERR+2~, ERR+3*, ERR+4
>> HDR	ECCOV+19, ELG+11, HDR+1*
HELP	ECCOV+7~, ECCOV+23, ECCOV+24, ECCOV+25, ECCOV+26, ECCOV+27, ECCOV+28, ECCOV+29, ECCOV+30, ECCOV+31* , ECCOV+35, ECCOV+36, ECCOV+37, ECCOV+38, ECCOV+39, ECCOV+40, ECCOV+41, ECCOV+42, ECCOV+43, ECCOV+47 , ECCOV+48, ECCOV+49, ECCOV+50, ECCOV+51, ECCOV+52, ECCOV+53, ECCOV+54, ECCOV+55, ELG+4~, ELG+16* , ELG+17, ELG+18, ELG+19, ELG+20, ELG+21, ELG+22, ELG+23, ELG+24, ELG+28, ELG+29 , ELG+30, ELG+31, ELG+32, ELG+33, ELG+34, ELG+35, ELG+36, ELG+40, ELG+41, ELG+42 , ELG+43, ELG+44, ELG+45, ELG+46, ELG+47, ELG+48, UP+1
IEN	ECCOV+7~, ELG+4~
II	ECCOV+7~, ECCOV+11, ECCOV+19, XECCOV, ELG+4~, ELG+8, ELG+11, XELG, ERR+5, UP+1
REQ	ECCOV+7~, ECCOV+23, ECCOV+24, ECCOV+25, ECCOV+26, ECCOV+27, ECCOV+28, ECCOV+29, ECCOV+30, ECCOV+31* , ECCOV+35, ECCOV+36, ECCOV+37, ECCOV+38, ECCOV+39, ECCOV+40, ECCOV+41, ECCOV+42, ECCOV+43, ECCOV+47 , ECCOV+48, ECCOV+49, ECCOV+50, ECCOV+51, ECCOV+52, ECCOV+53, ECCOV+54, ECCOV+55, ELG+4~, ELG+16* , ELG+17, ELG+18, ELG+19, ELG+20, ELG+21, ELG+22, ELG+23, ELG+24, ELG+28, ELG+29 , ELG+30, ELG+31, ELG+32, ELG+33, ELG+34, ELG+35, ELG+36, ELG+40, ELG+41, ELG+42 , ELG+43, ELG+44, ELG+45, ELG+46, ELG+47, ELG+48, UP+1
SOURCE	ECCOV+7~, ECCOV+23, ECCOV+24, ECCOV+25, ECCOV+26, ECCOV+27, ECCOV+28, ECCOV+29, ECCOV+30, ECCOV+31* , ECCOV+35, ECCOV+36, ECCOV+37, ECCOV+38, ECCOV+39, ECCOV+40, ECCOV+41, ECCOV+42, ECCOV+43, ECCOV+47 , ECCOV+48, ECCOV+49, ECCOV+50, ECCOV+51, ECCOV+52, ECCOV+53, ECCOV+54, ECCOV+55, ELG+4~, ELG+16* , ELG+17, ELG+18, ELG+19, ELG+20, ELG+21, ELG+22, ELG+23, ELG+24, ELG+28, ELG+29 , ELG+30, ELG+31, ELG+32, ELG+33, ELG+34, ELG+35, ELG+36, ELG+40, ELG+41, ELG+42 , ELG+43, ELG+44, ELG+45, ELG+46, ELG+47, ELG+48, UP+1
TYPE	ECCOV+7~, ECCOV+23, ECCOV+24, ECCOV+25, ECCOV+26, ECCOV+27, ECCOV+28, ECCOV+29, ECCOV+30, ECCOV+31* , ECCOV+35, ECCOV+36, ECCOV+37, ECCOV+38, ECCOV+39, ECCOV+40, ECCOV+41, ECCOV+42, ECCOV+43, ECCOV+47 , ECCOV+48, ECCOV+49, ECCOV+50, ECCOV+51, ECCOV+52, ECCOV+53, ECCOV+54, ECCOV+55, ELG+4~, ELG+16* , ELG+17, ELG+18, ELG+19, ELG+20, ELG+21, ELG+22, ELG+23, ELG+24, ELG+28, ELG+29 , ELG+30, ELG+31, ELG+32, ELG+33, ELG+34, ELG+35, ELG+36, ELG+40, ELG+41, ELG+42 , ELG+43, ELG+44, ELG+45, ELG+46, ELG+47, ELG+48, UP+1
U	MCDOB+2, UP+1
UID	ECCOV+7~, ECCOV+8, ECCOV+9, ELG+4~, ELG+5, ELG+6
VALUE	ECCOV+7~, ECCOV+23, ECCOV+24, ECCOV+25, ECCOV+26, ECCOV+27, ECCOV+28, ECCOV+29, ECCOV+30, ECCOV+31* , ECCOV+35, ECCOV+36, ECCOV+37, ECCOV+38, ECCOV+39, ECCOV+40, ECCOV+41, ECCOV+42, ECCOV+43, ECCOV+47 , ECCOV+48, ECCOV+49, ECCOV+50, ECCOV+51, ECCOV+52, ECCOV+53, ECCOV+54, ECCOV+55, ELG+4~, ELG+16* , ELG+17, ELG+18, ELG+19, ELG+20, ELG+21, ELG+22, ELG+23, ELG+24, ELG+28, ELG+29 , ELG+30, ELG+31, ELG+32, ELG+33, ELG+34, ELG+35, ELG+36, ELG+40, ELG+41, ELG+42 , ELG+43, ELG+44, ELG+45, ELG+46, ELG+47, ELG+48, UP+1
VISIBLE	ECCOV+7~, ECCOV+23, ECCOV+24, ECCOV+25, ECCOV+26, ECCOV+27, ECCOV+28, ECCOV+29, ECCOV+30, ECCOV+31* , ECCOV+35, ECCOV+36, ECCOV+37, ECCOV+38, ECCOV+39, ECCOV+40, ECCOV+41, ECCOV+42, ECCOV+43, ECCOV+47 , ECCOV+48, ECCOV+49, ECCOV+50, ECCOV+51, ECCOV+52, ECCOV+53, ECCOV+54, ECCOV+55, ELG+4~, ELG+16* , ELG+17, ELG+18, ELG+19, ELG+20, ELG+21, ELG+22, ELG+23, ELG+24, ELG+28, ELG+29 , ELG+30, ELG+31, ELG+32, ELG+33, ELG+34, ELG+35, ELG+36, ELG+40, ELG+41, ELG+42 , ELG+43, ELG+44, ELG+45, ELG+46, ELG+47, ELG+48, UP+1
Y	ERR+2~, ERR+3*
>> ZTSK	ECCOV+8, ELG+5

Customize PDF page

Package: Patient Registration GUI

Routine: AGGMCTRG

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: