Custom Query (429 matches)

Diagram Definition module will be needed for UML 2.5 support. In context of UML it is sufficient to support DC and DI components only.

Current implementation shares collections for redefined properties, but at least UML metamodel redefines several properties by one, this cause incorrect operational of such properties. So, we need to use separate collection for each attribute and construct set of redefined properties automatically.

   --------------------------------
   -- Pooled_Database.Test_Alive --
   --------------------------------

   function Test_Alive (Object : not null access Pooled_Database_Object) return Boolean is
      Q : SQL.Queries.SQL_Query;
      Eight_Value : Holder;
   begin
      Q := Object.Query (From_UTF_8_String ("SELECT 3 + 5 AS eight"));
      Q.Execute;
      Eight_Value := Q.Value (1);
      Ada.Text_IO.Put_Line ("Test_Alive received" & Integer'Image (League.Holders.Integers.Element (Eight_Value)));
      return League.Holders.Integers.Element (Eight_Value) = 8;
   exception
      when E : SQL_Error | Constraint_Error =>
         Ada.Text_IO.Put_Line ("While Test_Alive... " & Ada.Exceptions.Exception_Name (E));
         return False;
   end Test_Alive;

outputs

Test_Alive received 0

I have yet no idea what is exactly going on here. I can't spot any obvious explanation.

Version: 0.4+ [r3727] vadim.godunko: Make Has_Detail abstract. Declare all kinds of faults as