[Firebird-devel] nullOffset on vacation ?

2022-09-25 Thread Norbert Saint Georges

Hi,

FB4
iso8859_1

With a varchar(32765) field, the API returns a nullOffset outside the 
buffer length and the next field gives me an offset identical to the 
nullOffset of the previous field.


Did I miss something?

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] decodeTimeTz or decodeTimeTzEx API?

2022-09-23 Thread Norbert Saint Georges

Dimitry Sibiryakov a écrit :

Norbert Saint Georges wrote 23.09.2022 7:26:
which version should be used and in which case should one or the other be 
used?


   decodeTimeTz is used for ISC_TIME_TZ type and decodeTimeTzEx is used for 
ISC_TIME_TZ_EX type (SQL_TIME_TZ and SQL_TIME_TZ_EX values in sqltype of 
SQLVAR/IMessageMetadata).


Thanks Dimitry, but
length(blr=29) = 12 so ISC_TIMESTAMP_TZ_EXPtr.
in which case to use ISC_TIMESTAMP_TZ_Ptr = 10?

ISC_TIME_TZ = record
utc_time: ISC_TIME;
time_zone: ISC_USHORT;
end;

ISC_TIME_TZ_EX = record
utc_time: ISC_TIME;
time_zone: ISC_USHORT;
ext_offset: ISC_SHORT;
end;
ISC_TIME_TZ = 6;
ISC_TIME_TZ_EX = 8;

length(BLR(28)) = 8;
in which case to use ISC_TIME_TZ?

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] decodeTimeTz or decodeTimeTzEx API?

2022-09-22 Thread Norbert Saint Georges

Hi,
which version should be used and in which case should one or the other 
be used?


thank you in advance,
Norbert

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] Building Firebird Linux with --with-builtin-tommath

2022-09-03 Thread Norbert Saint Georges
What is wrong here? Did I miss a configuration option somewhere? Is this a 
bug in the build?


Mark


Hi,
Personally, I compile git sources on centos/rocky by installing the 
lib's below otherwise it generates errors.



dnf config-manager --set-enabled crb

dnf upgrade -y
cd /
mkdir git
cd git
dnf install wget git -y
git clone https://github.com/FirebirdSQL/firebird.git

dnf install unzip m4 autoconf automake libtool libtool-ltdl icu libicu 
libicu-devel sed libtommath libtommath-devel libtomcrypt 
libtomcrypt-devel ncurses ncurses-devel gcc-c++ libstdc++ 
libstdc++-devel libtommath libtommath-devel glibc-static 
libstdc++-static libtool-ltdl-devel zlib zlib-devel -y


cd firebird

bla bla

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] Profiler plugin is not found. Windows snapshot Firebird-5.0.0.684-0-x64

2022-08-23 Thread Norbert Saint Georges

Simonov Denis via Firebird-devel a écrit :

SQL> connect inet://localhost:3055/employee user SYSDBA password 'masterkey';
Database: inet://localhost:3055/employee, User: SYSDBA
SQL> select rdb$profiler.start_session('Profile Session 1') from 
rdb$database;


 START_SESSION
=
Statement failed, SQLSTATE = HY000
Profiler plugin  is not found
-At function 'RDB$PROFILER.START_SESSION'
SQL>


Server Version: LI-T5.0.0.681 Firebird 5.0 Initial
this ok :-)

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] varbinary

2021-12-20 Thread Norbert Saint Georges
ROM_IP',FbDbType.VarChar, 
16);

  arParams[14].Direction := ParameterDirection.Input;
  arParams[14].Charset := FbCharset.OCTETS ;
  if EDIT_FROM_IP <> nil then
  arParams[14].Value := EDIT_FROM_IP;   <-- booomm :-)
  arParams[15] := new 
FbParameter('@EDIT_DATETIME',FbDbType.TimeStamp);

  arParams[15].Direction := ParameterDirection.Input;
  if EDIT_DATETIME <> nil then
  arParams[15].Value := EDIT_DATETIME;
  arParams[16] := new FbParameter('@PAY',CHAR(1));
  arParams[16].Direction := ParameterDirection.Input;
  arParams[16].Charset := FbCharset.ISO8859_1 ;
  if PAY <> nil then
  arParams[16].Value := PAY;
  arParams[17] := new FbParameter('@DELETED',CHAR(1));
  arParams[17].Direction := ParameterDirection.Input;
  arParams[17].Charset := FbCharset.ISO8859_1 ;
  if DELETED <> nil then
  arParams[17].Value := DELETED;
  arParams[18] := new FbParameter('@PASSWD',FbDbType.VarChar, 20);
  arParams[18].Direction := ParameterDirection.Input;
  arParams[18].Charset := FbCharset.ISO8859_1 ;
  if PASSWD <> nil then
  arParams[18].Value := PASSWD;
  var rowsAffected: System.Int32 := 
FBSqlHelper.ExecuteNonQuery(connectionString, sqlCommand.ToString(), 
arParams);

  exit rowsAffected;
end;

REATE TABLE VAPAUSFESTIT_REGISTER_FORMS (
   ID GUID NOT NULL,
   EVENT_ID   GUID NOT NULL,
   REGISTER_LANG  CHAR(2) NOT NULL,
   FIRSTNAME  VARCHAR(50),
   LASTNAME   VARCHAR(100),
   FULL_NAME  VARCHAR(200),
   EMAIL  VARCHAR(100) NOT NULL,
   KITS   VARCHAR(100),
   PHONE  VARCHAR(50) NOT NULL,
   COMMENT_COLLATION  VARCHAR(8000),
   COMMENT_WORK   VARCHAR(8000),
   INFORM_EMAIL   CHAR(1),
   FROM_IPVARCHAR(16) character set octets,
   REGISTER_DATETIME  TIMESTAMP,
   EDIT_FROM_IP   VARCHAR(16) character set octets,
   EDIT_DATETIME  TIMESTAMP,
   PAYCHAR(1),
   DELETED    CHAR(1) DEFAULT 'F',
   PASSWD VARCHAR(20)
);

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] varbinary

2021-12-20 Thread Norbert Saint Georges

