Function EXP_relation

src/gpre/exp.cpp:645–694

//

gpre_rel* EXP_relation()
{
	if (!gpreGlob.isc_databases)
		PAR_error("no database for operation");

	// The current token is (i.e. should be) either a relation
	// name or a database name.  If it's a database name, search
	// it for the relation name.  If it's an unqualified relation
	// name, search all databases for the name

	gpre_rel* relation = NULL;

	SQL_resolve_identifier("<identifier>", NULL, NAME_SIZE);
	gpre_sym* symbol = MSC_find_symbol(gpreGlob.token_global.tok_symbol, SYM_database);
	if (symbol)
	{
		gpre_dbb* db = (gpre_dbb*) symbol->sym_object;
		PAR_get_token();
		if (!MSC_match(KW_DOT))
			CPR_s_error("period after database name");
		SQL_resolve_identifier("<Table name>", NULL, NAME_SIZE);
		relation = MET_get_relation(db, gpreGlob.token_global.tok_string, "");
	}
	else
	{
		for (gpre_dbb* db = gpreGlob.isc_databases; db; db = db->dbb_next)
		{
		    gpre_rel* temp = MET_get_relation(db, gpreGlob.token_global.tok_string, "");
			if (temp)
			{
				if (!relation)
					relation = temp;
				else
				{
					TEXT s[ERROR_LENGTH];
					fb_utils::snprintf(s, sizeof(s), "relation %s is ambiguous", gpreGlob.token_global.tok_string);
					PAR_get_token();
					PAR_error(s);
				}
			}
		}
	}

	if (!relation)
		CPR_s_error("relation name");

	PAR_get_token();

	return relation;
}


//____________________________________________________________