EXEC SQL CONNECT :user_name IDENTIFIED BY :password;
            

            EXEC SQL CONNECT TO :dbname USERID :userid PASSWORD : password;
            

            EXEC SQL BEGIN DECLARE SECTION;
            char emp_name[31] = {'\\0'};
            sqlint32  ret_code = 0;
            EXEC SQL END DECLARE SECTION;
            

            struct emp_name 	{
            short  var_len;
            char   var_data[25] 	};
            

            typedef struct  user_s
            {short int userNum;
            char userName[25];
            char userAddress[40];
            } theUser_t;
            

            EXEC SQL BEGIN DECLARE;
            theUser_t *myUser;
            EXEC SQL END DECLARE SECTION;
            

            EXEC SQL BEGIN DECLARE SECTION;
            long int     dept_numb[10];
            char         dept_name[10][14];
            char         v_location[12];
            EXEC SQL END DECLARE SECTION;
            /* ... */
            EXEC SQL DECLARE CUR1 CURSOR FOR
            SELECT DEPTNUMB, DEPTNAME
            FROM org_table
            WHERE LOCATION = :v_location;
            /*.... */
            EXEC SQL FETCH CUR1 INTO :dept_num, :dept_name;
            

            EXEC SQL BEGIN DECLARE SECTION;
            sqlint32     h_dept_numb = 0;
            char         h_dept_name[14] = {'\\0'};
            char         v_location[12] = {'\\0'};
            EXEC SQL END DECLARE SECTION;
            /* move array out of DECLARE section - just C variables */
            long  int     dept_numb[10];
            char          dept_name[10][14];
            short int     i = 0;
            /* ... */
            EXEC SQL DECLARE CUR1 CURSOR FOR
            SELECT DEPTNUMB, DEPTNAME
            FROM org_table
            WHERE LOCATION = :v_location;
            /*we need Fetch one row at the time and move to corresponding
            member of array */
            for (i=0;i<11;i++){
            EXEC SQL FETCH CUR1 INTO :h_dept_num, :h_dept_name;
            if (SQLCODE == 100){
            break;
            }
            dept_numb[i] = h_dept_numb;
            strcpy(dept_name[i], h_dept_name);
            }
            

            EXEC SQL WHENEVER SQLERROR GOTO error_routine;
            EXEC SQL WHENEVER SQLWARNING CONTINUE;
            EXEC SQL WHENEVER NOT FOUND not_found_routine;
            

            EXEC SQL WHENEVER NOT FOUND GOTO no_row_error;
            EXEC SQL SELECT  address
            INTO  :address
            FROM   test_table
            WHERE phone = :pnone_num;
            .....
            EXEC SQL WHENEVER NOT FOUND CONTINUE;
            EXEC SQL SELECT  commis_rate
            INTO :rate :rateind
            WHERE prod_id = :prodId;
            if (rateind == -1 ) rate = 0.15;
            ...
            

            sqlglm(message_buffer, &buffer_size, &message_length);
            

            rc=sqlaintp(msg_buffer, 1024, 80, sqlca.sqlcode);
            

            SQL0433N Value "TEST VALUES" is too long. SQLSTATE=22001.
            

            rc=sqlogstt(msg_sqlstate_buffer, 1024, 80, sqlca.sqlcode);
            

            SQLSTATE 22001: Character data, right truncation occurred; for example, an update or insert
            value is a string that is too long for the column, or datetime value cannot be assigned to a
            host variable, because it is too small.
            

            EXEC SQL EXECUTE
            BEGIN
            Package_name.SP_name(:arg_in1,:arg_in2, :status_out);
            END;
            END-EXEC;
            

            CREATE PACKAGE package_name IS
            PROCEDURE  SP_name(
            agr_in1 IN NUMBER ,
            arg_in2 IN CHAR(30),
            status_out OUT NUMBER);
            

            CALL procedure_name  (:parm1, ?parmN);
            

            CALL procedure_name USING DESCRIPTOR host_var;
            

            #include <sqlenv.h>
            main()
            {
            EXEC SQL BEGIN DECLARE SECTION;
            Sqlint32  salary_val=0;
            Sqlint16 salind=1;
            Sqlint16  status=0;
            Sqlint16  statind=0;
            EXEC SQL END DECLARE SECTION;
            EXEC SQL INCLUDE SQLCA;
            EXEC SQL CONNECT TO sample;
            EXEC SQL WHENEVER SQLERROR GOTO err_routine;
            salary_val = getSalaryForRaise();
            statind = -1;   /*  set indicator variable to -1 for
            status
            as output-only variable */
            EXEC SQL CALL  raiseSal(:salary_val :salind, :status :statind);
            if (status == 0){
            printf  (" The raises has been successfully given \\n ");
            EXEC SQL COMMIT;
            }
            else
            if (status ==1)
            printf  (" NO input  values has been provided.\\n ");
            else
            if(status == 2)
            printf("Stored procedure failed.\\n");
            err_routine:
            printf  (" SQL Error, SQLCODE =  \\n ", SQLCODE);
            EXEC SQL ROLLBACK;
            }