C CHARACTER*20 AVBL(MXFLD),FIELD(MXFLD) CHARACTER*6 DATSET C LOGICAL RITEHD,RITE2 C COMMON /RQSTFLD/ & KGTYPE,IOUTYP,SVALUE,NFLD,IGET(MXFLD),DEC(MXFLD) &,IQ(MXFLD),IS(MXFLD),ISMSTG(MXFLD),ISMFUL(MXFLD) &,ISMOUT(MXFLD),LVLS(MXLVL,MXFLD),IDENT(MXFLD) &,IFILV(MXFLD),ID(25) &,RITEHD,RITE2,DATSET,FIELD,AVBL