Routine: AGSSRA

Information

AGSSRA ; IHS/ASDS/EFG - REPORT WRITER #1 ;

Source file <AGSSRA.m>

Package	Total	Call Graph
IHS Patient Registration	1	(,AGSSHD,AGSSHDR)^AGSSPRT

Package	Total	Caller Graph
IHS Patient Registration	1	AGSSR

Name	Comments	DBIA/ICR reference
LOAD	;EP - load crossreference into ^AGSTEMP
PRINT	;EP -

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"The number of ",AGSSHDR," is ",$G(^AGSSTEMP(AGSSITE,"TOT","RA")),! Line Location: PRINT+5

Name	Line Occurrences (* Changed, ! Killed)
^AGSSTEMP(	LOAD+4, PRINT+5
^AGSTEMP(	LOAD+2!, LOAD+4, LOAD+5, PRINT+2
^AUPNPAT("AS"	LOAD+3
^DPT - [#2]	LOAD+3, LOAD+4