MSG 'EZTC0100E >>> $ end of statement expected' issued
search cancel

MSG 'EZTC0100E >>> $ end of statement expected' issued

book

Article ID: 245443

calendar_today

Updated On:

Products

Easytrieve Report Generator

Issue/Introduction



The  jobs are running Easytrieve V11.6 

*  ALL SPUFI CARDS WITH NUMERIC PRIORITY ARE TAKEN                              
                                                                                
   CASE SPUFI_CARD_POS_13                                                       
        WHEN '0' THRU '9'                                                       
           IF 1ST_TIME_ONLY = 'Y'                                               
              MOVE 'N' TO 1ST_TIME_ONLY                                         
              %LENGTHO2 RECORD DB2DATA FIELD PROJ_NUM                           
   MACRO 0 RECORD ' ' FIELD ' '                                                 
*                                                                               
*  EZTRIEVE MACRO TO GET ACTUAL LENGTH OF A RECORD FIELD                        
*  (MACRO LENGTHOF GOT ACTUAL LENGTH OF A WORKING-STORAGE FIELD)                
*  INVOCATION: %LENGTHOF RECORD &RECORD. FIELD &FIELD.                          
*  AFTER RUNNING THIS MACRO, REFERENCE LENGTH OF FIELD AS FOLLOWS:              
*  &FIELD._LEN_OF:LENGTH                                                        
*                                                                               
   DEFINE PROJ_NUM_LEN_OF W 50 A VARYING                                        
   MOVE DB2DATA:PROJ_NUM TO PROJ_NUM_LEN_OF                                     
*  DISPLAY &FIELD._LEN_OF:LENGTH                                                
   MEND                                                                         
   $ statement not processed                                                    
   $ end of statement expected                                                  
           END-IF                                                               
           PERFORM 0_SUPPRESS_INPUT_PROJ_NUM                                    
           MOVE LIKE DB2DATA TO DB2DATA_OUT                                     
           PUT DB2DATA_OUT                                                      
           PRINT FREQ_REPORT_1D                                                 
           PRINT FREQ_REPORT_2D                                                 
        OTHERWISE                                                               
           GOTO JOB                                                             
   END-CASE                                                                     
                                                                                

                                                      

Environment

Release : 11.6

Component : EASYTRIEVE REPORT GEN

Resolution

Problem appears to be introduced by PTF LU03002 and is resolved by LU06144