fixes bug#0014336
dev: thiago qua: Implementação efetuada. git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@95295 d1611594-4594-4d17-8e1d-87c2c4800839master
parent
725832fec4
commit
14c7470904
|
@ -0,0 +1,23 @@
|
||||||
|
declare
|
||||||
|
object_exists exception;
|
||||||
|
pragma exception_init (object_exists , -01430);
|
||||||
|
begin
|
||||||
|
execute immediate
|
||||||
|
'ALTER TABLE ESTACION ADD DT_MAX_PRINT_LOG_SERVIDOR DATE';
|
||||||
|
exception when object_exists then null;
|
||||||
|
end;
|
||||||
|
/
|
||||||
|
declare
|
||||||
|
begin
|
||||||
|
execute immediate
|
||||||
|
'CREATE OR REPLACE TRIGGER TRG_CHECK_ESTACION_PRINT_LOG
|
||||||
|
BEFORE INSERT OR UPDATE ON VTABOL.ESTACION
|
||||||
|
FOR EACH ROW
|
||||||
|
BEGIN
|
||||||
|
IF( :NEW.DT_MAX_PRINT_LOG_SERVIDOR > SYSDATE + 5 )
|
||||||
|
THEN
|
||||||
|
RAISE_APPLICATION_ERROR( -20001,
|
||||||
|
''DATA INVÁLIDA: CAMPO ESTACION.PRINT_LOG_SERVIDOR NÃO PODERÁ ULTRAPASSAR O LIMITE MÁXIMO DE 5 DIAS DA DATA ATUAL'');
|
||||||
|
END IF;
|
||||||
|
END;';
|
||||||
|
end;
|
Loading…
Reference in New Issue