Thank you for your two responses.
unfortunately I have a problem with an old project, following the 
update of the netprovider 8.5 client.
Several varchar (x) character set bytes are declared there which 
crashes on an expected byte [] even though I have been sending it 
strings for several months :-)

but ok :-)

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] varbinary

2021-12-20 Thread Norbert Saint Georges

Hello,


a varbinary has a subtype of 1 and not 0 (binary) normal?

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] fb 5.0.0.40 ?

2021-05-18 Thread Norbert Saint Georges

Hello,
I just compiled Firebird via git and he pulls me out the version 
Firebird 5.0.0.40-Initial.amd64 .


Normal?

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] blr 31 & 30

2021-02-04 Thread Norbert Saint Georges

Mark Rotteveel a écrit :

On 2021-02-04 09:39, Norbert Saint Georges wrote:

yes, this is what I found but there is no definition RDB $ FIELD_TYPE
= 30 or 31 in rdb $ types in FB4, what is it for?


The EXTENDED TIMESTAMP WITH TIME ZONE and EXTENDED TIME WITH TIME ZONE are 
protocol-only data-types, where it will always include the time zone offset, 
so client applications without named time zone support can determine the 
offset. See also SET BIND in the Firebird 4 RC-1 release notes.


So if I understand correctly, I will never risk finding the values 
32748 or 32750 in OO api (firebird.pas)?


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] blr 31 & 30

2021-02-04 Thread Norbert Saint Georges

Jirí Cincura a écrit :
yes, this is what I found but there is no definition RDB $ FIELD_TYPE = 
30 or 31 in rdb $ types in FB4, what is it for?


The "extended" definition is just for protocol, where the message contains 
also the TZ offset. But this is never stored.


OK, thanks

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] blr 31 & 30

2021-02-04 Thread Norbert Saint Georges

Jirí Cincura a écrit :
In Firebird 4. For example here 
https://github.com/FirebirdSQL/firebird/blob/T4_0_0_RC1/src/include/firebird/impl/sqlda_pub.h#L81.


--
Mgr. Jirí Cincura
https://www.tabsoverspaces.com/


yes, this is what I found but there is no definition RDB $ FIELD_TYPE = 
30 or 31 in rdb $ types in FB4, what is it for?


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] blr 31 & 30

2021-02-04 Thread Norbert Saint Georges

Hi,
In the NETProvider v8.0 code I can read the definition of the 
TimeStampTZEx and TimeTZEx fields having the values blr respectively 31 
& 30 and data type respectively 32748 & 32750
as I cannot find these values anywhere else, is it expected, in a 
future version of Firebird, an overload of timestamp_tz and time_tz?


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] have the dpb settings changed?

2020-12-18 Thread Norbert Saint Georges

Norbert Saint Georges a écrit :
That said, as far as I'm aware nothing changed in how this worked, but I do 
want to point out that there seems to be a mismatch in versions. You say 
you're using 4.0.0.2298, but that version tag indicates you're using 
4.0.0.2265.


exact, I will update the server


