🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.interbase.sql
Article #600

Trigger and Stored Procedure Help

#600
From: Roy
Date: Sat, 11 Aug 2007 22:34
74 lines
2223 bytes
Hello,

I have this stored procedure. If I call it from IB Console like this SELECT 
* from NEW_PROCEDURE('8/1/2007') it works fine.

COMMIT WORK;
SET AUTODDL OFF;
SET TERM ^ ;

/* Stored procedures */

CREATE PROCEDURE "NEW_PROCEDURE"
(
  "IN_DATE" DATE
)
RETURNS
(
  "OUT_DATE" DATE,
  "OUT_MSC" VARCHAR(10),
  "OUT_TRAFFIC" FLOAT,
  "OUT_GROUP" INTEGER
)
AS
BEGIN EXIT; END ^


ALTER PROCEDURE "NEW_PROCEDURE"
(
  "IN_DATE" DATE
)
RETURNS
(
  "OUT_DATE" DATE,
  "OUT_MSC" VARCHAR(10),
  "OUT_TRAFFIC" FLOAT,
  "OUT_GROUP" INTEGER
)
AS
begin
For
 Select START_DATE,MSC_NAME, GROUP_, MAX(TRAFFIC) from SysGrpPerf where
 START_DATE = :IN_DATE GROUP BY START_DATE,MSC_NAME, GROUP_
 INTO : OUT_DATE,: OUT_MSC,:OUT_GROUP, :OUT_TRAFFIC
 DO
  INSERT INTO TMPTRANS
  (START_DATE,MSC,ROUTE_ID,TRAFFIC)
  values (:OUT_DATE, :OUT_MSC, :OUT_GROUP,:OUT_TRAFFIC);
 Suspend;
end
 ^

SET TERM ; ^
COMMIT WORK;
SET AUTODDL ON;

What I want to do is call it from a Trigger like this;


CREATE trigger call_tmp_procedure for sysgrpperf
active after insert position 0
AS
begin
if (NEW.STOP_TIME = '12:00 PM') then
SELECT * FROM NEW_PROCEDURE(CURRENT_DATE)
end

But the Trigger does not complile. I get an error when creating hte trigger.



Thanks for your help.


Roy
Technical Details
Message-ID: <46be396c@newsgroups.borland.com>
Path: arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!border1.nntp.dca.giganews.com!border2.nntp.dca.giganews.com!nntp.giganews.com!newspeer1.nwr.nac.net!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: 114a0e,c35c8d600af0988d,start
X-Google-Attributes: gid114a0e,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
From: "Roy" <butcherr@candw.lc>
Newsgroups: borland.public.interbase.sql
Subject: Trigger and Stored Procedure Help
Date: Sat, 11 Aug 2007 17:34:19 -0500
Lines: 78
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.3138
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.3138
X-RFC2646: Format=Flowed; Original
NNTP-Posting-Host: 200.2.131.50
Message-ID: <46be396c@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1186871660 200.2.131.50 (11 Aug 2007 15:34:20 -0700)
Path: arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!border1.nntp.dca.giganews.com!border2.nntp.dca.giganews.com!nntp.giganews.com!newspeer1.nwr.nac.net!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail
X-Original-Bytes: 2068