Routine: GMRCQCST

Information

GMRCQCST ;SLC/DCM - Gather all consults for QC that do not have status of discontinued,complete, or expired ;5/21/98 10:53

Source file <GMRCQCST.m>

Name	Comments	DBIA/ICR reference
STS(SRV)	;;Set partial statistics into the ^TMP global for printing
EN	;Use fileman to get service
EN1	;Collect all consults for service chosen, excluding status discontinued
PROC(GMRCSRV)	;Set status' info into the ^TMP global
KILL	;Kill all variables

FileNo	Call Tags
^GMR(123.5 - [#123.5]	Classic Fileman Calls