( 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