cp -r ../gen/Firebird-debuginfo-4.0.0.2298-ReleaseCandidate1.amd64/* /

after updating the sources and installing, the same error in 64bits but 
in 32bits it works.


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] have the dpb settings changed?

2020-12-18 Thread Norbert Saint Georges

Mark Rotteveel a écrit :

On 18-12-2020 15:58, Norbert Saint Georges wrote:

Mark Rotteveel a écrit :

On 18-12-2020 15:14, Norbert Saint Georges wrote:
Server version LI-V6.3.0.2265 Firebird 4.0 Release Candidate 1 on centos 
8.


What tool are you using that it still uses the old 'InterBase backwards 
compatible' version tag instead of the new version tag that (which would 
report LI-V4.0.0.xxx Firebird 4.0 etc)?

Codetyphon (free pascal)
I do not use this tag usually but there as I could not find or is the error 
I tried this one without success


I guess this means you're calling database info with tag isc_info_isc_version 
instead of isc_info_firebird_version


ouch, there I do not know it is ibexpert who informed me the version 
:-)


However, it seems like there is something wrong with that version tag, 
because I think it should report 6.4.x.x instead, not 6.3.x.x (which would 
indicate Firebird 3).


yet compiled from git source a few days ago.


To be clear, I only asked about the version thing because it piqued my 
curiosity, I was not responding to your actual issue.


That said, as far as I'm aware nothing changed in how this worked, but I do 
want to point out that there seems to be a mismatch in versions. You say 
you're using 4.0.0.2298, but that version tag indicates you're using 
4.0.0.2265.


exact, I will update the server

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] have the dpb settings changed?

2020-12-18 Thread Norbert Saint Georges

Dimitry Sibiryakov a écrit :
I updated firebird.pas from version 4.0.0.2298 and I have since only a 
message in firebird.log "No matching plugins on server".


   Watch out: plugin names are case sensitive.


I tried everything 'Srp' 'srp' 'SRP' 'sRp' :-) nothing helps.

now i just made a dumpling and it works!
I recompiled the source in 32bits forgetting the lib 64 and it still 
works :-(


???

I will take the tests like this to see if it holds.

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] have the dpb settings changed?

2020-12-18 Thread Norbert Saint Georges

Mark Rotteveel a écrit :

On 18-12-2020 15:14, Norbert Saint Georges wrote:

Server version LI-V6.3.0.2265 Firebird 4.0 Release Candidate 1 on centos 8.


What tool are you using that it still uses the old 'InterBase backwards 
compatible' version tag instead of the new version tag that (which would 
report LI-V4.0.0.xxx Firebird 4.0 etc)?

Codetyphon (free pascal)
I do not use this tag usually but there as I could not find or is the 
error I tried this one without success


However, it seems like there is something wrong with that version tag, 
because I think it should report 6.4.x.x instead, not 6.3.x.x (which would 
indicate Firebird 3).


yet compiled from git source a few days ago.

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] have the dpb settings changed?

2020-12-18 Thread Norbert Saint Georges

Hi,

I updated firebird.pas from version 4.0.0.2298 and I have since only a 
message in firebird.log "No matching plugins on server".


Server version LI-V6.3.0.2265 Firebird 4.0 Release Candidate 1 on 
centos 8.


I have tried all the logical possibilities with 
isc_dpb_auth_plugin_name without any changes.


an idea?

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] OO API examples for Object Pascal

2020-08-18 Thread Norbert Saint Georges

Paul Reeves a écrit :



Does anyone have any thoughts on this?


Paul


First of all, thanks for your code, it's nicer to read than c ++ :-)

Just a question about the "read only" transaction in 03.select.pas on 
line 224, you are not using the ptb initialized on line 217, normal?


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] New API and scrollable cursors

2020-04-27 Thread Norbert Saint Georges

Pavel Cisar a écrit :

Dne 27. 04. 20 v 18:09 Dmitry Yemanov napsal(a):

27.04.2020 17:34, Pavel Cisar wrote:

The remote protocol support was simply forgotten because nobody asked for 
that for years. Mea culpa, I was too busy with the replication stuff. 
Obviously, not so many people use the new API... and even less people use 
new features introduced there.


Well, users would use new API if connectivity package they use would use it. 
AFAIK only IBX2 provided new API layer as an option till now. Obviously 
Firebird & FreePascal/Delphi developers did not bother to change from old to 
new layer, did not use v3 or scroll in it, or used scrollable cursors in 
embedded-only applications. Unfortunately, Python is not a language of choice 
for embedded - it's mostly server development. One from main points I started 
to work on new driver was to help transition from old to new API, and to 
allow our QA to work with features available only trough it. I don't know if 
it's possible to provide such feature (even with embedded-only) in 
wire-protocol-based connectivity packages like JayBird or .NET Provider, but 
I guess if it would be doable, their maintainers would eventually implement 
it.


Ok, shit happens, so what we will do now? Leave it to Firebird 5 that is who 
knows how many years in future, or would we try to provide it sooner? 
Personally, I think that remote scrollable cursors are just an improvement 
that could be introduced in any version, including maintenance ones, and are 
worth to be provided anytime sooner than in v5.0.


regards
Pavel Cisar


Personally, I use the new pascal API every day and have been waiting 
for this implementation for a long time because it is essential for all 
lib devs without that they do not even start.


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] New API and scrollable cursors

2020-04-27 Thread Norbert Saint Georges

Dmitry Sibiryakov a écrit :

27.04.2020 15:23, Pavel Cisar wrote:
Or is the impression that this feature is not actually implemented really 
true?


   Yes it is true though should work in embedded mode.


is it functional in embedded?
are you sure ?

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] The code attempted to access a virtual address without privilege to do so. FB4

2020-04-20 Thread Norbert Saint Georges

Hello,

I am trying to create a UDR procedure under FB4 in Pascal and I have 
this error message in the log


NORPA Mon Apr 20 11:40:25 2020
Access violation.
The code attempted to access a virtual
address without privilege to do so.
This exception will cause the Firebird server
to terminate abnormally.


NORPA Mon Apr 20 11:40:25 2020
"C: \ Program Files (x86) \ Firebird \ Firebird_4_0 \ firebird.exe": 
terminated abnormally (4294967295)


It is likely that I make a mistake in my code but the message "address 
without privilege" worries me a little :-)


Normal as a message?

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] how to use "set bind" in F4

2020-03-25 Thread Norbert Saint Georges

Ok, I'll say how I do it, but it's not the best way at all, really not.
I download the two versions (32x & 64x) which I decompress in each in a 
temporary sub-folder.


For the 64x version, after stopping the FB4 service, I copy the whole 
folder without the .conf or security4.fdb in the FB4 installation 
folder and restart the service.


The 32x version only serves as a container for IBExpert which I 
configured to take the default fbclient.dll in it.


Since you used the installer for the 1436, you need to replace the dll 
fbclient and gds32 in the folder system32 / wow64 because the version 
1436 is not compatible with the 1817.


PS: sometimes, there are changes in the configuration files and it is 
preferable, from time to time, to make a windiff or other :-).


PS2: I also load the linux version 
(http://web.firebirdsql.org/download/snapshot_builds/linux/fbtrunk/) to 
have the latest version of firebird.pas


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] how to use "set bind" in F4

2020-03-24 Thread Norbert Saint Georges

Steve Bailey a écrit :

So, where do I get 1815 from?


http://web.firebirdsql.org/download/snapshot_builds/win/4.0/

to day, 1817 :-)

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] how to use "set bind" in F4

2020-03-24 Thread Norbert Saint Georges

Steve Bailey a écrit :

( I am using WI-T4.0.0.1436 Firebird 4.0 Beta 1 on Windows 10.)


you need to update the version of Firebird 4 currently 1815.
In your version, 1436, this was not yet implemented.

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] how to use "set bind" in F4

2020-03-24 Thread Norbert Saint Georges

Gregor Kobler via Firebird-devel a écrit :

Hello
How can i use the clause
SET TIME ZONE BIND { NATIVE | LEGACY }
I ise Delphi Rio 10.3.3 with FireDAC. Should i made it as a parameter 
somewhere at the connection component? Or should i run it as a SQL-Statement? 
How can i set this bind, i have no idea. Thanks for any hint Gregor


procedure TForm1.FDConnection1AfterConnect(Sender: TObject);
var
 Query: TFDQuery;
begin
try
 Query := TFDQuery.Create( nil );
 Query.Connection := fdconnection1;
 Query.SQL.Text := 'SET BIND OF  TIME ZONE  TO  LEGACY ;';
 Query.ExecSQL;
finally
 query.Free;
end;
end;

Afterwards, all the tz dates will be returned compatible firedac in the 
"fdconnection1" session
and this method can be used to format the new format of FB4 (except 
varbinary it seems to me)


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] IUtile API Version numbering

2020-03-19 Thread Norbert Saint Georges

Tony Whyman a écrit :

were all missing from Firebird.pas. It should now compile correctly.


fpc Firebird.pas
--
Free Pascal Compiler version 3.0.4 [2017/10/06] for i386
Copyright (c) 1993-2017 by Florian Klaempfl and others
Target OS: Win32 for i386
Compiling Firebird.pas
Firebird.pas(3451,13) Warning: An inherited method is hidden by 
"toString(IStatus;FB_DEC16Ptr;LongWord;PChar);"
Firebird.pas(3478,13) Warning: An inherited method is hidden by 
"toString(IStatus;FB_DEC34Ptr;LongWord;PChar);"
Firebird.pas(3501,13) Warning: An inherited method is hidden by 
"toString(IStatus;FB_I128Ptr;LongInt;LongWord;PChar);"

15424 lines compiled, 1.0 sec
3 warning(s) issued
--

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] IUtile API Version numbering

2020-03-19 Thread Norbert Saint Georges

Tony Whyman a écrit :

See http://tracker.firebirdsql.org/browse/CORE-6207


this is the difference between the compilation of the day before 
yesterday and that of the git less than an hour ago


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] IUtile API Version numbering

2020-03-19 Thread Norbert Saint Georges

for information, the differential from yesterday's "firebird.pas"

139c139,140
<ISC_USHORT = word; { 16 bit unsigned }
---

ISC_USHORT = word;  { 16 bit unsigned }
ISC_SHORT = smallint;   { 16 bit signed }

145a147,152

ISC_TIME_TZ_EX = record
utc_time: ISC_TIME;
time_zone: ISC_USHORT;
ext_offset: ISC_SHORT;
end;


153a161,166

end;

ISC_TIMESTAMP_TZ_EX = record
utc_timestamp: ISC_TIMESTAMP;
time_zone: ISC_USHORT;
ext_offset: ISC_SHORT;


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] timestamp field

2020-01-10 Thread Norbert Saint Georges

Hello

In FB4, when adding a timestamp field it creates me timestamp_tz 
(32752). normal?


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] loadBlob & dumpBlob in Pascal file

2019-12-23 Thread Norbert Saint Georges

Alex Peshkoff via Firebird-devel a écrit :
Methods loadBlob/dumpBlob of Util interface (what you mention are not 
procedures, just pascal analogue of C typedef) are used at client side 
(certainly embedded case works too) to manipulate blobs - load data from file 
to blob or store blob data in a file. Parameter "file_: PAnsiChar" is a name 
of that file.  Boolean txt defines should binary or text more be used when 
working with that file. And yes - that files are sooner of all "external to 
Firebird".


This methids have nothing to do with SQL data types, therefore nothing like 
SQL_BFile is present.


excellent, I'll take a look.

A big thank-you

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] loadBlob & dumpBlob in Pascal file

2019-12-23 Thread Norbert Saint Georges

Adriano dos Santos Fernandes a écrit :

On 23/12/2019 09:08, Norbert Saint Georges wrote:

Apologies, I badly speak in English.

In Firebird.pas, there are two procedures:

1) IUtil_loadBlobPtr = procedure (this: IUtil; status: IStatus; blobId: 
ISC_QUADPtr; att: IAttachment; tra: ITransaction; file_: PAnsiChar; txt: 
Boolean); cdecl;


2) IUtil_dumpBlobPtr = procedure (this: IUtil; status: IStatus; blobId: 
ISC_QUADPtr; att: IAttachment; tra: ITransaction; file_: PAnsiChar; txt: 
Boolean); cdecl;


Having a "file_: PAnsiChar" parameter and another "txt: boolean" which 
suggests that there are plans to load and unload files external to Firebird.


My question was: Is there a type "external_File" for example: SQL_BFile = 
32767 which would be missing in the Firebird.pas file? Or if not, what is it 
used for?



No. These functions also exists in the legacy API and they are used by
ISQL to load/dump BLOBs.

The file name refers to a client file.


Adriano


OK, thanks

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] loadBlob & dumpBlob in Pascal file

2019-12-23 Thread Norbert Saint Georges
Alex Peshkoff via Firebird-devel a écrit :
> On 2019-12-12 11:29, Norbert Saint Georges wrote:
>> Hello everyone,
>>
>> for the procedures IUtil_loadBlobPtr & iUtil_dumpBlobPtr  what type of 
>> field is provided? BFile ??
>>
>
> May be I do not understand your question.

Apologies, I badly speak in English.

In Firebird.pas, there are two procedures:

1) IUtil_loadBlobPtr = procedure (this: IUtil; status: IStatus; blobId: 
ISC_QUADPtr; att: IAttachment; tra: ITransaction; file_: PAnsiChar; txt: 
Boolean); cdecl;

2) IUtil_dumpBlobPtr = procedure (this: IUtil; status: IStatus; blobId: 
ISC_QUADPtr; att: IAttachment; tra: ITransaction; file_: PAnsiChar; txt: 
Boolean); cdecl;

Having a "file_: PAnsiChar" parameter and another "txt: boolean" which suggests 
that there are plans to load and unload files external to Firebird.

My question was: Is there a type "external_File" for example: SQL_BFile = 32767 
which would be missing in the Firebird.pas file?
Or if not, what is it used for?

-- 
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] SQL_INT128

2019-12-21 Thread Norbert Saint Georges

Dimitry Sibiryakov a écrit :

20.12.2019 21:19, Norbert Saint Georges wrote:
I try all the possibilities in numeric (38), decimal (38) it returns me, 
via pascal API, always a 32762 and not a 32752


   You must use the latest snapshots, not old beta release.


Thank you for your answers.
after compilation of the Server Version: WI-T4.0.0.1694 Firebird 4.0 
Beta 1 everything is ok


Beautiful day.

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] SQL_INT128

2019-12-20 Thread Norbert Saint Georges

Dimitry Sibiryakov a écrit :

20.12.2019 21:08, Norbert Saint Georges wrote:
it is declared SQL_INT128 with 32752 but cannot find a way to declare it in 
an FB4 table.

An idea or a link?


   doc/sql.extensions/README.data_types.txt


thank you for your reply.
but I try all the possibilities in numeric (38), decimal (38) it 
returns me, via pascal API, always a 32762 and not a 32752


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] SQL_INT128

2019-12-20 Thread Norbert Saint Georges

Good evening,
it is declared SQL_INT128 with 32752 but cannot find a way to declare 
it in an FB4 table.

An idea or a link?

thank you in advance

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] how to declare a decfloat (16) with a scale of zero for a column GENERATED BY DEFAULT AS IDENTITY

2019-12-16 Thread Norbert Saint Georges

Mark Rotteveel a écrit :
In other words, your number has 39 digits and is too big to fit in a signed 
int128, and therefor is too big for NUMERIC(38)


BTW, as a DECFLOAT(16), that number would be

2039748092580420E+23, so you would lose +/- 23 digits of precision (more due 
to rounding)


Mark


oulala, I did not check this
it's my bullshit day.

Many thanks for your time

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] how to declare a decfloat (16) with a scale of zero for a column GENERATED BY DEFAULT AS IDENTITY

2019-12-16 Thread Norbert Saint Georges

Mark Rotteveel a écrit :

On 2019-12-16 15:42, Norbert Saint Georges wrote:

Mark Rotteveel a écrit :

I can't answer that without information what the problem is.

Mark


okay :-)



I was actually referring to what you meant with:

"""
t = kb
t1 = ok
"""

Especially regarding the 'kb', I had no clue what you meant, but I guess it 
was an overflow error.


sorry, i made a mistake, it was "k"nocked "o"ut.



I am developing an application to import Oracle DBs to Firebird 4.

when for example, a table is declared like this:

CREATE TABLE part (
 part_id NUMBER GENERATED BY DEFAULT AS IDENTITY,
 part_name VARCHAR2 (255) NOT NULL,
 buy_price NUMBER (9.2) CONSTRAINT check_pos_buy_price CHECK 
(buy_price> 0),

 PRIMARY KEY (part_id)
);

part_id is a number that has the 
value:203974809258041991228294191469794647457


what should i use in firebird 4 to import part_id?


See my other post: that value is too big to fit in a NUMERIC(38) and there is 
no other numeric type in Firebird that would allow you to keep the number 
with all precision. So you would have to use a CHAR or VARCHAR (or maybe a 
BINARY (CHAR CHARACTER SET OCTETS) and encode the number in binary format if 
you're looking to save space).


BTW: Such an extremely high part-number seems rather odd, and could indicate 
those numbers encode additional information, which may indicate this should 
be a string anyway.


Mark

ok, I'm going on a varbinary (16) and would do a UDR for the indentity

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] how to declare a decfloat (16) with a scale of zero for a column GENERATED BY DEFAULT AS IDENTITY

2019-12-16 Thread Norbert Saint Georges

Dimitry Sibiryakov a écrit :

16.12.2019 15:42, Norbert Saint Georges wrote:

I am developing an application to import Oracle DBs to Firebird 4.


   Do you mean "automatic import"?
yes, for people like me, who don't like tinkering with something other 
than Firebird :-)


part_id is a number that has the 
value:203974809258041991228294191469794647457



what should i use in firebird 4 to import part_id?


   For exactly that big number (39 decimal digits) you can use only string. 
Even in Firebird 4 NUMERIC is limited to 38 decimal digits.

int128 is not on 16 bytes planned in FB4?

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] how to declare a decfloat (16) with a scale of zero for a column GENERATED BY DEFAULT AS IDENTITY

2019-12-16 Thread Norbert Saint Georges

Mark Rotteveel a écrit :

I can't answer that without information what the problem is.

Mark


okay :-)

I am developing an application to import Oracle DBs to Firebird 4.

when for example, a table is declared like this:

CREATE TABLE part (
 part_id NUMBER GENERATED BY DEFAULT AS IDENTITY,
 part_name VARCHAR2 (255) NOT NULL,
 buy_price NUMBER (9.2) CONSTRAINT check_pos_buy_price CHECK 
(buy_price> 0),

 PRIMARY KEY (part_id)
);

part_id is a number that has the 
value:203974809258041991228294191469794647457


what should i use in firebird 4 to import part_id?

thank you in advance.

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] how to declare a decfloat (16) with a scale of zero for a column GENERATED BY DEFAULT AS IDENTITY

2019-12-16 Thread Norbert Saint Georges
Thank you for your answer.

but when i do the test

create table t (id numeric (38,0));
insert into t (id) values (203974809258041991228294191469794647457);

create table t1 (id decfloat (16));
insert into t1 (id) values (203974809258041991228294191469794647457);

t = kb
t1 = ok

I have to import type number from oracle and the above value is an example.

What do you advise me?

-Message d'origine-
De : Mark Rotteveel [mailto:m...@lawinegevaar.nl] 
Envoyé : lundi 16 décembre 2019 13:32
À : Norbert Saint Georges; For discussion among Firebird Developers
Objet : Re: [Firebird-devel] how to declare a decfloat (16) with a scale of 
zero for a column GENERATED BY DEFAULT AS IDENTITY

On 2019-12-16 09:43, Norbert Saint Georges wrote:
> Hello,
> 
> 
> can't an identity column be a decfloat (16)?
> 
>   RECREATE TABLE FIREBIRD_PARTS (
>   PART_ID DECFLOAT (16) GENERATED BY DEFAULT AS IDENTITY 
> not null
>     , PART_NAME varchar (255) not null
>     , BUY_PRICE decimal (9, 2)
> );
> 
> error: 336068881
> 
> description found in client-java:
> 
> Identity column {0} of table {1} must be of exact number type with zero 
> scale

You can't, a `DECFLOAT` is not a suitable datatype for this. An identity 
column has to be an exact number type with zero scale (== an integer 
type), and a `DECFLOAT` is a floating point type.

And if it were possible, using `DECFLOAT(16)` wouldn't make much sense: 
it has less digits than a BIGINT (16 vs 19), while it takes the same 
storage space.

The maximum value generated by the sequence backing an identity column 
is the maximum value of a `BIGINT`, so using a larger type than `BIGINT` 
has no real use, except taking more space. I'm not sure if it is 
possible to use `NUMERIC(38,0)` (which provides 38/39 digits), but given 
the restriction on the maximum value of a sequence to 2^63 - 1, using 
that type would also not make sense.

Mark

Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] how to declare a decfloat (16) with a scale of zero for a column GENERATED BY DEFAULT AS IDENTITY

2019-12-16 Thread Norbert Saint Georges

Hello,


can't an identity column be a decfloat (16)?

  RECREATE TABLE FIREBIRD_PARTS (
  PART_ID DECFLOAT (16) GENERATED BY DEFAULT AS IDENTITY 
not null

    , PART_NAME varchar (255) not null
    , BUY_PRICE decimal (9, 2)
);

error: 336068881

description found in client-java:

Identity column {0} of table {1} must be of exact number type with zero 
scale


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] loadBlob & dumpBlob in Pascal file

2019-12-12 Thread Norbert Saint Georges

Hello everyone,

for the procedures IUtil_loadBlobPtr & iUtil_dumpBlobPtr  what type of 
field is provided? BFile ??


thank you in advance.

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] FB4 for win xp ->2008r1

2019-12-07 Thread Norbert Saint Georges

Vlad Khorsun a écrit :

 32-bit build should be compatible with WinXP as it is built using WinXP
platform toolset. But I never check it on WinXP. And there was no promise
by the team that it will be compatible, btw.


Ok with XP sp3 but so all other environment with only sp2 is xp64, 
sbs2003, win2008r1, .. are out ;-)

FYI, FB 3.x works great on these platforms.

Regards,

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] FB4 for win xp ->2008r1

2019-12-06 Thread Norbert Saint Georges

Hello,

Fbclient.dll no longer supports windows version 5.2-> 6.0?

Entry procedure entry point « ucrtbase.abort » could not be located in 
the dynamic link library api-ms-win-crt-runtime-|1-1-0.dll


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] clop and firebird.pas

2019-11-29 Thread Norbert Saint Georges

Alex Peshkoff via Firebird-devel a écrit :
I'm afraid I have to ask you to checkout once again from github and send me 
log once again - firebird.pas was missing in 'clean' target.


it's ok now on centos8

https://tetrasys.fi/data/FB4makeOnCentos8_2.7z

a big thank-you

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] clop and firebird.pas

2019-11-29 Thread Norbert Saint Georges

Alex Peshkoff via Firebird-devel a écrit :

On 2019-11-29 12:57, Norbert Saint Georges wrote:

Hello everyone,

When compiling sources via the git repository, clop does not create the 
firebird.pas file on either cent 8 or windows 7 32/64; Why ? :-)




Can you send here full build log (i.e. make clean; make >make.log 2>&1) from 
centos? firebird.pas is always successfully created for e on linux.


Sorry for the delay.

the log is available here: https://tetrasys.fi/data/FB4makeOnCentos8.7z

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] clop and firebird.pas

2019-11-29 Thread Norbert Saint Georges

Hello everyone,

When compiling sources via the git repository, clop does not create the 
firebird.pas file on either cent 8 or windows 7 32/64; Why ? :-)


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] Employee DB for FB4

2019-11-26 Thread Norbert Saint Georges

Hello everyone,

Is there a DB FB4 that includes all the features built into FB4, like 
"employee" up to date?


Thank you in advance

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] [FB-Tracker] Created: (CORE-6157) Firebird.pas

2019-10-14 Thread Norbert Saint Georges (JIRA)
Firebird.pas


 Key: CORE-6157
 URL: http://tracker.firebirdsql.org/browse/CORE-6157
 Project: Firebird Core
  Issue Type: Task
  Components: API / Client Library
Affects Versions: 4.0 Beta 1, 3.0.4
 Environment: Windows package
Reporter: Norbert Saint Georges


the Firebird.pas file is distributed only in the linux version but in no other 
version.

in version 4.0.0.1629, there are the following errors:

In Pascal, "record" is a reserved word.

after renaming:

"record" to "frecord";
"integer32" to "Int32";

added:

ISC_TIME_TZ = Integer; // ?? I do not know the good value
ISC_TIMESTAMP_TZ = Integer; // ?? I do not know the good value

after these changes it compiles under Delphi and Typhoon Code.

-- 
This message is automatically generated by JIRA.
-
If you think it was sent incorrectly contact one of the administrators: 
http://tracker.firebirdsql.org/secure/Administrators.jspa
-
For more information on JIRA, see: http://www.atlassian.com/software/jira




Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] File Firebird.pas

2019-10-14 Thread Norbert Saint Georges

Alex Peshkoff via Firebird-devel a écrit :

On 10/14/19 1:59 PM, Norbert Saint Georges wrote:

Alex Peshkoff via Firebird-devel a écrit :

On 10/12/19 5:57 PM, Norbert Saint Georges wrote:

Good evening,

I find the Firebird.pas file in the B3_0_Release but not in the master, 
normal? :-)




Depends upon _where_ you do not find it. File is generated during the 
build, i.e. it's missing in git & src tarbell. File should be present in 
distributed binaries.


actually, I found the file in the version for linux.
It is not included in the windows versions.



Please add an item to the tracker regarding windows package.


done :-)

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] File Firebird.pas

2019-10-14 Thread Norbert Saint Georges

Alex Peshkoff via Firebird-devel a écrit :

On 10/12/19 5:57 PM, Norbert Saint Georges wrote:

Good evening,

I find the Firebird.pas file in the B3_0_Release but not in the master, 
normal? :-)




Depends upon _where_ you do not find it. File is generated during the build, 
i.e. it's missing in git & src tarbell. File should be present in distributed 
binaries.


for info, in Pascal, "record" is a reserved word.

after renaming
"record" to "frecord";
"integer32" to "Int32"

added
ISC_TIME_TZ = Integer;
ISC_TIMESTAMP_TZ = Integer;


it compiles under Delphi rio and Typhoon Code.

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] File Firebird.pas

2019-10-14 Thread Norbert Saint Georges

Alex Peshkoff via Firebird-devel a écrit :

On 10/12/19 5:57 PM, Norbert Saint Georges wrote:

Good evening,

I find the Firebird.pas file in the B3_0_Release but not in the master, 
normal? :-)




Depends upon _where_ you do not find it. File is generated during the build, 
i.e. it's missing in git & src tarbell. File should be present in distributed 
binaries.


actually, I found the file in the version for linux.
It is not included in the windows versions.

thank you

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] File Firebird.pas

2019-10-12 Thread Norbert Saint Georges

Good evening,

I find the Firebird.pas file in the B3_0_Release but not in the master, 
normal? :-)


--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] IBlob->getInfo in Firebird.pas

2019-10-09 Thread Norbert Saint Georges

Good morning all,

IBlob.getInfo always returns [2,0,0, .] regardless of the requested 
tags.
What is the procedure for knowing the size and number of segments of 
SQL_Blob with an IBlob?


thank you in advance,

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] example 07.blob.cpp

2019-10-08 Thread Norbert Saint Georges

Good morning all,

in the example 07.blob.cpp we find the code
"// Message for data exchange
FB_MESSAGE (Msg, ThrowStatusWrapper,
(FB_BLOB, b)
) message (& status, master); "


Firebird.pas does not take the definition of FB_Message nor FB_BLOB.

In Pascal, how do you do?

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] Internal error when using API clap: read past EOF

2019-10-01 Thread Norbert Saint Georges

Vlad Khorsun a écrit :

01.10.2019 20:12, Norbert Saint Georges wrote:

Hello,
I try different solutions to use the new API in Pascal.
I get good "service_mgr"
I pass spb.insertTag (st, isc_action_svc_trace_start);
I get the error "'Internal error when using API clap: read past EOF'" at 
serv.start (st, spb.getBufferLength (st), spb.getBuffer (st));


I can not find any documentation on the subject via goo, would you have a 
link of a functional example?


   Read doc\README.services_extension, chapter (3) "Services API extension - 
trace support".



Start user trace session :
action
isc_action_svc_trace_start

parameter(s)
isc_spb_trc_name : trace session name, string, optional
isc_spb_trc_cfg  : trace session configuration, string, 
mandatory


I.e. you missed mandatory parameter isc_spb_trc_cfg.

Hope it helps,
Vlad

PS Also, you could use fbsvcmgr to try different SPB sequiences



Thank you for your quick reply,
Norbert

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] Internal error when using API clap: read past EOF

2019-10-01 Thread Norbert Saint Georges

Hello,
I try different solutions to use the new API in Pascal.
I get good "service_mgr"
I pass spb.insertTag (st, isc_action_svc_trace_start);
I get the error "'Internal error when using API clap: read past EOF'" 
at serv.start (st, spb.getBufferLength (st), spb.getBuffer (st));


I can not find any documentation on the subject via goo, would you have 
a link of a functional example?


Thank you in advance,
Norbert

--
Norbert Saint Georges
http://tetrasys.fi



Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] [FB-Tracker] Created: (CORE-5403) External Engines, UDR Function, IN Param

2016-11-20 Thread Norbert Saint Georges (JIRA)
External Engines, UDR Function, IN Param


 Key: CORE-5403
 URL: http://tracker.firebirdsql.org/browse/CORE-5403
 Project: Firebird Core
  Issue Type: Bug
  Components: API / Client Library
Affects Versions: 3.0.1, 3.0.0, 4.0 Initial
Reporter: Norbert Saint Georges


CREATE OR ALTER FUNCTION INT16_BIN(
FINT16 SMALLINT)
RETURNS CHAR(2) CHARACTER SET OCTETS
EXTERNAL NAME 't4s_to_bin!int16_bin'
ENGINE UDR;

int16Procedure = class(IExternalFunctionImpl)
...

procedure int16Procedure.execute(status: IStatus; context: IExternalContext; 
inMsg: Pointer; outMsg: Pointer);
  var
fsmal : int16;
inbuffer, outbuffer: array of byte;
isnull : wordbool;
wordval : word;
  begin
inbuffer := inMsg ;
move(inbuffer[0],int16(fsmal),sizeof(int16));
move(inbuffer[2],word(wordval),2);
isnull := wordval<>0; 
outbuffer := outmsg;
..

select int16_bin(0) from rdb$database

outbuffer := outmsg;  <-- ERROR : Invalid pointer operation !



/*--*/


