| 2391 | // |
| 2392 | |
| 2393 | static void gen_ready( const act* action, int column) |
| 2394 | { |
| 2395 | const TEXT* vector = status_vector(action); |
| 2396 | |
| 2397 | for (rdy* ready = (rdy*) action->act_object; ready; ready = ready->rdy_next) |
| 2398 | { |
| 2399 | const gpre_dbb* db = ready->rdy_database; |
| 2400 | const TEXT* filename = ready->rdy_filename; |
| 2401 | if (!filename) |
| 2402 | filename = db->dbb_runtime; |
| 2403 | if ((action->act_error || (action->act_flags & ACT_sql)) && ready != (rdy*) action->act_object) |
| 2404 | { |
| 2405 | printa(column, "if isc_status(1) = 0 then"); |
| 2406 | } |
| 2407 | make_ready(db, filename, vector, column, ready->rdy_request); |
| 2408 | if ((action->act_error || (action->act_flags & ACT_sql)) && ready != (rdy*) action->act_object) |
| 2409 | { |
| 2410 | endif(column); |
| 2411 | } |
| 2412 | } |
| 2413 | set_sqlcode(action, column); |
| 2414 | } |
| 2415 | |
| 2416 | |
| 2417 | //____________________________________________________________ |
no test coverage detected