| 4105 | // |
| 4106 | |
| 4107 | static act* act_select() |
| 4108 | { |
| 4109 | gpre_req* request = MSC_request(REQ_for); |
| 4110 | par_options(&request->req_trans); |
| 4111 | gpre_rse* select = SQE_select(request, false); |
| 4112 | request->req_rse = select; |
| 4113 | |
| 4114 | if (!MSC_match(KW_SEMI_COLON)) |
| 4115 | { |
| 4116 | TEXT s[ERROR_LENGTH]; |
| 4117 | fb_utils::snprintf(s, sizeof(s), "Expected ';', got %s.", gpreGlob.token_global.tok_string); |
| 4118 | CPR_warn(s); |
| 4119 | } |
| 4120 | |
| 4121 | if (select->rse_into) |
| 4122 | into(request, select->rse_fields, select->rse_into); |
| 4123 | |
| 4124 | act* action = MSC_action(request, ACT_select); |
| 4125 | action->act_object = (ref*) select->rse_into; |
| 4126 | action->act_whenever = gen_whenever(); |
| 4127 | EXP_rse_cleanup(select); |
| 4128 | return action; |
| 4129 | } |
| 4130 | |
| 4131 | |
| 4132 | //____________________________________________________________ |
no test coverage detected