static inline int INGfetchAll(INGresult *ing_res)
{
ING_ROW *row;
IISQLDA *desc;
int linecount = -1;
desc = ing_res->sqlda;
/* # line 409 "myingres.sc" */ /* open */
{
IIsqInit(&sqlca);
IIcsOpen((char *)"c2",20273,8927);
IIwritio(0,(short *)0,1,32,0,(char *)"s2");
IIcsQuery((char *)"c2",20273,8927);
if (sqlca.sqlcode < 0)
goto bail_out;
}
/* # line 413 "myingres.sc" */ /* host code */
linecount = 0;
do {
/* # line 415 "myingres.sc" */ /* fetch */
{
IIsqInit(&sqlca);
if (IIcsRetScroll((char *)"c2",20273,8927,-1,-1) != 0) {
IIcsDaGet(0,desc);
IIcsERetrieve();
} /* IIcsRetrieve */
}
/* # line 417 "myingres.sc" */ /* host code */
if (sqlca.sqlcode == 0 || sqlca.sqlcode == -40202) {
/*
* Allocate space for fetched row
*/
row = INGgetRowSpace(ing_res);
/*
* Initialize list when encountered first time
*/
if (ing_res->first_row == 0) {
ing_res->first_row = row; /* head of the list */
ing_res->first_row->next = NULL;
ing_res->act_row = ing_res->first_row;
}
ing_res->act_row->next = row; /* append row to old act_row */
ing_res->act_row = row; /* set row as act_row */
row->row_number = linecount++;
}
} while ( (sqlca.sqlcode == 0) || (sqlca.sqlcode == -40202) );
/* # line 438 "myingres.sc" */ /* close */
{
IIsqInit(&sqlca);
IIcsClose((char *)"c2",20273,8927);
}
/* # line 440 "myingres.sc" */ /* host code */
ing_res->status = ING_COMMAND_OK;
ing_res->num_rows = linecount;
bail_out:
return linecount;
}
void
IIpcsDaGet(i4 lang,II_LQTYPE_GPTR sqd)
{
IIcsDaGet(lang,sqd);
}
