1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
** SCRIPT START : Session: 21/02/2008 17:13:01 ***
Processing ...
CREATE OR REPLACE PROCEDURE apply_prod IS
CURSOR C_PROD IS
SELECT ACC, PROD
FROM accruals_sortie
ORDER BY ACC
FOR UPDATE OF PROD;
BEGIN
OPEN C_PROD;
LOOP
IF CATEGORY = '2070' AND SECTOR = '1000' AND INDUSTRY = '1120'
THEN
UPDATE accruals_sortie
SET PROD = 'ECO JUNIOR';
-- WHERE CURRENT OF C_PROD;
ELSE
UPDATE accruals_sortie
SET PROD = 'SVIN';
-- WHERE CURRENT OF C_PROD;
END IF;
EXECUTE IMMEDIATE;
END LOOP;
CLOSE C_PROD;
COMMIT;
END;
PROCEDURE APPLY_PROD compiled with warnings, status INVALID
*** SCRIPT END : Session: 21/02/2008 17:13:01 *** |
