FCLT#43129 Bolletjes proberen te resetten bij conversie
svn path=/Database/trunk/; revision=41730
This commit is contained in:
@@ -511,6 +511,48 @@ INSERT INTO fac_setting (fac_setting_module,
|
||||
'Dummy',
|
||||
CASE WHEN fac.getSetting('mld_flag_on_fenote') > 0 OR fac.getSetting('mld_flag_on_fenote') > 0 THEN 1 ELSE NULL END);
|
||||
|
||||
// Proberen flags te resetten
|
||||
DECLARE
|
||||
newflag NUMBER (1);
|
||||
BEGIN
|
||||
newflag := fac.getSetting ('mld_melding_flags');
|
||||
DBMS_OUTPUT.PUT_LINE('mld_melding_flags was: ' || newflag);
|
||||
DBMS_OUTPUT.PUT_LINE('mld_flag_on_fenote was: ' || fac.getSetting ('mld_flag_on_fenote'));
|
||||
DBMS_OUTPUT.PUT_LINE('mld_flag_on_bonote was: ' || fac.getSetting ('mld_flag_on_bonote'));
|
||||
|
||||
IF fac.getSetting ('mld_flag_on_fenote') = newflag - 1
|
||||
THEN
|
||||
newflag := newflag - 1;
|
||||
UPDATE fac_setting
|
||||
SET fac_setting_pvalue = NULL
|
||||
WHERE fac_setting_name = 'mld_flag_on_fenote';
|
||||
END IF;
|
||||
IF fac.getSetting ('mld_flag_on_bonote') = newflag - 1
|
||||
THEN
|
||||
newflag := newflag - 1;
|
||||
UPDATE fac_setting
|
||||
SET fac_setting_pvalue = NULL
|
||||
WHERE fac_setting_name = 'mld_flag_on_bonote';
|
||||
END IF;
|
||||
IF fac.getSetting ('mld_flag_on_fenote') = newflag - 1
|
||||
THEN
|
||||
newflag := newflag - 1;
|
||||
UPDATE fac_setting
|
||||
SET fac_setting_pvalue = NULL
|
||||
WHERE fac_setting_name = 'mld_flag_on_fenote';
|
||||
END IF;
|
||||
IF newflag <= 1 THEN
|
||||
newflag := 0;
|
||||
END IF;
|
||||
DBMS_OUTPUT.PUT_LINE('mld_melding_flags is now: ' || newflag);
|
||||
IF newflag <> fac.getSetting ('mld_melding_flags') THEN
|
||||
UPDATE fac_setting
|
||||
SET fac_setting_pvalue = NULL
|
||||
WHERE fac_setting_name = 'mld_melding_flags';
|
||||
END IF;
|
||||
END;
|
||||
/
|
||||
|
||||
DEF_FAC_SRTNOT('MLDA2B', 0, 'lcl_noti_MLDA2B', 'mld/mld_melding.asp?urole=bo&mld_key=', '0', 'melding', 10);
|
||||
DEF_FAC_SRTNOT('MLDA2M', 0, 'lcl_noti_MLDA2M', 'mld/mld_melding.asp?urole=fe&mld_key=', '0', 'melding', 10);
|
||||
|
||||
|
||||
Reference in New Issue
Block a user