admin/Database
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

UWVA#22876 Abonnementen

Browse Source 
svn path=/Database/trunk/; revision=11809
This commit is contained in:
Peter Feij
2012-07-11 11:44:10 +00:00
parent 9caa2ba8df
commit e7a292887e
3 changed files with 19 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

35
BES/BES_PAC.SRC
View File

@@ -948,8 +948,9 @@ AS
lcnt_disckey bes_disc_params.bes_disc_params_cnt_disckey%TYPE;
lprs_afdeling_key prs_afdeling.prs_afdeling_key%TYPE;
lprs_perslid_key prs_perslid.prs_perslid_key%TYPE;
lprs_perslid_key_voor prs_perslid.prs_perslid_key%TYPE;
lprs_contactpersoon_key prs_contactpersoon.prs_contactpersoon_key%TYPE;
lcnt_opzegtermijn cnt_contract.cnt_contract_opzegtermijn%TYPE;
lcnt_opzegtermijn bes_disc_params.bes_disc_params_cnt_opzegterm%TYPE;
lpunch_bedr_key bes_disc_params.bes_disc_params_punch_bedr_key%TYPE;
ltotaal NUMBER(11,2);
lprs_kostenplaats_key prs_kostenplaats.prs_kostenplaats_key%TYPE;
@@ -965,6 +966,7 @@ AS
SELECT b.bes_bestelling_key,
bdp.bes_disc_params_cnt_disckey,
bdp.bes_disc_params_cnt_termijn,
bdp.bes_disc_params_cnt_opzegterm,
bsd.bes_srtdeel_nr,
bsd.bes_srtdeel_omschrijving,
p.prs_afdeling_key,
@@ -973,6 +975,7 @@ AS
b.bes_bestelling_leverdatum,
b.prs_kostenplaats_key,
b.prs_perslid_key,
b.prs_perslid_key_voor,
bi.bes_bestelling_item_prijs
* bi.bes_bestelling_item_aantal
totaal,
@@ -1020,28 +1023,12 @@ AS
lcnt_disckey := artikel_rec.bes_disc_params_cnt_disckey;
lprs_afdeling_key := artikel_rec.prs_afdeling_key;
lprs_perslid_key := artikel_rec.prs_perslid_key;
lprs_perslid_key_voor := artikel_rec.prs_perslid_key_voor;
lprs_contactpersoon_key := artikel_rec.prs_contactpersoon;
looptijd_van := artikel_rec.bes_bestelling_leverdatum;
looptijd_tot := artikel_rec.bes_bestelling_leverdatum;
date_boolean := FALSE;
-- Elk jaar heeft elke maand evenveel dagen behalve februari
-- Een jaar optellen bij 29 februari geeft foutmelding omdat datum niet bestaat. Daarom onderstande oplossing.
IF looptijd_tot = last_day(looptijd_tot)
THEN
looptijd_tot := looptijd_tot - 1;
date_boolean := TRUE;
END IF;
looptijd_tot := add_months(looptijd_tot, 12);
IF date_boolean
THEN
IF looptijd_tot = last_day(looptijd_tot)
THEN
null;
ELSE
looptijd_tot := looptijd_tot + 1;
END IF;
END IF;
lcnt_opzegtermijn := artikel_rec.bes_disc_params_cnt_termijn;
-- De looptijd komt uit de bes_disc_params
looptijd_tot := cnt.cnt_getTermijndatum(artikel_rec.bes_bestelling_leverdatum, artikel_rec.bes_disc_params_cnt_termijn, 1);
lcnt_opzegtermijn := artikel_rec.bes_disc_params_cnt_opzegterm;
lpunch_bedr_key := artikel_rec.bes_disc_params_punch_bedr_key;
ltotaal := artikel_rec.totaal;
lprs_kostenplaats_key := artikel_rec.prs_kostenplaats_key;
@@ -1067,7 +1054,7 @@ AS
END IF;
END IF;
END LOOP;
-- Is er al een contract aanwezig?
BEGIN
SELECT c.cnt_contract_key
@@ -1088,7 +1075,7 @@ AS
cnt_contract_omschrijving = lbeschrijving,
cnt_contract_document = lomschrijving,
prs_afdeling_key_eig = lprs_afdeling_key,
prs_perslid_key_eig = lprs_perslid_key,
prs_perslid_key_eig = lprs_perslid_key_voor,
prs_perslid_key_beh = lprs_perslid_key,
cnt_contract_opmerking = lopmerking,
cnt_contract_looptijd_van = looptijd_van,
@@ -1132,7 +1119,7 @@ AS
lbeschrijving,
lomschrijving,
lprs_afdeling_key,
lprs_perslid_key,
lprs_perslid_key_voor,
lprs_perslid_key,
lopmerking,
looptijd_van,

5
BES/BES_TAB.SRC
View File

@@ -464,9 +464,12 @@ CREATE_TABLE(bes_disc_params, 0)
bes_disc_params_cnt_disckey
NUMBER(10)
CONSTRAINT bes_r_ins_discipline_key3 REFERENCES ins_tab_discipline,
bes_disc_params_cnt_termijn
bes_disc_params_cnt_termijn /* de looptijd */
NUMBER(10)
CONSTRAINT bes_r_cnt_termijn_key REFERENCES cnt_termijn(cnt_termijn_key),
bes_disc_params_cnt_opzegterm /* de opzegtermijn */
NUMBER(10)
CONSTRAINT bes_r_cnt_termijn_key2 REFERENCES cnt_termijn(cnt_termijn_key)
);
//// flexprops

4
_UP/DB15to16.src
View File

@@ -255,6 +255,10 @@ ALTER TABLE bes_disc_params ADD bes_disc_params_cnt_termijn
NUMBER(10)
CONSTRAINT bes_r_cnt_termijn_key REFERENCES cnt_termijn(cnt_termijn_key);
ALTER TABLE bes_disc_params ADD bes_disc_params_cnt_opzegterm
NUMBER(10)
CONSTRAINT bes_r_cnt_termijn_key2 REFERENCES cnt_termijn(cnt_termijn_key);
ALTER TABLE bes_disc_params ADD bes_disc_params_maxartikel /* het aantal artikelregels dat een bestelling mag bevatten */
NUMBER(3);