CREATE OR ALTER FUNCTION INT32_BIN(
FINT32 INTEGER)
RETURNS CHAR(4) CHARACTER SET OCTETS
EXTERNAL NAME 't4s_to_bin!int32_bin'
ENGINE UDR;

int32Procedure = class(IExternalFunctionImpl)
...

procedure int32Procedure.execute(status: IStatus; context: IExternalContext; 
inMsg: Pointer; outMsg: Pointer);
  var
fsmal : int32;
inbuffer, outbuffer: array of byte;
isnull : wordbool;
wordval : word;
  begin
inbuffer := inMsg ;
move(inbuffer[0],int32(fsmal),sizeof(int32));
move(inbuffer[2],word(wordval),2);
isnull := wordval<>0; 
outbuffer := outmsg;
..

select int32_bin(0) from rdb$database;

outbuffer := outmsg;  <-- ERROR : Invalid pointer operation !


select int32_bin(32768) from rdb$database;

fsmal   := 32768;
wordval := 0;
isnull  := false;

select int32_bin(-32768) from rdb$database;

fsmal   := -32768;
wordval := 65535;   <-- Error;
isnull  := true;<-- Error;


select int32_bin(2147483647) from rdb$database;

fsmal   := 2147483647;
wordval := 32767;   <-- Error;
isnull  := true;<-- Error;


