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
| DECLARE
calcul_ETATPROJ varchar2(50);
v NUMBER;
BEGIN
BEGIN
SELECT 1 INTO v FROM GDA_DA t1 JOIN GDA_DA_OPER t2 ON t1.NUMDA=t2.NUMDA JOIN GDA_OPERATION t3 ON t2.NUMOPER=t3.NUMOPER JOIN GDA_CONVOPER t4 ON t3.NUMOPER=t4.NUMOPER JOIN GDA_CONVENTION t5 ON t4.NUMCONV=t5.NUMCONV
WHERE t1.NUMINTDEM = pNUMINT AND (t5.ETATCONV >= 'C130' AND t5.ETATCONV < 'C200') AND ROWNUM = 1;
calcul_ETATPROJ := 'Convention entre C130 et C200';
EXCEPTION WHEN NO_DATA_FOUND THEN
BEGIN
SELECT 1 INTO v FROM GDA_DA t1 JOIN GDA_DA_OPER t2 ON t1.NUMDA=t2.NUMDA JOIN GDA_OPERATION t3 ON t2.NUMOPER=t3.NUMOPER
WHERE t1.NUMINTDEM = pNUMINT AND (t3.ETATOPER >= 'O110' AND t3.ETATOPER < 'O190') AND ROWNUM = 1;
calcul_ETATPROJ := 'Operation entre O110 et O190';
EXCEPTION WHEN NO_DATA_FOUND THEN
BEGIN
SELECT 1 INTO v FROM GDA_DA t1 JOIN GDA_DA_OPER t2 ON t1.NUMDA=t2.NUMDA JOIN GDA_OPERATION t3 ON t2.NUMOPER=t3.NUMOPER
WHERE t1.NUMINTDEM = pNUMINT AND (t3.ETATOPER >= 'O106' AND t3.ETATOPER < 'O190') AND ROWNUM = 1;
calcul_ETATPROJ := 'Operation entre O106 et O190';
EXCEPTION WHEN NO_DATA_FOUND THEN
BEGIN
SELECT 1 INTO v FROM GDA_DA t1 JOIN GDA_DA_OPER t2 ON t1.NUMDA=t2.NUMDA JOIN GDA_OPERATION t3 ON t2.NUMOPER=t3.NUMOPER
WHERE t1.NUMINTDEM = pNUMINT AND (t3.ETATOPER = 'O100') AND ROWNUM = 1;
calcul_ETATPROJ := 'Operation egal a O100';
EXCEPTION WHEN NO_DATA_FOUND THEN NULL;
END;
END;
END;
END;
END; |