Function make_cursor_open_test

src/gpre/languages/ada.cpp:3291–3305

//

static void make_cursor_open_test( act_t type, gpre_req* request, int column)
{
	if (type == ACT_open)
	{
		printa(column, "if (isc_%do = 1) then", request->req_ident);
		printa(column + INDENT, "SQLCODE := -502;");
	}
	else if (type == ACT_close)
	{
		printa(column, "if (isc_%do = 0) then", request->req_ident);
		printa(column + INDENT, "SQLCODE := -501;");
	}

	printa(column, "else");
}


//____________________________________________________________