SET TERM ^ ;
CREATE OR ALTER PROCEDURE PS_INSERT_NTACREDEB (
numnota type of column tbl_notacredeb.numnota,
facha type of column tbl_notacredeb.facha,
detnota type of column tbl_notacredeb.detnota,
monto type of column tbl_notacredeb.monto,
tipo type of column tbl_notacredeb.tipo,
numfact type of column tbl_notacredeb.numfact,
usercode type of column tbl_notacredeb.usercode)
as
declare variable intmonth integer;
declare variable txtmonth dom_mescont;
begin
intmonth = extract(month from facha);
execute procedure ps_setmonth(intmonth) RETURNING_VALUES (txtmonth);
txtmonth = txtmonth || extract(year from facha);
insert into tbl_notacredeb (numnota, facha, detnota, monto, tipo, mescontable, numfact, usercode)
values (:numnota, :facha, :detnota, :monto, :tipo, :txtmonth, :numfact, :usercode);
/* Procedure Text */
suspend;
end^
SET TERM ; ^
Ahora bien al correrlo me dice que no se puede ejecutar por que la variable intmonth es*** null***
Por eso la pregunta es ¿existe alguna forma de ver o mediante un mensaje que me muestre el valor de las variables?
Algo así como cuando uno esta probando un código en visual estudio que paso a paso te va presentando los resultados del código escrito.
Muchas Gracias y saludos