Help with stored procedure

[bobido]

Hi there, iam trying to use Firebird with this procedure:

Parameters:

NAAM VARCHAR(120)
VWDID INTEGER
QUOTE DECIMAL (9,3)
QUOTEDATE TIMESTAMP
QUOTETYPE VARCHAR(20)

BEGIN
  /* Procedure text */
  DECLARE TYPE_ID int
  /* Checken of de quote al bekend is */
  IF(COUNT(QUOTE_VWDID) FROM TBL_QUOTE WHERE QUOTE_VWDID = VWDID) < 1
  BEGIN
       /* Hij is nog niet bekend */
       INSERT INTO TBL_QUOTE (QUOTE_VWDID, QUOTE_NAAM) VALUES (VWDID, NAAM);
  END
  /* Checken of de quotetype al bestaat */
  IF(COUNT(QUOTE_TYPE_NAAM) FROM TBL_QUOTE_TYPE WHERE QUOTE_TYPE_NAAM = NAAM) < 1
  BEGIN
       /* Quote type is nog niet bekend */
       INSERT INTO TBL_QUOTE_TYPE (QUOTE_TYPE_NAAM) VALUES (QUOTETYPE);
  END
  /* Zetten van de type_id */
  SET TYPE_ID = SELECT QUOTE_TYPE_ID FROM TBL_QUOTE_TYPE WHERE QUOTE_TYPE_NAAM = NAAM;
 
  INSERT INTO TBL_QUOTE_LOG (QUOTE_LOG_TIMESTAMP, QUOTE_LOG_QUOTE, QUOTE_VWDID, QUOTE_TYPE_ID)
  VALUES (QUOTEDATE, QUOTE, VWIDID, TYPE_ID);
END
 

I have no idea how to get this stored procedure to work with Firebird

Any help is much appriciated! =)

[bobido]

I have managed to work a bit on the procedure, i currently have this error:

Engine Error (code = 335544569):
Dynamic SQL Error.
SQL error code = -206.
Subselect illegal in this context.

SQL Error (code = -206):

Any Idea? thx =)

SET TERM ^ ;
 
ALTER PROCEDURE PRC_QUOTE_LOG_ADD (
 NAAM      VARCHAR(120),
 VWDID     INTEGER,
 QUOTE     DECIMAL(9,3),
 QUOTEDATE TIMESTAMP,
 QUOTETYPE VARCHAR(20))
AS 
DECLARE VARIABLE TYPE_ID INTEGER;
BEGIN
  /* Procedure text */
  /* Checken of de quote al bekend is */
  IF((SELECT COUNT(QUOTE_VWDID) FROM TBL_QUOTE WHERE QUOTE_VWDID = VWDID) < 1)
  THEN
  BEGIN
       /* Hij is nog niet bekend */
       INSERT INTO TBL_QUOTE (QUOTE_VWDID, QUOTE_NAAM) VALUES (VWDID, NAAM);
  END
  /* Checken of de quotetype al bestaat */
  IF((SELECT COUNT(QUOTE_TYPE_NAAM) FROM TBL_QUOTE_TYPE WHERE QUOTE_TYPE_NAAM = NAAM) < 1)
  THEN
  BEGIN
       /* Quote type is nog niet bekend */
       INSERT INTO TBL_QUOTE_TYPE (QUOTE_TYPE_NAAM) VALUES (QUOTETYPE);
  END
 
  /* Zetten van de type_id */
  TYPEID = (SELECT QUOTE_TYPE_ID FROM TBL_QUOTE_TYPE WHERE QUOTE_TYPE_NAAM = NAAM);
 
  INSERT INTO TBL_QUOTE_LOG (QUOTE_LOG_TIMESTAMP, QUOTE_LOG_QUOTE, QUOTE_VWDID, QUOTE_TYPE_ID)
  VALUES (QUOTEDATE, QUOTE, VWIDID, TYPE_ID);
END;^
 
SET TERM ; ^