ISC_STATUS API_ROUTINE gds__request_info(ISC_STATUS* status_vector, FB_API_HANDLE* req_handle, SSHORT req_level, SSHORT msg_length, const SCHAR* msg, SSHORT buffer_length, SCHAR* buffer) { return isc_request_info(status_vector, req_handle, req_level, msg_length, msg, buffer_length, buffer); }
static void gen_compile( qli_req* request) { /************************************** * * g e n _ c o m p i l e * ************************************** * * Functional description * Finish off BLR generation for a request, and get it compiled. * **************************************/ qli_rlb* rlb = CHECK_RLB(request->req_blr); STUFF(blr_end); STUFF(blr_eoc); const USHORT length = rlb->rlb_data - rlb->rlb_base; if (QLI_blr) fb_print_blr(rlb->rlb_base, length, 0, 0, 0); qli_dbb* dbb = request->req_database; ISC_STATUS_ARRAY status_vector; if (isc_compile_request(status_vector, &dbb->dbb_handle, &request->req_handle, length, (const char*) rlb->rlb_base)) { GEN_rlb_release (rlb); ERRQ_database_error(dbb, status_vector); } #ifdef DEV_BUILD SCHAR explain_buffer[512]; if (QLI_explain && !isc_request_info(status_vector, &request->req_handle, 0, sizeof(explain_info), explain_info, sizeof(explain_buffer), explain_buffer)) { explain(dbb, (UCHAR*) explain_buffer); } #endif GEN_rlb_release (rlb); }