Function act_set_dialect

src/gpre/sql.cpp:4171–4206

//

static act* act_set_dialect()
{
	act* action = (act*) MSC_alloc(ACT_LEN);
	action->act_type = ACT_sql_dialect;

	USHORT dialect = EXP_USHORT_ordinal(false);
	if (dialect < 1 || dialect > 3)
		CPR_s_error("SQL DIALECT 1,2 or 3");

	if (gpreGlob.isc_databases && dialect != gpreGlob.compiletime_db_dialect &&
		gpreGlob.sw_ods_version < 10)
	{
		char warn_mesg[100];
		sprintf(warn_mesg, "Pre 6.0 database. Cannot use dialect %d, Resetting to %d\n",
				dialect, SQL_DIALECT_V5);
		dialect = SQL_DIALECT_V5;
		CPR_warn(warn_mesg);
	}
	else if (gpreGlob.isc_databases && dialect != gpreGlob.compiletime_db_dialect)
	{
		char warn_mesg[100];
		sprintf(warn_mesg, "Client dialect set to %d. Compiletime database dialect is %d\n",
				dialect, gpreGlob.compiletime_db_dialect);
		CPR_warn(warn_mesg);
	}

	action->act_object = (ref*) MSC_alloc(SDT_LEN);
	((set_dialect*) action->act_object)->sdt_dialect = dialect;

	// Needed because subsequent parsing pass1 looks at sw_Sql_dialect value
	gpreGlob.sw_sql_dialect = dialect;
	gpreGlob.dialect_specified = true;

	PAR_get_token();
	return action;
}


//____________________________________________________________