/*
 * Alternate uses for procedure block fields, applied to records.
 */
#define nfields	nparam		/* number of fields */
#define recnum	nstatic		/* record number */
#define recname	pname		/* record name */