1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
|
CURSOR CUR IS
select * from A_STREAM_IN_PROGRESS where stream_type='fwebcdcl' and result=0 FOR UPDATE;for C IN CUR
LOOP
BEGIN
BEGIN
FOR F_LIGNE_E IN (SELECT *
FROM O_ORDERS, A_COUNTRIES_ISO_CODE_3 CUST,
A_COUNTRIES_ISO_CODE_3 DEL
WHERE O_ORDERS.ORDERS_ID=c.key1
AND CUSTOMERS_COUNTRY_ISO_CODE_3=CUST.COUNTRY_ISO_CODE_3
AND DELIVERY_COUNTRY_ISO_CODE_3=DEL.COUNTRY_ISO_CODE_3)
LOOP
DBMS_OUTPUT.PUT_LINE(C.key1);
END LOOP;
EXCEPTION
WHEN others THEN
NULL;
END;
EXCEPTION
WHEN others THEN
NULL;
END;
END LOOP; |