Routine: DIEZ4

Information

DIEZ4 ;SFISC/MKO-COMPILE INPUT TEMPLATE, RECORD-LEVEL INDEXES ;2:15 PM 14 Jul 1999

Source file <DIEZ4.m>

Name	Comments	DBIA/ICR reference
RECXR(DIEZAR)	;Build routines for record-level indexes
GETXR(DIEZXR)	;Get code for one index DIEZXR
BLDDEC(DIEZXR,DIEZO)	;Build data extraction code
BLDKCHK(DIEZUI)	;Build code to check key for xref
L(X)	;Add CODE to ^UTILITY
DOTLINE(X)	;
NEWROU	;Start a new routine
SAVE	;Get the next available routine number