Function gen_s_start

src/gpre/obj_cxx.cpp:3059–3102

//

static void gen_s_start( const act* action, int column)
{
	gpre_req* request = action->act_request;

	printa(column, "for (int retries = 0; retries < 2; ++retries)");
	column += INDENT;
	begin(column);
	gen_compile(action, column);

	gpre_port* port = request->req_vport;
	if (port)
		asgn_from(action, port->por_references, column);

	if (action->act_type == ACT_open)
		column = gen_cursor_open(action, request, column);

	if (action->act_error || (action->act_flags & ACT_sql))
	{
		make_ok_test(action, request, column);
		column += INDENT;
	}
	gen_start(action, port, column, false);
	if (action->act_error || (action->act_flags & ACT_sql))
		column -= INDENT;

	const TEXT* pattern1 = "if (%V1->getErrors()[1] == isc_bad_req_handle) { %RH->release(); %RH = NULL; }";
	PAT args;
	args.pat_request = action->act_request;
	args.pat_vector1 = status_vector(action);
	PATTERN_expand((USHORT) column, pattern1, &args);
	printa(column, "else break;");

	if (action->act_type == ACT_open)
	{
		endp(column);
		column -= INDENT;
		endp(column);
		column -= INDENT;
	}

	endp(column);
	column -= INDENT;
	set_sqlcode(action, column);
}


//____________________________________________________________