Routine: GMTSMCZZ

Information

GMTSMCZZ ;SLC/SBW - Medicine 2.2 HS Component ;18/APRIL/95

Name	Comments	DBIA/ICR reference
GMTSMCPS	;WISC/DCB - Medicine 2.2 Health Summary Component ;5/10/94
BEG	;One Line summary only
BRIEF	;Brief Summary
ABN	;Print Brief summary for only abnomaral or Null
FULL	;Full Sunnary
CAP	;Capture
ADBF	;Print Full Summary for only abnotmal or null
START(BRIEF,MCTYPE)	;Get the record and display the record
SEARCH	;SEARCH FOR SELECTED PATIENT
GETREC(MCL,RMAR,TV,VV,SP)	;Return record
REPORT(LOOP,MCL,RMAR,BLINE,TV,VV,SP)	;Report on procedure
WARP(VALUE,LENGTH,TEMP,MAX)	;WARP A FIELD
WORD(MCL,LOOP,TITLE,RMAR,TV,VV,SP)	;Display word processing
CONVERT(TITLE)	;Convert a word to upper/lower case TEMP = Temp
PRINT(VALUE,VV,TITLE,TV,SP)	;Print a field and its value
RETURN(TYPE,LINE)	;Return key elements
EXIT	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,MCDATE,?(TV+SP),MCPROC Line Location: GETREC+7
Function Call: WRITE	Prompt: !,BLINE Line Location: GETREC+8
Function Call: WRITE	Prompt: ! Line Location: GETREC+11
Function Call: WRITE	Prompt: ! Line Location: GETREC+16
Function Call: WRITE	Prompt: ! Line Location: REPORT+10
Function Call: WRITE	Prompt: ! Line Location: WORD+9