Function gen_ddl

src/gpre/languages/rmc.cpp:1919–1954

//

static void gen_ddl( const act* action)
{
	// Set up command type for call to RDB$DDL

	const gpre_req* request = action->act_request;

	if (gpreGlob.sw_auto)
	{
		t_start_auto(0, status_vector(action), action, true);
		printa(names[COLUMN], false, "IF %s NOT = 0 THEN", names[isc_trans_pos]);
	}


	sprintf(output_buffer, "%sCALL \"%s\" USING %s, %s, %s, %d, %s%d\n",
			names[COLUMN], ISC_DDL, status_vector(action),
			request->req_database->dbb_name->sym_string,
			names[isc_trans_pos], request->req_length,
			names[isc_a_pos], request->req_ident);

	RMC_print_buffer(output_buffer, true);

	if (gpreGlob.sw_auto)
	{
		printa(names[COLUMN], false, "END-IF");
		printa(names[COLUMN], false, "IF %s(2) = 0 THEN", names[isc_status_pos]);
		printa(names[COLUMN], true, "CALL \"%s\" USING %s, %s", ISC_COMMIT_TRANSACTION,
			   status_vector(action), names[isc_trans_pos]);
		printa(names[COLUMN], false, "END-IF");
		printa(names[COLUMN], false, "IF %s(2) NOT = 0 THEN", names[isc_status_pos]);
		printa(names[COLUMN], true, "CALL \"%s\" USING %s, %s",
			   ISC_ROLLBACK_TRANSACTION, OMITTED, names[isc_trans_pos]);
		printa(names[COLUMN], false, "END-IF");
	}
	RMC_print_buffer(output_buffer, true);
	set_sqlcode(action);
}


//____________________________________________________________