select int32_bin(-2147483648) from rdb$database;

fsmal   := -2147483648;
wordval := 32768;   <-- Error;
isnull  := true;<-- Error;


/*--*/

CREATE OR ALTER FUNCTION INT64_BIN(
FINT64 BIGINT)
RETURNS CHAR(8) CHARACTER SET OCTETS
EXTERNAL NAME 't4s_to_bin!int64_bin'
ENGINE UDR;

int64Procedure = class(IExternalFunctionImpl)
...

procedure int64Procedure.execute(status: IStatus; context: IExternalContext; 
inMsg: Pointer; outMsg: Pointer);
  var
fsmal : int64;
inbuffer, outbuffer: array of byte;
isnull : wordbool;
wordval : word;
  begin
inbuffer := inMsg ;
move(inbuffer[0],int64(fsmal),sizeof(int64));
move(inbuffer[2],word(wordval),2);
isnull := wordval<>0; 
outbuffer := outmsg;
..

for all  'select int64_bin(?) from rdb$database;'

outbuffer := outmsg;  <-- ERROR : Invalid pointer operation !



-- 
This message is automatically generated by JIRA.
-
If you think it was sent incorrectly contact one of the administrators: 
http://tracker.firebirdsql.org/secure/Administrators.jspa
-
For more information on JIRA, see: http://www.atlassian.com/software/jira



