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

Conversiescript voor de GMS3 (Facilitor 3.3) database voor de omzetting van alle bedragen van guldens naar euros.

Browse Source 
Door ABO

svn path=/Customer/trunk/; revision=12555
This commit is contained in:
Peter Feij
2000-12-12 12:18:50 +00:00
parent 9788255933
commit b1050dcedb
2 changed files with 66 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

0
AKZA/Once/.gitignore vendored
View File

66
AKZA/Once/EURO.SQL Normal file
View File

@@ -0,0 +1,66 @@
/* Euro.sql
*
* Dit script converteert de Facilitor (GMS3) database van gulden naar EURO.
* De database wordt gemarkeerd middels een rij (EURO,Geconverteerd)in fac_entity_name.
* Bij aantreffen van de markering gaat de conversie niet door! (Deze heeft immers
* al plaats gevonden)
* De fac_message in de titelbalk wordt aangevuld met een melding dat er nu in Euro's wordt gewerkt
* Auteur: abo 14 11 2000 Dijkoraad IT bv 053 4800700
*
* Revisie
*
* 14 11 2000 abo aangemaakt.
* 11 12 2000 abo valutacode voor SAP-export gewijzigd in fac_entity.
*/
set serveroutput on
alter trigger MLD_T_MLD_OPDR_B_IU disable;
declare
cursor c_euro is
select fac_entity_system_name
from fac_entity_name
where fac_entity_system_name='EURO';
euro fac_entity_name.fac_entity_system_name%type;
begin
open c_euro;
fetch c_euro
into euro;
if c_euro%notfound then
update mld_opdr
set mld_opdr_uurloon = round((mld_opdr_uurloon/2.20371),2),
mld_opdr_kosten = round((mld_opdr_kosten/2.20371),2),
mld_opdr_materiaal = round((mld_opdr_materiaal/2.20371),2);
update prs_bedrijf
set prs_bedrijf_uurloon = round((prs_bedrijf_uurloon/2.20371),2);
update prs_srtperslid
set prs_srtperslid_uurloon = round((prs_srtperslid_uurloon/2.20371),2);
update prs_perslid
set prs_perslid_uurloon = round((prs_perslid_uurloon/2.20371),2);
update alg_kostenpost
set alg_kostenpost_budget = round((alg_kostenpost_budget/2.20371),2),
alg_kostenpost_besteed = round((alg_kostenpost_besteed/2.20371),2);
update ins_ol_optie
set ins_ol_optie_prijs = round((ins_ol_optie_prijs/2.20371),2);
update ins_ol_aansluiting
set ins_ol_aansluiting_prijs = round((ins_ol_aansluiting_prijs/2.20371),2);
update ins_ol_netwerk
set ins_ol_netwerk_prijs = round((ins_ol_netwerk_prijs/2.20371),2);
update fac_message
set fac_message_text = fac_message_text||' (Euro geconverteerd !!)'
where fac_message_code='FAC_M002';
update fac_entity_name
set fac_entity_user_name='EUR'
where fac_entity_system_name='FAC_VALUTA_CODE';
insert into fac_entity_name(fac_entity_system_name, fac_entity_user_name)
values
('EURO','Geconverteerd');
-- commit; Hoeft niet meer, want het laatste alter trigger statement impliceert al een commit;
dbms_output.put_line('Euro-conversie succesvol uitgevoerd op deze database');
else
dbms_output.put_line('Euro-conversie is reeds uitgevoerd op deze database');
end if;
close c_euro;
end;
/
alter trigger MLD_T_MLD_OPDR_B_IU enable
/
set serveroutput off