Routine: MCORMN3

Package	Total	Caller Graph
Medicine	1	MCORMN1

Name	Comments	DBIA/ICR reference
WD	; word-processing field
LEVEL	; handle data at this level
WP2	; Note: We cannot be sure of the value of MCDIC.
SPECS	;Naked Reference for this paragraph reference to ^DD(FILE#,FIELD,0)
Q
FIELD	; process single field
COLON	; process set of fields delimited by colon
SUBFIL	; process data in a sub-file
PROC	;process a single datum
SPEC	;

Name	Line Occurrences (* Changed, ! Killed)
^DD(	COLON+2, FIELD+1, FIELD+3, PROC+3, SPECS+2, SPECS+3
^DIC - [#1]	MCORMN3+8

Name	Field # of Occurrence
^(	LEVEL+1, WP2+2, SPECS+2, SPECS+3
^("GL"	MCORMN3+8
^(0	LEVEL+1, FIELD+1, FIELD+3, SPECS+1, SPECS+2, SPECS+3
^(2	SPEC+1

Name	Field # of Occurrence
>> D0	PROC+2*
>> D1	PROC+2*
>> I	LEVEL+4*
MCATT	WD+1~, WD+3, WD+4
MCC	Q!, FIELD+1, FIELD+2, FIELD+4, FIELD+5, PROC+3, WP2+1, SUBFIL+3, SPEC+1, SPECS+1* , SPECS+2, SPECS+3
MCD0	MCORMN3+3*, Q!, PROC+2
>> MCD1	PROC+2
>> MCDA	MCORMN3+3, LEVEL+1, FIELD+4, FIELD+5, SUBFIL+2, SUBFIL+3, SUBFIL+4
>> MCDA(	SUBFIL+1, SUBFIL+2*, SUBFIL+3, SUBFIL+4, SUBFIL+5!
>> MCDA(0	MCORMN3+3*, Q!
MCDI	LEVEL+1, Q!, COLON+2, FIELD+1, PROC+3, SUBFIL+1~, SUBFIL+3
>> MCDIC	MCORMN3+3, MCORMN3+8, LEVEL+1, FIELD+4, FIELD+5, WP2+1, SUBFIL+2, SUBFIL+3, SUBFIL+4*
>> MCDIC(	SUBFIL+2*, SUBFIL+4, SUBFIL+5!
MCDIL	MCORMN3+3, Q!, SUBFIL+1, SUBFIL+2, SUBFIL+3, SUBFIL+4, SUBFIL+5, SUBFIL+6*
>> MCDIQ	MCORMN3+6*, FIELD+6, PROC+5, WP2+2
>> MCDIQ(0	MCORMN3+5*, FIELD+6, PROC+1, PROC+4
MCDIQ0	MCORMN3+2~, MCORMN3+3, MCORMN3+5, MCORMN3+6, MCORMN3+7, Q
MCDIQ1	LEVEL+4, Q!, COLON+1, COLON+2, FIELD+1, PROC+3, SUBFIL+1~
>> MCDIQ2	COLON+1*, COLON+2
>> MCDR	MCORMN3+3, LEVEL+4, SUBFIL+2, SUBFIL+4
>> MCDR(	SUBFIL+1, SUBFIL+2
MCDRS	Q!
MCDRS(	SUBFIL+2*, SUBFIL+4, SUBFIL+5!
MCE	MCORMN3+7*, Q!, PROC+5, WP2+2
MCF	Q!, FIELD+1*, WD+3
MCI	Q!, SUBFIL+1~
MCJ	Q!, FIELD+1*, FIELD+3, PROC+2, PROC+3, SUBFIL+1, SUBFIL+2, SUBFIL+3
MCPCT	Q!, SPECS+1*
MCWP	WD+1~, WD+3, WP2+2
MCX	Q!, FIELD+1, FIELD+3, FIELD+5, PROC+2, WD+2, WP2+1*, WP2+2
MCY	Q!, FIELD+1, FIELD+4, FIELD+5, FIELD+6, PROC+2!, PROC+3, PROC+4, PROC+5, SPECS+1* , SPECS+2, SPECS+3
U	LEVEL+1, FIELD+1, FIELD+3, FIELD+5, PROC+2, PROC+3, WD+3, SPECS+1, SPECS+2, SPECS+3
>> X	PROC+2*
Y	PROC+2*!

Information