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

FSN#18522 opdracht eindddatum

Browse Source 
svn path=/Database/trunk/; revision=10404
This commit is contained in:
Jos Groot Lipman
2010-09-09 09:43:18 +00:00
parent 590a2722f0
commit 90c781e8e5
4 changed files with 24 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
CARE/CARE_VIE.SRC
View File

@@ -1,7 +1,7 @@
#ifdef CARE
/* CARE_VIE.SRC
* $Revision: 2 $
* $Modtime: 6-09-10 18:28 $
* $Revision: 3 $
* $Modtime: 7-09-10 16:10 $
*/
@@ -167,8 +167,7 @@ AS
o.mld_opdr_key
FROM prs_perslid p, mld_opdr o
WHERE p.prs_perslid_key = o.mld_uitvoerende_keys AND o.mld_opdr_datumbegin <= TRUNC (SYSDATE)
AND TRUNC (fac.datumtijdplusuitvoertijd (o.mld_opdr_datumbegin, o.mld_opdr_dagen, 'DAGEN')) >=
TRUNC (SYSDATE);
AND o.mld_opdr_einddatum >= TRUNC (SYSDATE);
@@ -503,7 +502,7 @@ AS
SELECT o.mld_melding_key,
o.mld_opdr_key,
o.mld_opdr_datumbegin,
TRUNC (fac.datumtijdplusuitvoertijd (o.mld_opdr_datumbegin, o.mld_opdr_dagen, 'DAGEN')) einddatum,
TRUNC (o.mld_opdr_einddatum) einddatum,
o.mld_opdr_uren uren_opdracht,
verzorger.prs_perslid_key,
verzorger.prs_perslid_naam,
@@ -5218,6 +5217,6 @@ AS
WHERE z.prs_perslid_key = k.prs_perslid_key(+) AND status >= 3;
REGISTERRUN('$Workfile: CARE_VIE.SRC $','$Revision: 2 $')
REGISTERRUN('$Workfile: CARE_VIE.SRC $','$Revision: 3 $')
#endif // CARE

10
FAC/FAC_PAC.SRC
View File