--
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] IN UDR Function

2016-11-19 Thread Norbert Saint Georges
Hello all,

When the input parameter of a UDR function is zero, the outmsg pointer 
is null, why?

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] UDR IExternalFunction

2016-11-16 Thread Norbert Saint Georges
Hello,

In the
procedure execute(status: IStatus; context: IExternalContext; inMsg: 
Pointer; outMsg: Pointer); virtual; abstract;

 inMsg and outMsg Pointer to what?

 And how to recover it?

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] Function UDR in Pascal

2016-11-16 Thread Norbert Saint Georges
Adriano dos Santos Fernandes a écrit :
> You're exporting the function as you'd did with an UDF (nothing to to
> with UDR). You're registering the function inside this exported function
> (instead of in firebird_udr_plugin)...

Ok, the exports must be grouped in a single declaration per dll.
When you know, the UDR functions work well :-)

Thank you,

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] Function UDR in Pascal

2016-11-16 Thread Norbert Saint Georges
Adriano dos Santos Fernandes a écrit :
> And you do it with these spaces (' int16_bin ') and expect it to work?
>
>
> Adriano

No, there is no space, it must be a copy / paste effect in the mail :-)

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] Function UDR in Pascal

2016-11-16 Thread Norbert Saint Georges
Adriano dos Santos Fernandes a écrit :
> You can make a procedure work but cannot make a function work?
>
>
> Adriano

