RE: Retrieve SQL Trigger Source

["Leibowitz, Larry" <Larry.Leibowitz@xxxxxxxxxxxxxxx>]

Found it. Thanks! Not sure why it was done this way?, but now I know
what it's doing. YIN0010C is the CLP program which I suspected was
called. 


CREATE PROCEDURE CCSPROD.ATS_NEW_RECORD ( 

	IN HMYPERSON CHAR(9) ) 

	LANGUAGE CL 

	SPECIFIC CCSPROD.ATS_NEW_RECORD 

	NOT DETERMINISTIC 

	NO SQL 

	CALLED ON NULL INPUT 

	EXTERNAL NAME 'CCSPROD/YIN0010C' 

	PARAMETER STYLE GENERAL ;


-----Original Message-----
From: midrange-l-bounces+larry.leibowitz=ced-concord.com@xxxxxxxxxxxx
[mailto:midrange-l-bounces+larry.leibowitz=ced-concord.com@xxxxxxxxxxxx]
On Behalf Of Elvis Budimlic
Sent: Friday, September 28, 2007 3:44 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: Retrieve SQL Trigger Source

Are you sure it's a CL program and not a stored procedure?  
In that same iNav interface, click on Procedures and see if you have one
by
the name ATS_NEW_RECORD.  If you do you can Generate SQL for it and see
what
it calls.

Elvis

RPG & DB2 Summit | Minneapolis | October 1-4
Mike Cain - DB2 for i5/OS Temporary Indexes - The Good, The Bad, The
Ugly
October 16 
2007 System i Fall Technical Conference | Orlando | November 4-7
Celebrating 10-Years of SQL Performance Excellence on IBM System i,
eServer
iSeries and the server affectionately known as the AS/400 

-----Original Message-----
Subject: RE: Retrieve SQL Trigger Source

Great! Got it (see below)...

Now how can I find the program that gets called below: CALL CCSPROD .
ATS_NEW_RECORD

I am pretty sure I know which CLP Program it is, but how can I find out
if it's the ATS_NEW_RECORD? 

CREATE TRIGGER CCSPROD.ATS_NEW_APPL  

      AFTER INSERT ON CCSPROD.CCPYARDI  

      REFERENCING NEW AS NROW  

      FOR EACH ROW  

      MODE DB2SQL  

      BEGIN ATOMIC DECLARE CPERSON CHAR ( 9 ) ; SET "SQLP_L2" . CPERSON
= QSYS2 . CAST ( NROW . HMYPERSON AS CHAR ( 9 ) ) ; CALL CCSPROD .
ATS_NEW_RECORD ( "SQLP_L2" . CPERSON ) ; END  ;