Error in buildserver for IBM COBOL - DB2 program with ATMI calls
687700Apr 9 2009 — edited Apr 16 2009Hi..
Am using IBM COBOL for AIX version 5.3..
I have installed Oracle Tuxedo 10g R3 on AIX and IBM DB2 V9.5 on AIX..
I have written a sample Cobol-DB2 program with ATMI calls for client and server..
I have precompiled the programs with the command..
db2 prep COBDBCL.sqb bindfile target ibmcob CALL_RESOLUTION DEFERRED and
db2 prep COBDBSR.sqb bindfile target ibmcob CALL_RESOLUTION DEFERRED
and for binding
db2 bind COBDBCL.bnd and
db2 bind COBDBSR.bnd
and for compiling the generated .cbl files i have used this command.
cob2 -qpgmname\(mixed\) -qlib -I$DB2PATH/include/cobol_a -c COBDBCL.cbl
cob2 -qpgmname\(mixed\) -qlib -I$DB2PATH/include/cobol_a -c COBDBSR.cbl
and for building the client and server
buildclient -C -o COBDBCL -f COBDBCL.cbl and
buildserver -C -o COBDBSR -s COBDBSR -f COBDBSR.cbl
Here buildclient is working fine since there is no copy book for "SQLCA" here. but for buildserver am getting this errors..
PP 5724-H44 IBM COBOL for AIX 2.0.0 in progress ...
LineID Message code Library phase message text
280 IGYLI0049-S The "COPY" library was not found. Skipped to the period
terminating the "COPY" statement.
Messages Total Informational Warning Error Severe Terminating
Printed: 1 1
LineID Message code Message text
IGYSC0185-I Messages were issued during library phase processing.
Refer to the beginning of the listing.
325 IGYPS2121-S "SQLCA" was not defined as a data-name. The statement
was discarded.
Same message on line: 332 408 431 501 514
590 600 618
Messages Total Informational Warning Error Severe Terminating
Printed: 10 1 9
End of compilation 1, program COBDBSR, highest severity: Severe.
Return code 12
CMDTUX_CAT:1839: ERROR: can't execute cob2 -c -I/usr/Oracle/Tuxedo10g/cobinclude COBDBSR.cbl
I have included the library path of DB2 in LIBPATH and path od DB2 in PATH environment variable..
Am i missing any option while building?? whether the steps which i followed are correct??
Need ur help..
Thanks in advance..