/******************************************************************************
**
** Source File Name = delet.sqc 1.4
**
** Licensed Materials - Property of IBM
**
** (C) COPYRIGHT International Business Machines Corp. 1995, 1999
** All Rights Reserved.
**
** US Government Users Restricted Rights - Use, duplication or
** disclosure restricted by GSA ADP Schedule Contract with IBM Corp.
**
**
** PURPOSE: This sample program demonstrates the use of static SQL.
** It deletes all the rows where the job is "Mgr". A
** ROLLBACK is issued so that the sample database remains
** unchanged.
**
** An external function "check_error" is contained in the file "util.c"
** which must be compiled along with this file.
**
** EXTERNAL DEPENDENCIES :
** - 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 <string.h>
#include <stdlib.h>
#include <sqlenv.h> /* :rk.1:erk. */
#include "util.h"
#ifdef DB268K
/* Need to include ASLM for 68K applications */
#include <LibraryManager.h>
#endif
EXEC SQL INCLUDE SQLCA; /* :rk.2:erk. */
#define CHECKERR(CE_STR) if (check_error (CE_STR, &sqlca) != 0) return 1;
int main(int argc, char *argv[]) {
EXEC SQL BEGIN DECLARE SECTION;
char statement[256]; /* :rk.3:erk. */
char userid[9];
char passwd[19];
EXEC SQL END DECLARE SECTION;
#ifdef DB268K
/* Before making any API calls for 68K environment,
need to initial the Library Manager */
InitLibraryManager(0,kCurrentZone,kNormalMemory);
atexit(CleanupLibraryManager);
#endif
printf( "\nSample C program: DELET\n");
if (argc == 1) {
EXEC SQL CONNECT TO sample; /* :rk.5:erk. */
CHECKERR ("CONNECT TO SAMPLE"); /* :rk.6:erk. */
}
else if (argc == 3) {
strcpy (userid, argv[1]);
strcpy (passwd, argv[2]);
EXEC SQL CONNECT TO sample USER :userid USING :passwd; /* :rk.5:erk. */
CHECKERR ("CONNECT TO SAMPLE"); /* :rk.6:erk. */
}
else {
printf ("\nUSAGE: delet [userid passwd]\n\n");
return 1;
} /* endif */
strcpy( statement, /* :rk.7:erk. */
"DELETE FROM staff WHERE job = 'Mgr'" );
EXEC SQL EXECUTE IMMEDIATE :statement; /* :rk.8:erk. */
CHECKERR ("DELETE STAFF");
printf( "All managers have been deleted!\n" );
EXEC SQL ROLLBACK; /* :rk.9:erk. */
CHECKERR ("ROLLBACK");
printf( "On second thought -- changes rolled back.\n" );
EXEC SQL CONNECT RESET; /* :rk.10:erk. */
CHECKERR ("CONNECT RESET");
return 0;
}
/* end of program : delet.sqc */