Problem:

A program fails with compilation error COBEC1210 at the CICS statement below:

           EXEC  CICS                                                           

                 REWRITE                                                        

                 DATASET ('OTERNEW')                                            

                 FROM    (OTERNEW-REC)                                          

                 RIDFLD  (OTERNEW-RETAILER-NUMBER)                              

                 LENGTH  (CX-OTERNEW-LENGTH)                                    

           END-EXEC.                    

RIDFLD is not valid here, but the customer claims that on his VSE system the program successfully passes through the compilation.

Resolution:

RIDFLD is not allowed in REWRITE due to the syntax of the MVS CICS manuals.

All you can do, is setting the Additional directive   /CICSECM(HIDE=1210)

This will suppress the error message. REWRITE can be executed during runtime.