#! /bin/sh ############################################################################# # (c) Copyright IBM Corp. 2007 All rights reserved. # # The following sample of source code ("Sample") is owned by International # Business Machines Corporation or one of its subsidiaries ("IBM") and is # copyrighted and licensed, not sold. You may use, copy, modify, and # distribute the Sample in any form without payment to IBM, for the purpose of # assisting you in the development of your applications. # # The Sample code is provided to you on an "AS IS" basis, without warranty of # any kind. IBM HEREBY EXPRESSLY DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR # IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF # MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. Some jurisdictions do # not allow for the exclusion or limitation of implied warranties, so the above # limitations or exclusions may not apply to you. IBM shall not be liable for # any damages you suffer as a result of using, copying, modifying or # distributing the Sample, even if IBM has been advised of the possibility of # such damages. ############################################################################# # SCRIPT: bldapp # Builds AIX COBOL applications # Usage: bldapp <prog_name> [ <db_name> [ <userid> <password> ]] # Set DB2PATH to where DB2 will be accessed. # The default is the standard instance path. DB2PATH=$HOME/sqllib # If an embedded SQL program, precompile and bind it. if [ -f $1".sqb" ] then ./embprep $1 $2 $3 $4 fi # Compile the checkerr.cbl error checking utility. cob2 -qpgmname\(mixed\) -qlib -I$DB2PATH/include/cobol_a \ -c checkerr.cbl # Compile the program. cob2 -qpgmname\(mixed\) -qlib -I$DB2PATH/include/cobol_a \ -c $1.cbl LIB=lib32 # Link the program. cob2 -o $1 $1.o checkerr.o -L$DB2PATH/$LIB -ldb2