/* Copyright © 1995, 2002, Oracle Corporation.  All Rights Reserved. */

#pragma module SQL_CONNECTIONS_H "IDENT"

/************************************************************************
*
* User sessions 1,2,3 and  DEFAULT use the same database PERSONNEL
*
* Required files : REQUIRES PERSONNEL database
*
* Compilation instructions:
*
*  CC SQL_CONNECTIONS_H
*  SQLMOD SQL_CONNECTIONS_C/SESSION
*  LINK SQL_CONNECTIONS_H,SQL_CONNECTIONS_C,SQL$USER/LIB
*  RUN SQL_CONNECTIONS_H
*************************************************************************/

#include <stdio.h>
#include <string.h>
#include <sys$library:sql_rdb_headers>

#define check_sqlcode if (sqlcode != 0) {\
          printf ("sqlcode = %d\n",sqlcode);\
          sql$signal();\
         };

char   employee_id1[6];
char   last_name1[15];		  
char   employee_id2[15];	  
char   degree[15];		   	  
char   employee_id3[16];		  
char   supervisor[6];			  
char   employee_id4[6];		  
char   last_name4[15];		  

int    sqlcode;

extern void disconnect_d();
extern void disconnect_all();
extern void disconnect_1();
extern void connect_1();
extern void insert_1();
extern void select_1();
extern void connect_2();
extern void insert_2();
extern void select_2();
extern void connect_3();
extern void insert_3();
extern void select_3();
extern void connect_d();
extern void select_d();

main()

    {
 	printf("\n\n******* Disconnect from default ************\n");
 	disconnect_d(&sqlcode);
        check_sqlcode;

	strcpy(employee_id1, "00301");
	strcpy(last_name1, "FELDMAN");

	printf("********* Establish connection 1 **********\n\n");
	connect_1(&sqlcode);
        check_sqlcode;

	printf("********* Inserting record 301 through CONN 1 **********\n\n");
	insert_1(&sqlcode, employee_id1, last_name1);
        check_sqlcode;

	strcpy(employee_id1, "     ");
	strcpy(last_name1, "       ");
	printf("********* Retrieving Record 301 **********\n");
	select_1(&sqlcode, employee_id1, last_name1);
        check_sqlcode;
	printf("\nEmployee_id :%s\nlast_name :%s\n", employee_id1, last_name1);
	strcpy(employee_id2, "00901");
	strcpy(degree, "Masters");
	printf("********* Establish Connection 2 **********\n\n");
	connect_2(&sqlcode);
        check_sqlcode;
	printf("\n\n******** Inserting record 901 @ CONN 2 ******\n\n");
	insert_2(&sqlcode, employee_id2, degree);
        check_sqlcode;
	strcpy(employee_id2, "     ");
	strcpy(degree, "        ");
	printf("\n\n ******* Retrieving record 901 ******\n\n");
	select_2(&sqlcode, employee_id2, degree);
        check_sqlcode;
	printf("\nEmployee_id :%s\n Degree :%s\n", employee_id2, degree);

	strcpy(employee_id3, "01501");
	strcpy(supervisor, "Jacob");
	printf("********* Establish Connection 3 **********\n\n");
	connect_3(&sqlcode);
        check_sqlcode;
	printf("******** Inserting record 1501 @ CONN 3 ******\n\n");
	insert_3(&sqlcode, employee_id3, supervisor);
        check_sqlcode;
	strcpy(employee_id3, "     ");
	strcpy(supervisor, "       ");
	printf("\n******** Retrieving record 1501 *****\n\n");
	select_3(&sqlcode, employee_id3, supervisor);
        check_sqlcode;
	printf("\nEmployee_id :%s\nSupervisor :%s\n", employee_id3, supervisor);

	strcpy(employee_id4, "     ");
	strcpy(last_name4, "             ");
	printf("************ Establish Default connection ********\n\n");
	connect_d(&sqlcode);
        check_sqlcode;
	printf("******** Selecting record from default conn *****\n\n");	
	select_d(&sqlcode, employee_id4, last_name4);
        check_sqlcode;
	printf("\nEmployee_id :%s\nlast_name :%s\n", employee_id4, last_name4);

	printf("\n***** Disconnect 1 & default then try to find ***\n");
	printf("******* Uncommitted then Committed records ********\n");
	disconnect_1(&sqlcode);
        check_sqlcode;
	disconnect_d(&sqlcode);
        check_sqlcode;
	connect_1(&sqlcode);	
        check_sqlcode;
	printf("\n***********  Retrieve Record 901 *************\n");
	printf("\n******* Record was not committed ==> no data ****\n\n");
	strcpy(employee_id1, "     ");
	strcpy(last_name1, "       ");
	select_1(&sqlcode, employee_id1, last_name1);
        check_sqlcode;
	printf("\nEmployee_id :%s\nlast_name :%s\n", employee_id1, last_name1);
	strcpy(employee_id4, "     ");
	strcpy(last_name4, "       ");
	connect_d(&sqlcode);
        check_sqlcode;
	select_d(&sqlcode, employee_id4, last_name4);
        check_sqlcode;
	printf("\n****** Record 00164 is a Committed Record *****\n\n");
	printf("\nEmployee_id :%s\nlast_name :%s\n", employee_id4, last_name4);
	printf("\n****** Disconnect all connections  *********\n");
	disconnect_all(&sqlcode);
        check_sqlcode;
}