<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<font face="Times New Roman, Times, serif">Hello,<br>
<br>
I have problem with TSQLScript (?)<br>
Script looks like that<br>
<br>
SET TERM ^ ;<br>
CREATE PROCEDURE GET_USER_PRIVILEGES (<br>
</font><font face="Times New Roman, Times, serif"><font
face="Times New Roman, Times, serif">USER_ACCOUNT</font>
VARCHAR(10))<br>
RETURNS (<br>
RESULT CHAR(1))<br>
AS<br>
BEGIN<br>
FOR<br>
SELECT DISTINCT RDB$PRIVILEGE<br>
FROM RDB$USER_PRIVILEGES<br>
WHERE (RDB$USER = :USER_ACCOUNT)<br>
INTO :</font><font face="Times New Roman, Times, serif"><font
face="Times New Roman, Times, serif">RESULT</font><br>
DO<br>
BEGIN<br>
SUSPEND;<br>
END<br>
END<br>
^ <br>
SET TERM ; ^<br>
<br>
and the error message looks like that<br>
{...}PrepareStatement<br>
-Dynamic SQL Error<br>
-SQL Error Code = -104<br>
Token unknown - line 11, column 11<br>
-?<br>
<br>
line 11 -></font> <font face="Times New Roman, Times, serif"><font
face="Times New Roman, Times, serif"> INTO :</font></font><font
face="Times New Roman, Times, serif"><font face="Times New Roman,
Times, serif"><font face="Times New Roman, Times, serif">RESULT</font></font><br>
column 11-> :<br>
<br>
FlameRobin does not have any problems with this piece of code<br>
<br>
Any hints ?<br>
Paul<br>
<br>
I use Lazarus 1.0.10, Firebird 2.5 on Ubuntu 32bit<br>
</font>
</body>
</html>