Esta sintaxis es de Informix 4GL, no de SPL (Stored Procedure Language). No puedes declarar tipos de datos complejos como RECORD, pero si puedes hacer algo como esto:
Código:
create procedure sp_fsn(cod_ser char(4), numero integer, orden smallint)
returning char(14);
define ofmt char(3);
define ret char(14);
if orden <> " " then
let ofmt = 100 + orden;
let ofmt = "/"||ofmt[2,3];
else
let ofmt = " ";
end if
let ret = 1000000 + numero;
let ret = cod_ser||"-"||ret[2,7]||ofmt;
return ret;
end procedure;