Re: GNADE

["axu" <alex.crivat@gmail.com>]

Thanks for your answers :)
But ! ;)
The reason I've asked this was becaus I spent the whole day trying to
use in some way the native binding of GNADE to mysql. Obviously I've
missed something so I'll abuse of your kindness and post my program
here. If you see any problems please kik me in the head :)

--------------------------------------------------------------------------------------------------------------

procedure Server is
  dBase      : MySQL.Object;
  qId        : MySQL.Query_ID;
  haut       : Integer;
begin
  -- database initialisation
  Initialize(dBase);
  User(dBase, "user");
  Password( dBase, "pass" );
  Connect(  dBase, "localhost" );
  Select_DB( dBase, "base" );

  qID := Query( dBase, "select S_HAUTEUR from t_liens where
PK_LIENS=5");
  haut := Integer_Field( dBase, qID, 14 );

  exception
    when Field_Type_Error => Put_Line("Field type error");
    when No_Query_Result  => Put_Line("No result");
    when No_More_Rows     => Put_Line("No more rows");
    when Except : Others => Put_Line( "Fatal error, uncatched exception
" & Exception_Name( Except )
                                                   & Ascii.CR &
Ascii.LF & "Message: " & Exception_Message( Except ));
  Disconnect(dBase);
  Finalize(dBase);
end Server;
--------------------------------------------------------------------------------------------------------------
In mysql the field S_HAUTEUR is:
mysql> select S_HAUTEUR from t_liens where PK_LIENS=5;
+-------------------+
| S_HAUTEUR |
+-------------------+
|         0          |
+-------------------+
1 row in set (0.00 sec)
+---------------------+------------------+------+-----+---------+----------------+
 | Field              | Type           | Null | Key | Default | Extra
|
+---------------------+------------------+------+-----+---------+----------------+
 | S_HAUTEUR  | int(11)         | NO  |      | 0
________________________________________________________________

The program compiles fine but at runtime it crushes with:
------
Fatal error, uncatched exception CONSTRAINT_ERROR
Message: gnu-db-mysql.adb:1198 range check failed
------
Ok I've dig in and found that the exception is raised by the
Get_Field_Type function in gnu-db-mysql.adb and the cause I belive is
that the actual mysql type for this field does not have a coresponding
type in the enumeration Mysql_Field_Types.

So, if anyone from gnade see this please enlight me. Also he may tell
as what is the status of the mailling list gnade-devel cause I've got
no answer from the moderator after
my subscription.

Thanks everyone for your time
Best regards
Alex

On Oct 25, 9:52 pm, Ludovic Brenta <ludo...@ludovic-brenta.org> wrote:
> axu writes:
> > Is GNADE still active ?
> > Their last release dates from january 2005...and I wonder if someone
> > still manages it.
> > If not ..where can I find some database related libraries ?
> > (mysql/postgresql)The CVS repository contains a more recent version, dating back to
> December 2005.  Even though the project seems to be inactive, GNADE is
> mature and production-worthy; you can use it.
>
> There is an alternative called APQ by Warren W. Gray; it supports both
> PostgreSQL and MySQL.  Seehttp://home.cogeco.ca/~ve3wwg/software.html
>
> ... but the last update is September 25, 2004!  I think APQ is also
> mature and quite usable.
> 
> --
> Ludovic Brenta.