Skip to main content

Problem:

Using the command:

p(cobsql) CSQLT=ORACLE8 KEEPCBL P(CP) SY ENDP

produces the following errors

* Micro Focus COBSQL Integrated Preprocessor with ASCII/EBCDIC Support

* Server Express V5.0 Copyright (C)1984-2006 Micro Focus (IP) Limited.

* URN AAAPA/ZZ0/00065

* CSQL-I-008: Invoking cp Preprocessor

* CSQL-I-017: Creating "COSP318.cs9"

* CSQL-I-018: Invoking ORACLE8 Precompiler/Translator

* CSQL-I-020: Processing output of ORACLE8 Precompiler

   435         IF  mfsqlmsg-line(WS-DB2-ERR-LOOP)(2:4) = '    '

*  14-S*********************************************                         **

**    Invalid operand

   438         ELSE

* 562-S************                                                          **

**    An "ELSE" phrase did not have a matching IF and was discarded.

   441         END-IF

* 564-S**************                                                        **

**    A scope-delimiter did not have a matching verb and was discarded.

* CSQL-I-001: Cobsql has finished returning to the Checker

cob64: error(s) in compilation: COSP318.cbl

Resolution:

The problem here is that these are varibales defined with copy files and these variables are not being properly processed.

The CP preprocessor muxt be invoked using lower-case so the right command is

p(cobsql) CSQLT=ORACLE8 KEEPCBL P(cp) SY ENDP

Old KB# 2346