a saída.
quantidade 100
execute block
returns(cdpro varchar(50), nmpro varchar(150), codbr varchar(100), saldo numeric(14,2),
preve numeric(14,2), prepr numeric(14,2), preat numeric(14,2), preat_prazo numeric(14,2), cdfab varchar(50) ,cdgru varchar(50), prpro numeric(14,2), qtata numeric(14,2), qtboni numeric(14,2),data integer, data_normal date, tipo char(1), legenda varchar(100))
as begin for
select first 30 skip ? cast(p.cdpro as varchar(50))as cdpro, p.nmpro, p.codbr, p.saldo, p.preve, p.prepr,
p.preat, ex.preat_prazo, cast(p.cdgru as varchar(50))as cdgru, cast(p.cdfab as varchar(50))as cdfab, p.prpro, p.qtata, p.qtboni,
p.dtpro - cast(‘30.12.1899’ as date),p.dtpro from in01pro p
left join ex01pro ex on ex.cdpro = p.cdpro where p.repas = ‘N’ and saldo > 0 order by p.cdpro
into
cdpro, nmpro, codbr, saldo, preve, prepr , preat, preat_prazo, cdgru, cdfab, prpro, qtata, qtboni, data, data_normal
do begin
if (data < 0) then
begin
tipo = ‘D’;
data = data + 7;
end
else if ((data >= 1) and (data <= 31)) then
begin
tipo = ‘M’;
end
else
begin
tipo = ‘T’;
end
legenda = ‘-- Data - T, Dia - M, Semana - D’;
suspend;
end
end;
org.firebirdsql.jdbc.FBSQLException: GDS Exception. 335544569. Dynamic SQL Error
SQL error code = -901
undefined message number