I had Invalid Request BLR message when I execute this code in a TZSQLProcessor component.
ZSQLProcessor.Delimiter = ;
ZSQLProcessor.DelimiterType = dtSetTerm
Any idea ???
Code: Select all
SET TERM ^ ;
ALTER PROCEDURE GET_CA_CLIENT (
ID_CLIENT INTEGER,
DATE_CA DATE)
RETURNS (
TOT_VENTE DECIMAL(15,2),
TOT_CAISSE DECIMAL(15,2))
AS
begin
SELECT SUM(MTHT+MTTVA+MTTMB-MTREMISE)
FROM FENT
WHERE ID_CLIENT=:ID_CLIENT AND
DFACT <=:DATE_CA
into TOT_VENTE;
SELECT SUM(MT_CHQ + MT_ESP)
FROM FENT_CS
WHERE ID_CLIENT=:ID_CLIENT AND
DFACT <=:DATE_CA
into TOT_CAISSE;
suspend;
end^
SET TERM ; ^