Skip to content
Snippets Groups Projects
Commit 3b65522e authored by Laurent Lecluse's avatar Laurent Lecluse
Browse files

Modif de la formule de Paris8

parent e64dfad5
No related branches found
No related tags found
No related merge requests found
Show whitespace changes
Inline Side-by-side
data/ddl/package/FORMULE_PARIS8/body.sql
+ 177
− 128
View file @ 3b65522e
...@@ -154,72 +154,180 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS ...@@ -154,72 +154,180 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS
-- T=SI($H20="Référentiel";0;($AO20+$BA20)*E20) -- AH15=SOMME(AG:AG)
WHEN c = 'AH15' AND v >= 1 THEN
RETURN calcFnc('total', 'AG');
-- AN15=SOMME(AM:AM)
WHEN c = 'AN15' AND v >= 1 THEN
RETURN calcFnc('total', 'AM');
-- AT15=SOMME(AS:AS)
WHEN c = 'AT15' AND v >= 1 THEN
RETURN calcFnc('total', 'AS');
-- AZ15=SOMME(AY:AY)
WHEN c = 'AZ15' AND v >= 1 THEN
RETURN calcFnc('total', 'AY');
-- BF15=SOMME(BE:BE)
WHEN c = 'BF15' AND v >= 1 THEN
RETURN calcFnc('total', 'BE');
-- BL15=SOMME(BK:BK)
WHEN c = 'BL15' AND v >= 1 THEN
RETURN calcFnc('total', 'BK');
-- AH16=MIN(AH15;i_service_du)
WHEN c = 'AH16' AND v >= 1 THEN
RETURN LEAST(cell('AH15'), i.service_du);
-- AN16=MIN(AN15;AH17)
WHEN c = 'AN16' AND v >= 1 THEN
RETURN LEAST(cell('AN15'), cell('AH17'));
-- AT16=MIN(AT15;AN17)
WHEN c = 'AT16' AND v >= 1 THEN
RETURN LEAST(cell('AT15'), cell('AN17'));
-- AZ16=MIN(AZ15;AT17)
WHEN c = 'AZ16' AND v >= 1 THEN
RETURN LEAST(cell('AZ15'), cell('AT17'));
-- BF16=MIN(BF15;AZ17)
WHEN c = 'BF16' AND v >= 1 THEN
RETURN LEAST(cell('BF15'), cell('AZ17'));
-- BL16=MIN(BL15;BF17)
WHEN c = 'BL16' AND v >= 1 THEN
RETURN LEAST(cell('BL15'), cell('BF17'));
-- AH17=i_service_du-AH16
WHEN c = 'AH17' AND v >= 1 THEN
RETURN i.service_du - cell('AH16');
-- AN17=AH17-AN16
WHEN c = 'AN17' AND v >= 1 THEN
RETURN cell('AH17') - cell('AN16');
-- AT17=AN17-AT16
WHEN c = 'AT17' AND v >= 1 THEN
RETURN cell('AN17') - cell('AT16');
-- AZ17=AT17-AZ16
WHEN c = 'AZ17' AND v >= 1 THEN
RETURN cell('AT17') - cell('AZ16');
-- BF17=AZ17-BF16
WHEN c = 'BF17' AND v >= 1 THEN
RETURN cell('AZ17') - cell('BF16');
-- BL17=BF17-BL16
WHEN c = 'BL17' AND v >= 1 THEN
RETURN cell('BF17') - cell('BL16');
-- T=SI($H20="Référentiel";0;($AI20+$AU20+$BG20)*E20)
WHEN c = 'T' AND v >= 1 THEN WHEN c = 'T' AND v >= 1 THEN
IF vh.volume_horaire_ref_id IS NOT NULL THEN IF vh.volume_horaire_ref_id IS NOT NULL THEN
RETURN 0; RETURN 0;
ELSE ELSE
RETURN (cell('AO',l) + cell('BA',l)) * vh.taux_fi; RETURN (cell('AI',l) + cell('AU',l) + cell('BG',l)) * vh.taux_fi;
END IF; END IF;
-- U=SI($H20="Référentiel";0;($AO20+$BA20)*F20) -- U=SI($H20="Référentiel";0;($AI20+$AU20+$BG20)*F20)
WHEN c = 'U' AND v >= 1 THEN WHEN c = 'U' AND v >= 1 THEN
IF vh.volume_horaire_ref_id IS NOT NULL THEN IF vh.volume_horaire_ref_id IS NOT NULL THEN
RETURN 0; RETURN 0;
ELSE ELSE
RETURN (cell('AO',l) + cell('BA',l)) * vh.taux_fa; RETURN (cell('AI',l) + cell('AU',l) + cell('BG',l)) * vh.taux_fa;
END IF; END IF;
-- V=SI($H20="Référentiel";0;($AO20+$BA20)*G20) -- V=SI($H20="Référentiel";0;($AI20+$AU20+$BG20)*G20)
WHEN c = 'V' AND v >= 1 THEN WHEN c = 'V' AND v >= 1 THEN
IF vh.volume_horaire_ref_id IS NOT NULL THEN IF vh.volume_horaire_ref_id IS NOT NULL THEN
RETURN 0; RETURN 0;
ELSE ELSE
RETURN (cell('AO',l) + cell('BA',l)) * vh.taux_fc; RETURN (cell('AI',l) + cell('AU',l) + cell('BG',l)) * vh.taux_fc;
END IF; END IF;
-- W=SI($H20="Référentiel";$AI20+$AU20+$BG20;0) -- W=SI($H20="Référentiel";$AO20+$BA20+$BM20;0)
WHEN c = 'W' AND v >= 1 THEN WHEN c = 'W' AND v >= 1 THEN
IF vh.volume_horaire_ref_id IS NOT NULL THEN IF vh.volume_horaire_ref_id IS NOT NULL THEN
RETURN cell('AI',l) + cell('AU',l) + cell('BG',l); RETURN cell('AO',l) + cell('BA',l) + cell('BM',l);
ELSE ELSE
RETURN 0; RETURN 0;
END IF; END IF;
-- X=SI($H20="Référentiel";0;($AQ20+$BC20)*E20) -- X=SI($H20="Référentiel";0;($AK20+$AW20+$BI20)*E20)
WHEN c = 'X' AND v >= 1 THEN WHEN c = 'X' AND v >= 1 THEN
IF vh.volume_horaire_ref_id IS NOT NULL THEN IF vh.volume_horaire_ref_id IS NOT NULL THEN
RETURN 0; RETURN 0;
ELSE ELSE
RETURN (cell('AQ',l) + cell('BC',l)) * vh.taux_fi; RETURN (cell('AK',l) + cell('AW',l) + cell('BI',l)) * vh.taux_fi;
END IF; END IF;
-- Y=SI($H20="Référentiel";0;($AQ20+$BC20)*F20) -- Y=SI($H20="Référentiel";0;($AK20+$AW20+$BI20)*F20)
WHEN c = 'Y' AND v >= 1 THEN WHEN c = 'Y' AND v >= 1 THEN
IF vh.volume_horaire_ref_id IS NOT NULL THEN IF vh.volume_horaire_ref_id IS NOT NULL THEN
RETURN 0; RETURN 0;
ELSE ELSE
RETURN (cell('AQ',l) + cell('BC',l)) * vh.taux_fa; RETURN (cell('AK',l) + cell('AW',l) + cell('BI',l)) * vh.taux_fa;
END IF; END IF;
-- Z=SI($H20="Référentiel";0;($AQ20+$BC20)*G20) -- Z=SI($H20="Référentiel";0;($AK20+$AW20+$BI20)*G20)
WHEN c = 'Z' AND v >= 1 THEN WHEN c = 'Z' AND v >= 1 THEN
IF vh.volume_horaire_ref_id IS NOT NULL THEN IF vh.volume_horaire_ref_id IS NOT NULL THEN
RETURN 0; RETURN 0;
ELSE ELSE
RETURN (cell('AQ',l) + cell('BC',l)) * vh.taux_fc; RETURN (cell('AK',l) + cell('AW',l) + cell('BI',l)) * vh.taux_fc;
END IF; END IF;
...@@ -230,10 +338,10 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS ...@@ -230,10 +338,10 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS
-- AB=SI($H20="Référentiel";$AK20+$AW20+$BI20;0) -- AB=SI($H20="Référentiel";$AQ20+$BC20+$BO20;0)
WHEN c = 'AB' AND v >= 1 THEN WHEN c = 'AB' AND v >= 1 THEN
IF vh.volume_horaire_ref_id IS NOT NULL THEN IF vh.volume_horaire_ref_id IS NOT NULL THEN
RETURN cell('AK',l) + cell('AW',l) + cell('BI',l); RETURN cell('AQ',l) + cell('BC',l) + cell('BO',l);
ELSE ELSE
RETURN 0; RETURN 0;
END IF; END IF;
...@@ -251,16 +359,17 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS ...@@ -251,16 +359,17 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS
RETURN vh.taux_service_compl; RETURN vh.taux_service_compl;
-- AG=SI($D20="Oui";SI(ET($H20="Référentiel";$A20=$K$10);$M20*$AD20;0);0)
-- AG=SI($H20="Référentiel";0;SI(STXT($N20;1;4)="PRIO";$M20*$AD20;0))
WHEN c = 'AG' AND v >= 1 THEN WHEN c = 'AG' AND v >= 1 THEN
IF vh.service_statutaire THEN IF vh.volume_horaire_ref_id IS NOT NULL THEN
IF vh.volume_horaire_ref_id IS NOT NULL AND vh.structure_is_univ THEN RETURN 0;
ELSE
IF UPPER(SUBSTR(vh.param_1, 1, 4)) = 'PRIO' THEN
RETURN vh.heures * cell('AD', l); RETURN vh.heures * cell('AD', l);
ELSE ELSE
RETURN 0; RETURN 0;
END IF; END IF;
ELSE
RETURN 0;
END IF; END IF;
...@@ -301,17 +410,13 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS ...@@ -301,17 +410,13 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS
-- AM=SI($D20="Oui";SI(ET($H20<>"Référentiel";$A20=i_structure_code);$M20*$AD20;0);0) -- AM=SI(ET($H20="Référentiel";$A20=$K$10);$M20*$AD20;0)
WHEN c = 'AM' AND v >= 1 THEN WHEN c = 'AM' AND v >= 1 THEN
IF vh.service_statutaire THEN IF vh.volume_horaire_ref_id IS NOT NULL AND vh.structure_is_univ THEN
IF vh.volume_horaire_ref_id IS NULL AND vh.structure_is_affectation THEN
RETURN vh.heures * cell('AD',l); RETURN vh.heures * cell('AD',l);
ELSE ELSE
RETURN 0; RETURN 0;
END IF; END IF;
ELSE
RETURN 0;
END IF;
...@@ -351,17 +456,13 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS ...@@ -351,17 +456,13 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS
-- AS=SI($D20="Oui";SI(ET($H20="Référentiel";$A20=i_structure_code);$M20*$AD20;0);0) -- AS=SI(ET($H20<>"Référentiel";$A20=i_structure_code;STXT($N20;1;4)<>"PRIO");$M20*$AD20;0)
WHEN c = 'AS' AND v >= 1 THEN WHEN c = 'AS' AND v >= 1 THEN
IF vh.service_statutaire THEN IF vh.volume_horaire_ref_id IS NULL AND vh.structure_is_affectation AND UPPER(SUBSTR(vh.param_1, 1, 4)) <> 'PRIO' THEN
IF vh.volume_horaire_ref_id IS NOT NULL AND vh.structure_is_affectation THEN
RETURN vh.heures * cell('AD',l); RETURN vh.heures * cell('AD',l);
ELSE ELSE
RETURN 0; RETURN 0;
END IF; END IF;
ELSE
RETURN 0;
END IF;
...@@ -400,18 +501,14 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS ...@@ -400,18 +501,14 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS
END IF; END IF;
-- =SI($D20="Oui";SI(ET($H20="Référentiel";$A20=i_structure_code);$M20*$AD20;0);0)
-- AY=SI($D20="Oui";SI(ET($H20<>"Référentiel";$A20<>i_structure_code);$M20*$AD20;0);0) -- AY=SI(ET($H20="Référentiel";$A20=i_structure_code);$M20*$AD20;0)
WHEN c = 'AY' AND v >= 1 THEN WHEN c = 'AY' AND v >= 1 THEN
IF vh.service_statutaire THEN IF vh.volume_horaire_ref_id IS NOT NULL AND vh.structure_is_affectation THEN
IF vh.volume_horaire_ref_id IS NULL AND NOT vh.structure_is_affectation THEN
RETURN vh.heures * cell('AD',l); RETURN vh.heures * cell('AD',l);
ELSE ELSE
RETURN 0; RETURN 0;
END IF; END IF;
ELSE
RETURN 0;
END IF;
...@@ -451,17 +548,13 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS ...@@ -451,17 +548,13 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS
-- BE=SI($D20="Oui";SI(ET($H20="Référentiel";$A20<>i_structure_code;$A20<>$K$10);$M20*$AD20;0);0) -- BE=SI(ET($H20<>"Référentiel";$A20<>i_structure_code;STXT($N20;1;4)<>"PRIO");$M20*$AD20;0)
WHEN c = 'BE' AND v >= 1 THEN WHEN c = 'BE' AND v >= 1 THEN
IF vh.service_statutaire THEN IF vh.volume_horaire_ref_id IS NULL AND NOT vh.structure_is_affectation AND UPPER(SUBSTR(vh.param_1, 1, 4)) <> 'PRIO' THEN
IF vh.volume_horaire_ref_id IS NOT NULL AND NOT vh.structure_is_affectation AND NOT vh.structure_is_univ THEN
RETURN vh.heures * cell('AD',l); RETURN vh.heures * cell('AD',l);
ELSE ELSE
RETURN 0; RETURN 0;
END IF; END IF;
ELSE
RETURN 0;
END IF;
...@@ -501,95 +594,49 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS ...@@ -501,95 +594,49 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS
-- AH15=SOMME(AG:AG) -- BK=SI(ET($H20="Référentiel";$A20<>i_structure_code;$A20<>$K$10);$M20*$AD20;0)
WHEN c = 'AH15' AND v >= 1 THEN WHEN c = 'BK' AND v >= 1 THEN
RETURN calcFnc('total', 'AG'); IF vh.volume_horaire_ref_id IS NOT NULL AND NOT vh.structure_is_affectation AND NOT vh.structure_is_univ THEN
RETURN vh.heures * cell('AD',l);
ELSE
RETURN 0;
-- AH16=MIN(AH15;i_service_du) END IF;
WHEN c = 'AH16' AND v >= 1 THEN
RETURN LEAST(cell('AH15'), i.service_du);
-- AH17=i_service_du-AH16
WHEN c = 'AH17' AND v >= 1 THEN
RETURN i.service_du - cell('AH16');
-- AN15=SOMME(AM:AM)
WHEN c = 'AN15' AND v >= 1 THEN
RETURN calcFnc('total', 'AM');
-- AN16=MIN(AN15;AH17)
WHEN c = 'AN16' AND v >= 1 THEN
RETURN LEAST(cell('AN15'), cell('AH17'));
-- AN17=AH17-AN16
WHEN c = 'AN17' AND v >= 1 THEN
RETURN cell('AH17') - cell('AN16');
-- AT15=SOMME(AS:AS)
WHEN c = 'AT15' AND v >= 1 THEN
RETURN calcFnc('total', 'AS');
-- AT16=MIN(AT15;AN17)
WHEN c = 'AT16' AND v >= 1 THEN
RETURN LEAST(cell('AT15'), cell('AN17'));
-- AT17=AN17-AT16
WHEN c = 'AT17' AND v >= 1 THEN
RETURN cell('AN17') - cell('AT16');
-- AZ15=SOMME(AY:AY)
WHEN c = 'AZ15' AND v >= 1 THEN
RETURN calcFnc('total', 'AY');
-- AZ16=MIN(AZ15;AT17)
WHEN c = 'AZ16' AND v >= 1 THEN
RETURN LEAST(cell('AZ15'), cell('AT17'));
-- AZ17=AT17-AZ16
WHEN c = 'AZ17' AND v >= 1 THEN
RETURN cell('AT17') - cell('AZ16');
-- BL=SI(BL$15>0;BK20/BL$15;0)
WHEN c = 'BL' AND v >= 1 THEN
IF cell('BL15') > 0 THEN
RETURN cell('BK',l) / cell('BL15');
ELSE
RETURN 0;
END IF;
-- BF15=SOMME(BE:BE)
WHEN c = 'BF15' AND v >= 1 THEN
RETURN calcFnc('total', 'BE');
-- BM=BL$16*BL20
WHEN c = 'BM' AND v >= 1 THEN
RETURN cell('BL16') * cell('BL',l);
-- BF16=MIN(BF15;AZ17)
WHEN c = 'BF16' AND v >= 1 THEN
RETURN LEAST(cell('BF15'), cell('AZ17'));
-- BN=SI(BL$17=0;(BK20-BM20)/$AD20;0)
WHEN c = 'BN' AND v >= 1 THEN
IF cell('BL17') = 0 THEN
RETURN (cell('BK',l) - cell('BM',l)) / cell('AD', l);
ELSE
RETURN 0;
END IF;
-- BF17=AZ17-BF16
WHEN c = 'BF17' AND v >= 1 THEN
RETURN cell('AZ17') - cell('BF16');
-- BO=SI(i_depassement_service_du_sans_hc="Non";BN20*$AE20;0)
WHEN c = 'BO' AND v >= 1 THEN
IF NOT i.depassement_service_du_sans_hc THEN
RETURN cell('BN',l) * cell('AE',l);
ELSE
RETURN 0;
END IF;
...@@ -642,13 +689,15 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS ...@@ -642,13 +689,15 @@ CREATE OR REPLACE PACKAGE BODY FORMULE_PARIS8 AS
RETURN ' RETURN '
SELECT SELECT
fvh.*, fvh.*,
NULL param_1, ep.code param_1,
NULL param_2, NULL param_2,
NULL param_3, NULL param_3,
NULL param_4, NULL param_4,
NULL param_5 NULL param_5
FROM FROM
V_FORMULE_VOLUME_HORAIRE fvh V_FORMULE_VOLUME_HORAIRE fvh
LEFT JOIN service s ON s.id = fvh.service_id
LEFT JOIN element_pedagogique ep ON ep.id = s.element_pedagogique_id
ORDER BY ORDER BY
ordre'; ordre';
END; END;
......
data/nomenclatures.php
+ 3
− 2
View file @ 3b65522e
...@@ -191,6 +191,7 @@ return [ ...@@ -191,6 +191,7 @@ return [
13 => [ 13 => [
'LIBELLE' => 'Université Paris 8', 'LIBELLE' => 'Université Paris 8',
'PACKAGE_NAME' => 'FORMULE_PARIS8', 'PACKAGE_NAME' => 'FORMULE_PARIS8',
'VH_PARAM_1_LIBELLE' => 'Code EP',
], ],
14 => [ 14 => [
'LIBELLE' => 'Université d\'Artois', 'LIBELLE' => 'Université d\'Artois',
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment