W dniu 19.07.2013 09:38, Reinier Olislagers pisze:
On 18/07/2013 17:40, Paul wrote:
I have problem with TSQLScript (?)
Script looks like that

SET TERM ^ ;
CREATE PROCEDURE GET_USER_PRIVILEGES (
     USER_ACCOUNT VARCHAR(10))
RETURNS (
     RESULT CHAR(1))
AS
BEGIN
      FOR
      SELECT DISTINCT RDB$PRIVILEGE
      FROM RDB$USER_PRIVILEGES
      WHERE (RDB$USER = :USER_ACCOUNT)
      INTO :RESULT
      DO
      BEGIN
           SUSPEND;
      END
END
^
SET TERM ; ^

and the error message looks like that
{...}PrepareStatement
-Dynamic SQL Error
-SQL Error Code = -104
Token unknown - line 11, column 11
-?

line 11 ->     INTO :RESULT
column 11-> :

FlameRobin does not have any problems with this piece of code

Any hints ?
Paul

I use Lazarus 1.0.10, Firebird 2.5 on Ubuntu 32bit
Not really, except it's a Firebird error and it would be interested to
know what actually gets passed to the Firebird engine (to verify if that
runs in FlameRobin).
Perhaps sqldb logging [1] would work for that?

[1]
http://wiki.lazarus.freepascal.org/SqlDBHowto#Troubleshooting:_TSQLConnection_logging

--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Only TSQLScript.OnException is triggered with error message as above
I don't know why but TIBConnection.OnLog event isn't triggered at all
(even when TSQLScript.OnException is not assigned)

Paul
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to