|
Dave - thanks for the help. I will go ahead an post an example of the revised code so it will be in the archives in case some one else needs it. CREATE PROCEDURE jehimes/Testproc () LANGUAGE SQL READS SQL DATA BEGIN DECLARE ID INT; DECLARE ENDTABLE INT DEFAULT 0; DECLARE BAD INT DEFAULT 0; DECLARE C1 CURSOR FOR select c1nmid from lbucmfil/nammsp where c1nmid<999 ; DECLARE C2 CURSOR FOR select c3nmid from lbucmfil/biomsp where c3nmid<999; DECLARE CONTINUE HANDLER FOR NOT FOUND SET ENDTABLE = 1; DECLARE EXIT HANDLER FOR SQLEXCEPTION SET BAD=1; OPEN C1; FETCH C1 INTO ID ; WHILE ENDTABLE = 0 DO FETCH C1 INTO ID ; END WHILE; CLOSE C1; SET ENDTABLE =0; SET BAD =0; OPEN C2; FETCH C2 INTO ID ; WHILE ENDTABLE = 0 DO FETCH C2 INTO ID ; END WHILE; CLOSE C2; END ;
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.