Routine: AGSSLETR

Information

AGSSLETR ; IHS/ASDS/EFG - push/pull SSN form letter ;

Source file <AGSSLETR.m>

Package	Total	Call Graph
VA Fileman	1	DT^DICRW

Package	Total	Caller Graph
IHS Patient Registration	1	AGSSINST

Name	Comments	DBIA/ICR reference
PUT	;put text into file
TEXT	;TEXT TO FOLLOW

Name	Field # of Occurrence
DT^DICRW	PUT+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"No SITE ... Exiting",*7,!! Line Location: PUT+3
Function Call: WRITE	Prompt: !,"Letter already present .. not re-installed",! Line Location: PUT+4

Name	Line Occurrences (* Changed, ! Killed)
^AGFAC - [#9009061]	PUT+3, PUT+4, PUT+6, PUT+8
^AUTTSITE(1	PUT+2

Name	Field # of Occurrence
$T(TEXT+AGI	PUT+5