Yes, that's exactly it.
On the basis of the example "gen_rows" I was able to create my own 
procedures that work well.

I try to create a UDR function.

UdrPlugin.registerFunction(status,' int16_bin ',int16Factory.create());


  On the basis of the example procedure but fails to register it. I 
still have the message "UDR plugin entry point not found."

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] Function UDR in Pascal

2016-11-16 Thread Norbert Saint Georges
Adriano dos Santos Fernandes a écrit :
> https://github.com/asfernandes/fbstuff/tree/master/src/pascal
>
>
> Adriano

Thanks Adriano,
It was on these sources that I was able to test the procedures( 
"gen_rows", which works well.
Except for my error, I do not see any sources on the implementation of 
a UDR Function?

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] Function UDR in Pascal

2016-11-16 Thread Norbert Saint Georges
Hello all,

Not finding any pascal example, I modified the procedure example 
"gen_rows" with the changes "IUdrFunctionFactoryImpl", 
But I get the error "UDR plugin entry point not found".

  //-//
function int16_bin(status: IStatus; theirUnloadFlagLocal: BooleanPtr; 
udrPlugin: IUdrPlugin): BooleanPtr; cdecl;
begin
udrPlugin.registerFunction(status, 'int16_bin', 
int16Factory.create());
int16theirUnloadFlag := theirUnloadFlagLocal;
Result := @int16UnloadFlag;
end;

  exports int16_bin;

