{ECPGdo(__LINE__,0,1,NULL,"set datestyle to iso",ECPGt_EOIT,ECPGt_EORT);
{ECPGdo(__LINE__,0,1,NULL,0,0,"set datestyle to iso",ECPGt_EOIT,ECPGt_EORT);
#line 46 "variable.pgc"
#line 46 "variable.pgc"
if(sqlca.sqlcode<0)sqlprint();}
if(sqlca.sqlcode<0)exit(1);}
#line 46 "variable.pgc"
#line 46 "variable.pgc"
strcpy(msg,"create");
strcpy(msg,"create");
{ECPGdo(__LINE__,0,1,NULL,"create table family ( name char ( 8 ) , born integer , age smallint , married date , children integer ) ",ECPGt_EOIT,ECPGt_EORT);
{ECPGdo(__LINE__,0,1,NULL,0,0,"create table family ( name char ( 8 ) , born integer , age smallint , married date , children integer ) ",ECPGt_EOIT,ECPGt_EORT);
#line 49 "variable.pgc"
#line 49 "variable.pgc"
if(sqlca.sqlcode<0)sqlprint();}
if(sqlca.sqlcode<0)exit(1);}
#line 49 "variable.pgc"
#line 49 "variable.pgc"
strcpy(msg,"insert");
strcpy(msg,"insert");
{ECPGdo(__LINE__,0,1,NULL,"insert into family ( name , married , children ) values ( 'Mum' , '19870714' , 3 ) ",ECPGt_EOIT,ECPGt_EORT);
{ECPGdo(__LINE__,0,1,NULL,0,0,"insert into family ( name , married , children ) values ( 'Mum' , '19870714' , 3 ) ",ECPGt_EOIT,ECPGt_EORT);
#line 52 "variable.pgc"
#line 52 "variable.pgc"
if(sqlca.sqlcode<0)sqlprint();}
if(sqlca.sqlcode<0)exit(1);}
#line 52 "variable.pgc"
#line 52 "variable.pgc"
{ECPGdo(__LINE__,0,1,NULL,"insert into family ( name , born , married , children ) values ( 'Dad' , '19610721' , '19870714' , 3 ) ",ECPGt_EOIT,ECPGt_EORT);
{ECPGdo(__LINE__,0,1,NULL,0,0,"insert into family ( name , born , married , children ) values ( 'Dad' , '19610721' , '19870714' , 3 ) ",ECPGt_EOIT,ECPGt_EORT);
#line 53 "variable.pgc"
#line 53 "variable.pgc"
if(sqlca.sqlcode<0)sqlprint();}
if(sqlca.sqlcode<0)exit(1);}
#line 53 "variable.pgc"
#line 53 "variable.pgc"
{ECPGdo(__LINE__,0,1,NULL,"insert into family ( name , age ) values ( 'Child 1' , 16 ) ",ECPGt_EOIT,ECPGt_EORT);
{ECPGdo(__LINE__,0,1,NULL,0,0,"insert into family ( name , age ) values ( 'Child 1' , 16 ) ",ECPGt_EOIT,ECPGt_EORT);
#line 54 "variable.pgc"
#line 54 "variable.pgc"
if(sqlca.sqlcode<0)sqlprint();}
if(sqlca.sqlcode<0)exit(1);}
#line 54 "variable.pgc"
#line 54 "variable.pgc"
{ECPGdo(__LINE__,0,1,NULL,"insert into family ( name , age ) values ( 'Child 2' , 14 ) ",ECPGt_EOIT,ECPGt_EORT);
{ECPGdo(__LINE__,0,1,NULL,0,0,"insert into family ( name , age ) values ( 'Child 2' , 14 ) ",ECPGt_EOIT,ECPGt_EORT);
#line 55 "variable.pgc"
#line 55 "variable.pgc"
if(sqlca.sqlcode<0)sqlprint();}
if(sqlca.sqlcode<0)exit(1);}
#line 55 "variable.pgc"
#line 55 "variable.pgc"
{ECPGdo(__LINE__,0,1,NULL,"insert into family ( name , age ) values ( 'Child 3' , 9 ) ",ECPGt_EOIT,ECPGt_EORT);
{ECPGdo(__LINE__,0,1,NULL,0,0,"insert into family ( name , age ) values ( 'Child 3' , 9 ) ",ECPGt_EOIT,ECPGt_EORT);
#line 56 "variable.pgc"
#line 56 "variable.pgc"
if(sqlca.sqlcode<0)sqlprint();}
if(sqlca.sqlcode<0)exit(1);}
#line 56 "variable.pgc"
#line 56 "variable.pgc"
...
@@ -179,15 +179,15 @@ if (sqlca.sqlcode < 0) sqlprint();}
...
@@ -179,15 +179,15 @@ if (sqlca.sqlcode < 0) sqlprint();}
{ECPGtrans(__LINE__,NULL,"commit");
{ECPGtrans(__LINE__,NULL,"commit");
#line 59 "variable.pgc"
#line 59 "variable.pgc"
if(sqlca.sqlcode<0)sqlprint();}
if(sqlca.sqlcode<0)exit(1);}
#line 59 "variable.pgc"
#line 59 "variable.pgc"
strcpy(msg,"open");
strcpy(msg,"open");
{ECPGdo(__LINE__,0,1,NULL,"declare cur cursor for select name , born , age , married , children from family ",ECPGt_EOIT,ECPGt_EORT);
{ECPGdo(__LINE__,0,1,NULL,0,0,"declare cur cursor for select name , born , age , married , children from family ",ECPGt_EOIT,ECPGt_EORT);
#line 62 "variable.pgc"
#line 62 "variable.pgc"
if(sqlca.sqlcode<0)sqlprint();}
if(sqlca.sqlcode<0)exit(1);}
#line 62 "variable.pgc"
#line 62 "variable.pgc"
...
@@ -200,7 +200,7 @@ if (sqlca.sqlcode < 0) sqlprint();}
...
@@ -200,7 +200,7 @@ if (sqlca.sqlcode < 0) sqlprint();}