/******************************************************************************
**
** Source File Name = rebind.sqc
**
** Licensed Materials - Property of IBM
**
** (C) COPYRIGHT International Business Machines Corp. 1995, 2000
** All Rights Reserved.
**
** US Government Users Restricted Rights - Use, duplication or
** disclosure restricted by GSA ADP Schedule Contract with IBM Corp.
**
**
** PURPOSE :
** This program is an example of how APIs are implemented in order to
**
** This program needs the embedded SQL calls in order to connect to
** an existing database, then to create a temporary table to work with.
**
** APIs USED :
** REBIND PACKAGE sqlarbnd()
**
** FUNCTIONS DECLARED :
** 'C' COMPILER LIBRARY :
** stdio.h - printf
** string.h - strncpy
**
** DBMS LIBRARY :
** sql.h - see "APIs USED" above
**
** OTHER :
** external :
** check_error : Checks for SQLCODE error, and prints out any
** [in UTIL.C] related information available.
**
** EXTERNAL DEPENDANCIES :
** - Ensure existence of database for precompile purposes.
** - Precompile with the SQL precompiler (PREP in DB2)
** - Bind to a database (BIND in DB2)
** - Compile and link with the IBM Cset++ compiler (AIX and OS/2)
** or the Microsoft Visual C++ compiler (Windows)
** or the compiler supported on your platform.
**
** For more information about these samples see the README file.
**
** For more information on programming in C, see the:
** - "Programming in C and C++" section of the Application Development Guide
** For more information on Building C Applications, see the:
** - "Building C Applications" section of the Application Building Guide.
**
** For more information on the SQL language see the SQL Reference.
**
*******************************************************************************/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sqlenv.h>
#include <sqlutil.h>
#include "utilemb.h"
EXEC SQL INCLUDE SQLCA;
int main (int argc, char *argv[]) {
EXEC SQL BEGIN DECLARE SECTION;
char userid[9];
char passwd[19];
EXEC SQL END DECLARE SECTION;
if (argc != 4) {
printf ("\nUSAGE: rebind userid passwd package-name\n\n");
return 1;
}
strcpy (userid, argv[1]);
strcpy (passwd, argv[2]);
printf ("CONNECTing TO SAMPLE database\n");
/* CONNECTing to the 'sample' database */
EXEC SQL CONNECT TO sample USER :userid USING :passwd;
EMB_SQL_CHECK("CONNECT TO database");
/*******************/
/* REBIND PACKAGE */
/*******************/
sqlarbnd(argv[3], &sqlca, NULL);
EMB_SQL_CHECK("Rebinding Package");
printf("Package %s has been rebound\n", argv[3]);
printf("Rolling back the transaction\n");
EXEC SQL ROLLBACK ;
printf("CONNECT RESETting\n");
EXEC SQL CONNECT RESET;
EMB_SQL_CHECK("CONNECT RESET");
return 0;
}