Routine: GMTSLREM

Package	Total	Call Graph
Health Summary	4	^GMTSLREE $$WRAP^GMTSORC REGDTM4^GMTSU CKP^GMTSUP

Entry Points

Name	Comments	DBIA/ICR reference
MAIN	; Main Entry Point
WRT	; Writes Electron Microscopy Record
WRTSPC	; Writes Specimen field entries
TEXT	; Handles GROSS DESCRIPTION & MICROSCOPIC EXAM/DX Print
SUPPR	; Writes Supplementary Report
WRTP	; Writes Procedure field

Name	Field # of Occurrence
^GMTSLREE	MAIN+4
$$WRAP^GMTSORC	TEXT+3, SUPPR+5, WRTP+7
REGDTM4^GMTSU	SUPPR+2
CKP^GMTSUP	MAIN+5, WRT+2, WRTSPC+1, WRTSPC+2, TEXT+1, TEXT+4, TEXT+5, SUPPR+2, SUPPR+7, WRTP+3 , WRTP+8, WRTP+9

Name	Line Occurrences
Function Call: WRITE	Prompt: ?8,"Collected:",?19,$P(X,U),?31,"Acc:",?36,$P(X,U,2),! Line Location: WRT+3
Function Call: WRITE	Prompt: ?9,"Specimen:" Line Location: WRTSPC+1
Function Call: WRITE	Prompt: ?19,^TMP("LREM",$J,IX,.1,GMS),! Line Location: WRTSPC+2
Function Call: WRITE	Prompt: ?(17-$L(X)),X_":",! Line Location: TEXT+1
Function Call: WRITE	Prompt: $P(GMTSLN,"\|"),! Line Location: TEXT+4
Function Call: WRITE	Prompt: "Supplementary Rpt: ",X,! Line Location: SUPPR+2
Function Call: WRITE	Prompt: $P(GMTSRL,"\|"),! Line Location: SUPPR+6
Function Call: WRITE	Prompt: ?7,"Procedures:" Line Location: WRTP+3
Function Call: WRITE	Prompt: ?21,$P(GMQ,"\|"),! Line Location: WRTP+8

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	MAIN+1, MAIN+2
^TMP("LREM"	MAIN+4, MAIN+5, MAIN+7, MAIN+8, MAIN+9, MAIN+10!, WRT+6, WRTSPC+2, TEXT+2, SUPPR+2 , SUPPR+4, WRTP+2, WRTP+5, WRTP+6

Name	Field # of Occurrence
^(	WRT+6, TEXT+2, SUPPR+4

Name	Field # of Occurrence
>> DFN	MAIN+1, MAIN+2
GMI	MAIN+1~, MAIN+5*
GMJ	WRT+1~
GMK	WRTP+1~, WRTP+9*
GMQ	WRTP+1~, WRTP+6, WRTP+7, WRTP+8, WRTP+9
GMS	WRTSPC+1~, WRTSPC+2
>> GMT	WRTP+4, WRTP+5, WRTP+6
GMTSLN	TEXT+1~, TEXT+2, TEXT+3, TEXT+4, TEXT+5
GMTSLNI	TEXT+1~, TEXT+5*
>> GMTSNDM	MAIN+3
>> GMTSNPG	MAIN+5
>> GMTSQIT	MAIN+5, WRT+2, WRTSPC+1, WRTSPC+2, TEXT+1, TEXT+4, TEXT+5, SUPPR+2, SUPPR+7, WRTP+2 , WRTP+3, WRTP+8, WRTP+9
GMTSR	SUPPR+1~, SUPPR+3, SUPPR+4
GMTSRL	SUPPR+1~, SUPPR+4, SUPPR+5, SUPPR+6, SUPPR+7
GMTSRLI	SUPPR+1~, SUPPR+7*
IX	MAIN+1~, MAIN+4, MAIN+5, MAIN+7, MAIN+8, MAIN+9, WRT+6, WRTSPC+2, TEXT+2, SUPPR+2 , SUPPR+4, WRTP+2, WRTP+5, WRTP+6
IX0	MAIN+1~, MAIN+6, MAIN+7, MAIN+8, WRT+1, WRT+4, WRT+5, WRT+6, TEXT+2, WRTP+2 , WRTP+5, WRTP+6
IX1	WRT+1~, WRT+6, SUPPR+1, SUPPR+2*, SUPPR+4, WRTP+2, WRTP+5, WRTP+6
LN	TEXT+1~, TEXT+2*
LRDFN	MAIN+1~, MAIN+2*
MAX	MAIN+1~, MAIN+3*, MAIN+5
SRDATE	SUPPR+1~, SUPPR+2*
U	WRT+3, WRTP+6
X	MAIN+1~, MAIN+8, WRT+3, WRT+6, TEXT+1, SUPPR+1~, SUPPR+2*