SQL/MX 3.2.1 Programming Manual for C and COBOL (H06.26+, J06.15+)

Static Rowsets
HP NonStop SQL/MX Release 3.2.1 Programming Manual for C and COBOL—663854-005
7-11
Selecting Rows Into Rowset Arrays
Program:
exec sql whenever sqlerror call display_diagnosis;
EXEC SQL BEGIN DECLARE SECTION;
ROWSET [10] long g_int;
ROWSET [10] long h_int;
EXEC SQL END DECLARE SECTION;
int main(){
printf("\n\ntest1 : Expecting rownumber = 9\n");
int i=0;
for (i=0; i<10; i++) {
g_int[i] = i;
h_int[i] = i;
}
g_int[9] = 7; /* causes unique constraint error */
h_int[5] = 3;
EXEC SQL DELETE FROM rownum1;
EXEC SQL INSERT INTO rownum1 VALUES (:g_int, :h_int) ;
if (SQLCODE != 0) {
printf("Failed to insert. SQLCODE = %ld\n",SQLCODE);
}
else {
printf("Insert succeeded. SQLCODE = %ld\n", SQLCODE);
EXEC SQL COMMIT ;
}
}