Routine: AGMSPFRM

Package	Total	Call Graph
IHS Patient Registration	8	PTLK^AG EN^AGMSP1 EN^AGMSP2 EN^AGMSP3 EN^AGMSP4 EN^AGMSP5 EN^AGMSP6 EN^AGMSP7
VA Fileman	3	DD^%DT ^DIC EN^DIQ1
IHS VA Utilities	2	^XBCLS ^XBDBQUE

Package

Total

Call Graph

PTLK^AG EN^AGMSP1 EN^AGMSP2 EN^AGMSP3 EN^AGMSP4 EN^AGMSP5 EN^AGMSP6 EN^AGMSP7

DD^%DT ^DIC EN^DIQ1

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?10,"WARNING: Confidential Patient Information, Privacy Act Applies" Line Location: HDR+8
Function Call: WRITE	Prompt: !,AGLINE("EQ") Line Location: HDR+9
Function Call: WRITE	Prompt: !,?22,"MEDICARE SECONDARY PAYER QUESTIONNAIRE" Line Location: HDR+10
Function Call: WRITE	Prompt: !,AGLINE("-") Line Location: HDR+11
Function Call: WRITE	Prompt: !,?52,"REPORT DATE: " Line Location: HDR+13
Function Call: WRITE	Prompt: !,AGLINE("EQ"),! Line Location: HDR+15
Routine Call	DIC Line Location: AGMSPFRM+14

FileNo	Call Tags
^AUPNMSP - [#9000037]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	HDR+3
^DPT - [#2]	HDR+2
^UTILITY("DIQ1"	PROCESS+2!

Name	Line Occurrences
BLANK	AGMSPFRM+10
BLANK2	AGMSPFRM+18
HDR	PROCESS+5, PROCESS+7, PROCESS+8, PROCESS+9, PROCESS+10, PROCESS+11, PROCESS+12

Name	Field # of Occurrence
>> AG("DA"	AGMSPFRM+14*, AGMSPFRM+16, PROCESS+3
>> AG("MSPPRINT"	AGMSPFRM+10, BLANK2+2!
>> AG("TODAY"	HDR+4*, HDR+14
>> AGCHRT	HDR+3*, HDR+12
>> AGLINE("-"	HDR+5*, HDR+11
>> AGLINE("EQ"	HDR+6*, HDR+9, HDR+15
>> AGLINE("_"	HDR+7*
>> AGPAT	HDR+2*, HDR+12
>> DA	PROCESS+3*
DD	AGMSPFRM+11!, AGMSPFRM+15!, BLANK2!
>> DFN	BLANK+3*, HDR+2, HDR+3, HDR+12, HDR+14
DIC	AGMSPFRM+11!, AGMSPFRM+12, AGMSPFRM+15!, BLANK2!, PROCESS+3
DIC(0	AGMSPFRM+13*
DIQ	PROCESS+2!, PROCESS+3*
DIQ(0	PROCESS+2!
DO	AGMSPFRM+11!, AGMSPFRM+15!, BLANK2!
>> DR	PROCESS+3*
DT	HDR+4
DUZ(2	HDR+3
>> FORM	PROCESS+4, PROCESS+6, HDR+1
IOF	HDR+1
MSPRES	PROCESS+1!, PROCESS+13!
U	BLANK+2, HDR+2, HDR+3
>> X	BLANK+2
>> XBNS	BLANK2+1*
>> XBRP	BLANK2+1*
Y	AGMSPFRM+11!, AGMSPFRM+14, AGMSPFRM+15!, BLANK2!, HDR+4*

Information