>
>Select FIELDA,FIELDB from TABLE1
>
>How to retunr it ? I mind, must do somethink like :
>
>Select FIELDA,FIELDB from TABLE1
>INTO :FIELDA,:FIELDB
>
>?
>
>TIA.
>
>German.

COMMIT WORK;
SET AUTODDL OFF;
SET TERM ^ ;

/* Stored procedures */

CREATE PROCEDURE "GETFIELDS"
(
RECORDNUMBER INTEGER
)
RETURNS
(
FIELDA VARCHAR(128) CHARACTER SET ASCII,
FIELDB INTEGER
)
AS

BEGIN
FOR SELECT FIELDA, FIELDB FROM TABLE1
WHERE
RECORDNO = :RECORDNUMBER
INTO
:FIELDA :FIELDB
DO
BEGIN
SUSPEND;
END
END
^

SET TERM ; ^
COMMIT WORK;
SET AUTODDL ON;



[Non-text portions of this message have been removed]