initialization
int16UnloadFlag := false;

finalization
if (not int16UnloadFlag) then
int16theirUnloadFlag^ := true;

 //-//

create FUNCTION int16_bin(FINT16 Smallint NOT NULL)
RETURNS guid2
EXTERNAL NAME 'int16!int16_bin'
ENGINE UDR;


Or can I find a pascal example of a UDR function that is fine?

thank you in advance.

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


[Firebird-devel] new API IMetadataBuilder Bigint[1:100]

2016-11-13 Thread Norbert Saint Georges
Hello all,

in new API, How to declare an array of bigint?

builder := master.getMetadataBuilder(st,1);
builder.setType(st,0,SQL_ARRAY +1);
?? builder.setSubType(st,0, 16);
?? builder.setLength(st,0,100);

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Developer Access Program for Intel Xeon Phi Processors
Access to Intel Xeon Phi processor-based developer platforms.
With one year of Intel Parallel Studio XE.
Training and support from Colfax.
Order your platform today. http://sdm.link/xeonphi
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] Adding firebird.pas to windows build

2016-02-24 Thread Norbert Saint Georges
ok, sorry I did not understand.

I found the source of a new VM and it compiles under lazarus 3.0 good 
:-)

Carlos H. Cantu a écrit :
> Currently Firebird.pas can be found only in the linux builds.
> That's what Alex is talking about. It should be on Windows builds too.

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Site24x7 APM Insight: Get Deep Visibility into Application Performance
APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month
Monitor end-to-end web transactions and take corrective actions now
Troubleshoot faster and improve end-user experience. Signup Now!
http://pubads.g.doubleclick.net/gampad/clk?id=272487151=/4140
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel


Re: [Firebird-devel] Adding firebird.pas to windows build

2016-02-23 Thread Norbert Saint Georges
Alex Peshkoff a écrit :
> Taking into an account that pascal interface appears to be stable enough 
> and people start to experiment with it I suggest to add build of that 
> unit to windows build and package it in windows packages. For linux this 
> unit is built (using cloop) and placed into binary package.
>
> Alex,

Hi,

Program create;

uses Sysutils, Firebird;  <-- Firebird unit ??? Where can you find it?

var
.....

-- 
Norbert Saint Georges
http://tetrasys.fi


--
Site24x7 APM Insight: Get Deep Visibility into Application Performance
APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month
Monitor end-to-end web transactions and take corrective actions now
Troubleshoot faster and improve end-user experience. Signup Now!
http://pubads.g.doubleclick.net/gampad/clk?id=272487151=/4140
Firebird-Devel mailing list, web interface at 
https://lists.sourceforge.net/lists/listinfo/firebird-devel