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