7#define ECPGdebug(X,Y) ECPGdebug((X)+100,(Y))
64 char * pointer = NULL ;
67 char *
data =
"\\001\\155\\000\\212" ;
76 {
ECPGconnect(__LINE__, 0,
"ecpg1_regression" , NULL, NULL , NULL, 0);
79if (
sqlca.sqlcode < 0) exit (1);}
85if (
sqlca.sqlcode < 0) exit (1);}
88 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"create table empl ( idnum integer , name char ( 20 ) , accs smallint , byte bytea )",
ECPGt_EOIT,
ECPGt_EORT);
91if (
sqlca.sqlcode < 0) exit (1);}
94 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"insert into empl values ( 1 , 'first user' , 320 , $1 )",
99if (
sqlca.sqlcode < 0) exit (1);}
106if (
sqlca.sqlcode < 0) exit (1);
111 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"declare C cursor for select name , accs , byte from empl where idnum = $1 ",
116if (
sqlca.sqlcode < 0) exit (1);}
128if (
sqlca.sqlcode < 0) exit (1);}
136if (
sqlca.sqlcode < 0) exit (1);}
140 memset(empl.
name, 0, 21L);
145if (
sqlca.sqlcode < 0) exit (1);
150 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"declare B binary cursor for select name , accs , byte from empl where idnum = $1 ",
155if (
sqlca.sqlcode < 0) exit (1);}
167if (
sqlca.sqlcode < 0) exit (1);}
173if (
sqlca.sqlcode < 0) exit (1);}
187if (
sqlca.sqlcode < 0) exit (1);
192 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"declare A binary cursor for select byte from empl where idnum = $1 ",
197if (
sqlca.sqlcode < 0) exit (1);}
201 ECPGt_char,&(pointer),(
long)0,(
long)1,(1)*
sizeof(
char),
205if (
sqlca.sqlcode < 0) exit (1);}
211if (
sqlca.sqlcode < 0) exit (1);}
218 printf(
"(%o)", (
unsigned char)pointer[
i]);
226if (
sqlca.sqlcode < 0) exit (1);}
bool ECPGdisconnect(int lineno, const char *connection_name)
bool ECPGconnect(int lineno, int c, const char *name, const char *user, const char *passwd, const char *connection_name, int autocommit)
bool ECPGdo(const int lineno, const int compat, const int force_indicator, const char *connection_name, const bool questionmarks, const int st, const char *query,...)
void ECPGset_var(int number, void *pointer, int lineno)