CREATE PROCEDURE SP_CLIENTES_INSERIR (NOME VARCHAR(50)) RETURNS (CODIGO VARCHAR(10)) AS DECLARE VARIABLE WGEN VARCHAR(10); BEGIN WGEN = GEN_ID(GEN_CODCLIENTES,1); INSERT INTO CLIENTES (CODCLIENTES,NOMECLIENTES) VALUES (:WGEN,:NOME); CODIGO = WGEN; SUSPEND; EXIT; /* ainda nao sei se esta linha eh necessaria ...;o) */ END