@@ -1,5 +1,5 @@
/* $Revision: 191 $
* $Modtime: 7-09-10 10:01 $
/* $Revision: 192 $
* $Modtime: 7-09-10 17:28 $
*/
/*
@@ -2198,12 +2198,12 @@ CREATE OR REPLACE PACKAGE BODY fac AS
INSERT INTO mld_opdr
(mld_opdr_key, mld_opdr_module, mld_melding_key, mld_uitvoerende_keys, mld_typeopdr_key,
mld_statusopdr_key, mld_standaardopdr_key, mld_opdr_omschrijving, mld_opdr_datumbegin,
mld_opdr_dagen, mld_opdr_werkzaamheden, mld_opdr_uren, mld_opdr_materiaal, mld_opdr_kosten,
mld_opdr_einddatum, mld_opdr_werkzaamheden, mld_opdr_uren, mld_opdr_materiaal, mld_opdr_kosten,
mld_opdr_contactpersoon, mld_opdr_bedrijfopdr_volgnr, mld_opdr_uurloon, prs_perslid_key,
prs_contactpersoon_key, cnt_contract_key, cnt_contract_dienst_key, prs_kostenplaats_key,
mld_opdr_ordernr, mld_opdr_teverzenden)
SELECT lkey_new, mld_opdr_module, mld_melding_key, mld_uitvoerende_keys, mld_typeopdr_key, mld_statusopdr_key,
mld_standaardopdr_key, mld_opdr_omschrijving, SYSDATE, mld_opdr_dagen,
mld_standaardopdr_key, mld_opdr_omschrijving, SYSDATE, mld_opdr_einddatum,
'Automatisch gegenereerd door activiteit ' || pactkey || '. ' || mld_opdr_werkzaamheden,
mld_opdr_uren, mld_opdr_materiaal, mld_opdr_kosten, mld_opdr_contactpersoon, lvolgnr,
mld_opdr_uurloon, prs_perslid_key, prs_contactpersoon_key, cnt_contract_key,
@@ -3026,4 +3026,4 @@ CREATE OR REPLACE PACKAGE BODY fac AS
END fac;
/
REGISTERRUN('$Workfile: FAC_PAC.SRC $','$Revision: 191 $')
REGISTERRUN('$Workfile: FAC_PAC.SRC $','$Revision: 192 $')

17
FAC/FAC_PACX.SRC
View File

@@ -1,5 +1,5 @@
/* $Revision: 34 $
* $Modtime: 6-09-10 14:04 $
/* $Revision: 35 $
* $Modtime: 7-09-10 15:45 $
*/
/* FAC_PACX, (X means XML) to be included from fac_pac.src, isolated for convenience only
@@ -498,7 +498,7 @@ AS
AS
v_value VARCHAR2 (30);
BEGIN
createopentagattributes ('header', 'revision', SUBSTR('$Revision: 34 $',12,3), NULL, NULL, NULL, NULL, NULL, NULL);
createopentagattributes ('header', 'revision', SUBSTR('$Revision: 35 $',12,3), NULL, NULL, NULL, NULL, NULL, NULL);
createxmltagvalue ('dateTime', DATE_TO_CHAR (SYSDATE, 'dd-mm-yyyy hh24:mi:ss'));
createxmltagvalue ('dateDay', DATE_TO_CHAR (SYSDATE, 'dd'));
createxmltagvalue ('dateMonth', DATE_TO_CHAR (SYSDATE, 'mm'));
@@ -2848,7 +2848,8 @@ AS
v_mld_standaardopdr_key mld_opdr.mld_standaardopdr_key%TYPE;
v_omschrijving mld_opdr.mld_opdr_omschrijving%TYPE;
v_datumbegin mld_opdr.mld_opdr_datumbegin%TYPE;
v_dagen mld_opdr.mld_opdr_dagen%TYPE;
v_einddatum mld_opdr.mld_opdr_einddatum%TYPE;
v_dagen NUMBER;
v_werkzaamheden mld_opdr.mld_opdr_werkzaamheden%TYPE;
v_uren mld_opdr.mld_opdr_uren%TYPE;
v_materiaal mld_opdr.mld_opdr_materiaal%TYPE;
@@ -2874,14 +2875,15 @@ AS
SELECT mld_melding_key, mld_uitvoerende_keys, mld_typeopdr_key, o.mld_statusopdr_key,
s.mld_statusopdr_omschrijving, mld_standaardopdr_key, mld_opdr_omschrijving, mld_opdr_datumbegin,
mld_opdr_dagen, mld_opdr_werkzaamheden, mld_opdr_uren, mld_opdr_materiaal,
fac.count_Work_Days(mld_opdr_datumbegin, mld_opdr_einddatum) mld_opdr_dagen,
mld_opdr_einddatum, mld_opdr_werkzaamheden, mld_opdr_uren, mld_opdr_materiaal,
mld_opdr_kosten, mld_opdr_contactpersoon, mld_opdr_geprint, mld_opdr_bedrijfopdr_volgnr,
mld_opdr_uurloon, cnt_contract_key, cnt_contract_dienst_key, prs_perslid_key, prs_contactpersoon_key,
prs_kostenplaats_key, mld_opdr_ordernr,
mld_opdr_opmerking_fiat, fac_activiteit_key, mld_opdr_opmerking
INTO v_mld_melding_key, v_mld_uitvoerende_keys, v_typeopdr_key, v_statusopdr_key,
v_statusopdr, v_mld_standaardopdr_key, v_omschrijving, v_datumbegin,
v_dagen, v_werkzaamheden, v_uren, v_materiaal,
v_dagen, v_einddatum, v_werkzaamheden, v_uren, v_materiaal,
v_kosten, v_contactpersoon, v_geprint, v_bedrijfopdr_volgnr,
v_uurloon, v_cnt_contract_key, v_cnt_contract_dienst_key, v_prs_perslid_key, v_prs_contactpersoon_key,
v_prs_kostenplaats_key, v_ordernr,
@@ -2898,6 +2900,7 @@ AS
createxmltagvalue ('omschrijving', v_omschrijving);
mydatetochar ('datumbegin', v_datumbegin);
createxmltagvalue ('dagen', v_dagen);
mydatetochar ('einddatum', v_einddatum);
SELECT fac.datumtijdplusuitvoertijd(v_datumbegin, v_dagen, 'DAGEN')
INTO v_datumgereed
@@ -5404,4 +5407,4 @@ AS
END xml;
/
REGISTERRUN('$Workfile: FAC_PACX.SRC $','$Revision: 34 $')
REGISTERRUN('$Workfile: FAC_PACX.SRC $','$Revision: 35 $')

8
MLD/MLD_VIE.SRC
View File

@@ -1,7 +1,7 @@
#ifdef MLD // 13-03-96 AH
/*
* $Revision: 74 $
* $Modtime: 6-09-10 15:54 $
* $Revision: 75 $
* $Modtime: 7-09-10 15:38 $
*/
CREATE_VIEW(MLD_discipline, 0)
@@ -583,7 +583,7 @@ AS
(SELECT mld_statusopdr_omschrijving
FROM mld_statusopdr sta
WHERE sta.mld_statusopdr_key = o.mld_statusopdr_key) opdracht_status,
o.mld_opdr_dagen opdracht_duur_gepland, TO_CHAR (o.mld_opdr_datumbegin, 'YYYY-MM-DD') opdracht_datum,
fac.count_Work_Days(o.mld_opdr_datumbegin, o.mld_opdr_einddatum) opdracht_duur_gepland, TO_CHAR (o.mld_opdr_datumbegin, 'YYYY-MM-DD') opdracht_datum,
TO_CHAR (mld.getopdrachtstatusdate(o.mld_opdr_key,6), 'YYYY-MM-DD') opdracht_afgemeld,
fac.count_work_days (o.mld_opdr_datumbegin, mld.getopdrachtstatusdate(o.mld_opdr_key,6)) opdracht_doorlooptijd,
o.mld_opdr_omschrijving opdracht_omschrijving, o.mld_opdr_opmerking opdracht_opmerking,
@@ -618,6 +618,6 @@ AS
AND m.mld_melding_key = o.mld_melding_key(+)
AND m.mld_melding_datum >= TO_DATE ('01-01-2000', 'DD-MM-YYYY'));
REGISTERUN('$Workfile: MLD_VIE.SRC $','$Revision: 74 $')
REGISTERUN('$Workfile: MLD_VIE.SRC $','$Revision: 75 $')
#endif // MLD