Focal Point
( SOLVED, Thank you. )A WORD IS NOT RECOGNIZED: TABLE

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/103108252

September 29, 2009, 08:59 AM
YKK
( SOLVED, Thank you. )A WORD IS NOT RECOGNIZED: TABLE
I have a problem that I am stock on for a few days

I made a report to create a HOLD file as following:

APP HOLD savedfil
DEFINE FILE STKMVT
MQTYpos/P13.3=MQTY95 * ( - 1);
MQTYav6/P13.1=MQTYpos / 26;
NOWDATE/A10=TODAY(NOWDATE);
DATE1/A8MDYY=EDIT(NOWDATE,'99$99$9999');
DATE2/I8MDYY=EDIT(DATE1);
DATE3/MDYY=DATE2;
DATE4/MDYY=DATE3 - 183;
DATE5/A8MDYY=DATE4;
DATE6/A4=EDIT(DATE5, '$$$$$$99');
DATE7/A4=EDIT(DATE5, '9999$$$$');
DATE8/A10='1' || DATE6 || DATE7;
ActDay/P8=EDIT(DATE8);
END
TABLE FILE STKMVT
SUM
MQTYav6
BY CONO95
BY PNUM95
WHERE ( CONO95 EQ '01' ) AND ( STRC95 EQ '00' ) AND ( TRAN95 EQ 'A' OR 'C' OR 'M' ) AND ( MOVR95 EQ 'FS' OR 'BX' OR '' ) AND ( REFD95 GE ActDay );
ON TABLE SET PAGE-NUM OFF
ON TABLE SET BYDISPLAY ON
ON TABLE NOTOTAL
ON TABLE HOLD AS STKMVT6 FORMAT FOCUS
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,

When I add INDEX CONO95 and PNUM95,
It modifie the table hold liner as following

ON TABLE HOLD AS STKMVT6 FORMAT FOCUS INDEX 'CONO95' 'PNUM95'

Then i get the following message:

0 ERROR AT OR NEAR LINE 28 IN PROCEDURE ADHOCRQ FOCEXEC *
(FOC002) A WORD IS NOT RECOGNIZED: TABLE
(FOC009) INCOMPLETE REQUEST STATEMENT
BYPASSING TO END OF COMMAND


If i don't add the index, i cant use that file in a join

I searched in the forum and in the books but could not find anything

Could you please help me

Thank you in advance.

This message has been edited. Last edited by: YKK,


7.6. / Win 7 / Excel
September 29, 2009, 09:07 AM
Tom Flynn
Try this:

  
APP HOLD savedfil
DEFINE FILE STKMVT
MQTYpos/P13.3=MQTY95 * ( - 1);
MQTYav6/P13.1=MQTYpos / 26;
NOWDATE/A10=TODAY(NOWDATE);
DATE1/A8MDYY=EDIT(NOWDATE,'99$99$9999');
DATE2/I8MDYY=EDIT(DATE1);
DATE3/MDYY=DATE2;
DATE4/MDYY=DATE3 - 183;
DATE5/A8MDYY=DATE4;
DATE6/A4=EDIT(DATE5, '$$$$$$99');
DATE7/A4=EDIT(DATE5, '9999$$$$');
DATE8/A10='1' || DATE6 || DATE7;
ActDay/P8=EDIT(DATE8);
END
TABLE FILE STKMVT
SUM
MQTYav6
BY CONO95
BY PNUM95
WHERE ( CONO95 EQ '01' ) AND ( STRC95 EQ '00' ) AND ( TRAN95 EQ 'A' OR 'C' OR 'M' ) AND ( MOVR95 EQ 'FS' OR 'BX' OR '' ) AND ( REFD95 GE ActDay );
ON TABLE HOLD AS STKMVT6 FORMAT FOCUS INDEX CONO95 PNUM95
END
-EXIT



Tom Flynn
WebFOCUS 8.1.05 - PROD/QA
DB2 - AS400 - Mainframe