id	summary	reporter	owner	description	type	status	priority	milestone	component	version	severity	resolution	keywords	cc
245	error in ObjectExist	imendez	danirus	"In last snapshot TOL version, from Feb 1st 2005, function ObjectExist has a wrong 
behaviour. In this code, ""existe"" is zero!!! No SADD code works becuase of this 
problem.

//////////////////////////////////////////////////////////////////////////////
Text SqlFormat(Anything var, Real gestor, Text format)
//////////////////////////////////////////////////////////////////////////////
{
  Text gestorTxt = Case
  (
    EQ(gestor, GesMic), ""Mic"",
    EQ(gestor, GesOra), ""Ora"",
    True, """"
  );
  Text gcodeText = ""Sql""+gestorTxt +""Format""+format;
  If(Not(ObjectExist(""Code"", gcodeText)), 
  {
    Real SqlTrace(""SqlFormat"", ""No existe el gestor o formato desconocido"");
    ""null""
  },
  {
    Code gcode = Eval(""Code ""+gcodeText+""; "");
    gcode(var)
  })
};
//////////////////////////////////////////////////////////////////////////////
PutDescription(""Formateador de Sql."",SqlFormat);
//////////////////////////////////////////////////////////////////////////////
Real existe = ObjectExist(""Code"", ""SqlFormat"");"	defect	closed	highest		Math	1.1.2	critical	fixed