Update body.sql

data/ddl/package/FORMULE_UNICAEN/body.sql

@@ -478,8 +478,13 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_UNICAEN AS
 
 
     -- AD=SI(ESTERREUR(I20);1;I20)
+    -- AD=SI(ESTERREUR(I20);1;SI(H20="TP";1;I20))
     WHEN c = 'AD' AND v >= 1 THEN
-      RETURN vh.taux_service_du;
+      IF vh.type_intervention_code = 'TP' THEN
+        RETURN 1;
+      ELSE
+        RETURN vh.taux_service_du;
+      END IF;
 
 
 
@@ -1153,4 +1158,4 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_UNICAEN AS
       ordre';
   END;
 
-END FORMULE_UNICAEN;
\ No newline at end of file
+END FORMULE_UNICAEN;