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

FSN#16654

Browse Source 
svn path=/Database/trunk/; revision=10218
This commit is contained in:
Peter Feij
2010-01-29 09:22:58 +00:00
parent d96ea75046
commit eb963479e4
1 changed files with 18 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
RES/RES_TRI.SRC
View File

@@ -1,7 +1,7 @@
#ifdef RES
/*
* $Revision: 95 $
* $Modtime: 30-11-09 17:44 $
* $Revision: 96 $
* $Modtime: 29-01-10 10:16 $
*/
#include "comsql.h"
@@ -123,9 +123,6 @@ BEGIN
WHEN TOO_MANY_ROWS THEN raise_application_error(-20000,'res_m034');
END;
END IF;
#ifdef MS_SQL
lerror:
#endif
END;
/
@@ -160,6 +157,14 @@ FOR EACH ROW
BEGIN
IF :old.res_status_bo_key=6 THEN raise_application_error(-20000, 'Reserveringsgegevens zijn verwerkt; wijzigen is niet meer toegestaan.'); END IF;
UPDATE_PRIMARY_KEY(res_rsv_artikel_key, res_s_res_rsv_artikel_key);
IF :new.res_status_bo_key = 5 AND :old.res_status_bo_key <> 5
THEN
:new.res_rsv_artikel_afgemeld := SYSDATE;
END IF;
IF :new.res_status_bo_key = 6 AND :old.res_status_bo_key <> 6
THEN
:new.res_rsv_artikel_verwerkt := SYSDATE;
END IF;
END;
/
@@ -169,6 +174,14 @@ FOR EACH ROW
BEGIN
IF :old.res_status_bo_key=6 THEN raise_application_error(-20000, 'Reserveringsgegevens zijn verwerkt; wijzigen is niet meer toegestaan.'); END IF;
UPDATE_PRIMARY_KEY(res_rsv_deel_key, res_s_res_rsv_deel_key);
IF :new.res_status_bo_key = 5 AND :old.res_status_bo_key <> 5
THEN
:new.res_rsv_deel_afgemeld := SYSDATE;
END IF;
IF :new.res_status_bo_key = 6 AND :old.res_status_bo_key <> 6
THEN
:new.res_rsv_deel_verwerkt := SYSDATE;
END IF;
END;
/
CREATE_TRIGGER(res_t_res_cyclus_B_IU)