Executing on mainframe FOCUS 7.3.5

Using the following masters

===============================================================================

FILE=FLKUPMST ,SUFFIX=FOC
SEGNAME=LKUPSEG ,SEGTYPE=S01
FIELDNAME =LKUPKEY ,E01 ,A3 , FIELDTYPE=I, $
FIELDNAME =LKUPDATE ,E02 ,I4L , $

FILE=FMST, SUFFIX=FOC
SEGNAME=SEG01, SEGTYPE=S01
FIELDNAME =PKKEY ,E01 ,A9 , FIELDTYPE=I, $
FIELDNAME =LKUPKEY ,E02 ,A3 , FIELDTYPE=I, $
SEGNAME=LKUPSEG,SEGTYPE=KU,PARENT=SEG01,CRSEG=LKUPSEG,
CRFILE=FLKUPMST,CRKEY=LKUPKEY, $

===============================================================================

Executing the following code against a FOCUS database (SUFFIX=FOC) -- no errors

SET XFOCUS=ON

CREATE FILE FLKUPMST
MODIFY FILE FLKUPMST
FREEFORM LKUPKEY LKUPDATE
MATCH LKUPKEY
ON NOMATCH INCLUDE
ON MATCH REJECT
DATA
LKUPKEY=ABS, LKUPDATE= 1601,$
END

CREATE FILE FMST
MODIFY FILE FMST
FREEFORM PKKEY LKUPKEY
MATCH PKKEY
ON MATCH REJECT
ON NOMATCH INCLUDE
DATA
PKKEY=00001CAD, LKUPKEY=ABS,$
END

TABLE FILE FMST
PRINT PKKEY LKUPKEY
ON TABLE HOLD
END

MODIFY FILE FMST
FIXFORM ON HOLD FROM HOLD

COMPUTE TESTCONT = LOOKUP(LKUPDATE);

MATCH PKKEY
ON MATCH TYPE " ON NOMATCH REJECT
DATA
END

When I change the SUFFIX to XFOCUS in the master and execute the above
focexec I get the following error:

ERROR AT OR NEAR LINE 31 IN PROCEDURE LU FOCEXEC
(FOC449) THE LOOKUP OR FIND FIELD IS NOT INDEXED (FIELDTYPE=I): LKUPKEY
BYPASSING TO END OF COMMAND

Has anyone ever come across this error against an XFOCUS database?

Regards,

IBI Tech support has reported that this is a known issue with 7.3.5 corrected in 7.3.10

This message has been edited. Last edited by: A Ceccucci,

WebFOCUS 7.6.2
Windows, MVS
Excel. PDF