ALTER PROCEDURE RELLENA_FAM_CUENTA (
EMPRESA Varchar(3) )
AS
DECLARE VARIABLE ncontador smallint;
declare variable ccadena varchar(6);
BEGIN
ncontador = 1;
if (ncontador < 10) then
ccadena = '0' || cast( ncontador as varchar(6) );
else ccadena = cast( ncontador as varchar(6) );
END^
SET TERM ; ^