Routine: AGFACE5

Package	Total	Call Graph
VA Fileman	2	DD^%DT $$GET1^DIQ
Kernel	1	($$FMTE,$$HTFM)^XLFDT

Entry Points

Name	Comments	DBIA/ICR reference
PLNAME	;EP - Display Medicaid Plan Name info
GSTATE
IENNODE	;
HDG	;Q:AGHDG="Y" W !,AG("-"),!,"MEDICAID: " W:AGOPT(16)="Y" "(elig. dates null, or less than 9 months ago)"
WSTNUM	;
END
GNODE
WMCNAM	;
WRITLN	;
WELIGDT	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$$GET1^DIQ(5,AG("STATE"),1),?8,AGNUMBER Line Location: GNODE+2
Function Call: WRITE	Prompt: ! Line Location: GNODE+9
Function Call: WRITE	Prompt: !,AG("-"),!,"MEDICAID: " Line Location: HDG+0
Function Call: WRITE	Prompt: "(elig. dates null, or less than 9 months ago)" Condition for execution: AGOPT(16)="Y" Line Location: HDG+0
Function Call: WRITE	Prompt: !,$G(AG("-")),!,"MEDICAID: " Line Location: HDG+1
Function Call: WRITE	Prompt: "(elig. dates null, or less than 9 months ago)" Condition for execution: $G(AGOPT(16))="Y" Line Location: HDG+1
Function Call: WRITE	Prompt: !,"STATE",?8,"NUMBER",?27,"(updated)",?40,"ELIG DATE",?54,"COVERAGE",?67,"ELIG END" Line Location: HDG+2
Function Call: WRITE	Prompt: !,"PLAN: (none)" Line Location: PLNAME+13
Function Call: WRITE	Prompt: ?25,"(",Y,")" Line Location: PLNAME+16

FileNo	Call Tags
^DIC(5 - [#5]	GET1^DIQ
^AUPNMCD - [#9000004]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AUPNMCD - [#9000004]	PLNAME+6, PLNAME+15, PLNAME+17, PLNAME+18, PLNAME+19, PLNAME+20
^AUPNMCD("AB"	AGFACE5+3, GSTATE, GNODE, GNODE+4, PLNAME+4
^AUTNINS - [#9999999.18]	PLNAME+11

Name	Field # of Occurrence
>> %	GNODE+5, GNODE+6, GNODE+7, GNODE+8
>> AG("-"	HDG+1
>> AG("STATE"	AGFACE5+4, GSTATE, GNODE, GNODE+2, GNODE+4, END!, PLNAME+4
AGBDT	PLNAME+2~, PLNAME+18*, PLNAME+21, PLNAME+22, PLNAME+23
AGCOV	PLNAME+2~, PLNAME+20*, PLNAME+23
AGDATA	PLNAME+2~, PLNAME+6*, PLNAME+7, PLNAME+9
AGEDT	PLNAME+2~, PLNAME+19*, PLNAME+23
AGHDG	AGFACE5+4, END!, HDG+1, HDG+2
AGIEN	PLNAME+2~, PLNAME+3, PLNAME+4, PLNAME+6, PLNAME+15, PLNAME+17, PLNAME+18, PLNAME+19, PLNAME+20
AGINSPTR	PLNAME+2~, PLNAME+9*, PLNAME+10, PLNAME+11
AGNINE	AGFACE5+6*, END!, PLNAME+22
AGNUMBER	GSTATE, GNODE, GNODE+1, GNODE+2, GNODE+4, END!, PLNAME+4
>> AGOPT(16	HDG+1, PLNAME+22
AGPLNAME	PLNAME+2~, PLNAME+11*, PLNAME+12
AGPLNUM	END!
AGPRTXTR	AGFACE5+4*, END!
AGSTNUM	AGFACE5+4*, END!
AGUPDT	PLNAME+2~, PLNAME+14, PLNAME+17, PLNAME+18, PLNAME+19, PLNAME+20
>> DA	GNODE+4*, GNODE+5, GNODE+7
>> DFN	AGFACE5+3, GSTATE, GNODE, GNODE+4, PLNAME+4
DT	PLNAME+21
IEN	END!
U	PLNAME+9, PLNAME+11, PLNAME+15, PLNAME+18, PLNAME+19, PLNAME+20
>> Y	PLNAME+15*, PLNAME+16