Function act_prepare

src/gpre/sql.cpp:3946–3994

//

static act* act_prepare()
{
	if (gpreGlob.isc_databases && gpreGlob.isc_databases->dbb_next)
	{
		TEXT s[ERROR_LENGTH];
		fb_utils::snprintf(s, sizeof(s), "Executing dynamic SQL statement in context of database %s",
				gpreGlob.isc_databases->dbb_name->sym_string);
		CPR_warn(s);
	}

	const TEXT* transaction = NULL;
	par_options(&transaction);

	dyn* statement = par_statement();
	statement->dyn_database = gpreGlob.isc_databases;
	statement->dyn_trans = transaction;

	if (MSC_match(KW_INTO))
	{
		if (MSC_match(KW_SQL) && !MSC_match(KW_DESCRIPTOR))
			CPR_s_error("INTO SQL DESCRIPTOR sqlda");
		statement->dyn_sqlda = PAR_native_value(false, false);
	}

	if (!MSC_match(KW_FROM))
		CPR_s_error("FROM");

	switch (gpreGlob.sw_sql_dialect)
	{
	case 1:
		if (!isQuoted(gpreGlob.token_global.tok_type) && !MSC_match(KW_COLON))
			CPR_s_error(": <string expression>");
		break;

	default:
		if (gpreGlob.token_global.tok_type != tok_sglquoted && !MSC_match(KW_COLON))
			CPR_s_error(": <string expression>");
		break;
	}

	statement->dyn_string = PAR_native_value(false, false);

	act* action = (act*) MSC_alloc(ACT_LEN);
	action->act_type = ACT_dyn_prepare;
	action->act_object = (ref*) statement;
	action->act_whenever = gen_whenever();

	return action;
}


//____________________________________________________________