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); }