Name	Line Occurrences
BEGIN	EN1
BEGLN	BEGIN+3, BEGIN+4, BEGIN+5
BEGLN1	BEGIN+2
EN	DIARR3+9
END	EN1+1
F1	EN1+3
FLDS	EN1+6, FLDS+4
ID	EN1+2
SET	EN+2, EN1+5, BEGLN+1, BEGLN1, ID, ID+1, FLDS+1, FLDS+6
SUB	BEGIN+1, BEGIN+3, BEGIN+5
SV	EN+2, EN1, EN1+1, EN1+2, EN1+3, EN1+4

Name	Field # of Occurrence
>> DIARFND	DIARR3+7
>> DIAROAT(	BEGIN+1*
>> DIAROBCK	FLDS*, FLDS+4
>> DIAROBF	BEGIN, BEGLN, BEGLN1, END
>> DIAROBF1	FLDS+3*
>> DIAROBFN	DIARR3+8, BEGIN, BEGLN, SUB, END*, END+1
>> DIAROBPT	DIARR3+8*, BEGIN+1
>> DIAROFLD	DIARR3+8*
>> DIAROFLD(	DIARR3+8, BEGIN, END, FLDS+1
>> DIAROIDF	DIARR3+8*
>> DIAROIDF(	BEGIN, END, ID*
>> DIAROLNE	EN+2, EN1+5, BEGIN+3, BEGIN+4, BEGIN+5, BEGIN+6, BEGLN, BEGLN1, ID, ID+1 , FLDS+1, FLDS+4, FLDS+6, SET+1, SET+2
>> DIAROLUP	FLDS+2*
>> DIAROLUP(	BEGLN1!, F1*
>> DIAROLVL	DIARR3+8, BEGIN, BEGLN1, END, END+2*, ID, ID+1, FLDS+1, FLDS+2, FLDS+5
>> DIAROM	DIARR3+8, DIARR3+9, SET+2
>> DIAROREQ	DIARR3+8, DIARR3+9, SET+2
>> DIAROSF	EN+2*
>> DIAROSFN	EN+2*, EN1+3
>> DIAROSTK(	BEGIN*, BEGLN1, END, ID, ID+1, FLDS+1, FLDS+2, FLDS+5
>> DIAROSUB	BEGIN+1*, FLDS+5
>> DIAROSUB(	SUB*, END+1
>> DIAROTAB	SET*, SET+1
>> DIAROVAL	FLDS+2*, FLDS+4, FLDS+6
>> DIAROX	DIARR3+9, EN, EN+1, EN+2, EN+3, EN1+3, EN1+4, SV, BEGIN, BEGIN+1 , ID+1, FLDS+2, FLDS+3, FLDS+4, FLDS+7, F1
>> DIAROX1	EN+1*, EN1, EN1+1, EN1+2, EN1+5
>> DIAROXPL	SV*, BEGIN+1, BEGIN+3, BEGIN+4, BEGIN+5, BEGIN+6
DIAROXX	FLDS+7!
>> DIAROZ	DIARR3+8, DIARR3+9, BEGIN+2
>> DIARTAB	DIARR3+8, BEGIN, BEGLN1, SUB, END+1, ID, ID+1, FLDS+1, FLDS+2, FLDS+5* , SET
>> DIARZZ	DIARR3+8, SET+1, SET+2
IO(0	DIARR3+7
U	EN+2, EN1+3, BEGIN, BEGIN+3, BEGIN+5, BEGIN+6, BEGLN1, SUB, END, ID , ID+1, FLDS+1, FLDS+2, FLDS+3, FLDS+4, FLDS+5, F1

Name	Line Occurrences (* Changed, ! Killed)
^TMP("DIAR"	DIARR3+9
^TMP("DIARO"	DIARR3+8!, SET+2*

Routine: DIARR3