5 EXEC SQL INCLUDE ../regression;
9 fprintf(stderr, "Warning: At least one column was truncated\n");
12 /* Compatible handling of char array to retrieve varchar field to char array
13 should be fixed-length, blank-padded, then null-terminated.
14 Conforms to the ANSI Fixed Character type. */
18 EXEC SQL WHENEVER SQLWARNING do warn();
19 EXEC SQL WHENEVER SQLERROR SQLPRINT;
21 const char *ppppp = "XXXXX";
23 EXEC SQL BEGIN DECLARE SECTION;
28 EXEC SQL END DECLARE SECTION;
31 EXEC SQL CONNECT TO REGRESSDB1;
33 EXEC SQL CREATE TABLE strdbase (strval varchar(10));
34 EXEC SQL INSERT INTO strdbase values ('');
35 EXEC SQL INSERT INTO strdbase values ('AB');
36 EXEC SQL INSERT INTO strdbase values ('ABCD');
37 EXEC SQL INSERT INTO strdbase values ('ABCDE');
38 EXEC SQL INSERT INTO strdbase values ('ABCDEF');
39 EXEC SQL INSERT INTO strdbase values ('ABCDEFGHIJ');
41 EXEC SQL declare C cursor for select strval, strval from strdbase;
44 EXEC SQL WHENEVER NOT FOUND DO BREAK;
46 printf("Full Str. : Short Ind.\n");
48 strncpy(shortstr, ppppp, sizeof shortstr);
49 memset(bigstr, 0, sizeof bigstr);
50 EXEC SQL FETCH C into :bigstr :bigstr_ind, :shortstr :shstr_ind;
51 printf("\"%s\": \"%s\" %d\n", bigstr, shortstr, shstr_ind);
55 EXEC SQL DROP TABLE strdbase;
57 printf("\nGOOD-BYE!!\n\n");
61 EXEC SQL DISCONNECT ALL;