Routine: %INDX2

Information

%INDX2 ;ISC/REL,GRK,RWF - PROCESS "GRB" ;8/18/93 11:38 ;

Source file <ZINDX2.m>

Name	Comments	DBIA/ICR reference
ARGG
ARGS	;Proccess all agruments at this level
ARG	;Process one argument
NAK
EXTGLO
EG
GLO
LOC
PEEK
INC2
INC
DN
UP	;Inc LI as we save to skip the $C(10).
PEEKDN
ERR
FUN
TEXT
SPV	;
EXT	;Extrinsic functions
PAT
REPCNT
PATCODE
PATQ
ST(LOC,S)
VT(X)	;Check if a valid name
FLUSH(FL)	;Flush rest of list with this offset

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"COUNT=",$L(Z,",") Line Location: ERR+1