Merge pull request 'fixes bug#AL-4214' (!167) from AL-4214 into master

Reviewed-on: utilidades/Flyway#167
Reviewed-by: wallace <wallace@rjconsultores.com.br>
master
Célio de Souza Ribeiro JR 2024-08-09 18:33:35 +00:00
commit 3217279238
2 changed files with 37 additions and 31 deletions

View File

@ -4,7 +4,7 @@
<modelVersion>4.0.0</modelVersion> <modelVersion>4.0.0</modelVersion>
<groupId>br.com.rjconsultores</groupId> <groupId>br.com.rjconsultores</groupId>
<artifactId>Flyway</artifactId> <artifactId>Flyway</artifactId>
<version>1.79.1</version> <version>1.79.2</version>
<distributionManagement> <distributionManagement>
<repository> <repository>

View File

@ -4,36 +4,42 @@ DECLARE
PRAGMA EXCEPTION_INIT(dup_val_on_index, -00001); PRAGMA EXCEPTION_INIT(dup_val_on_index, -00001);
PRAGMA EXCEPTION_INIT(except_02291, -02291); PRAGMA EXCEPTION_INIT(except_02291, -02291);
col_exists NUMBER := 0;
BEGIN BEGIN
BEGIN SELECT COUNT(*) INTO col_exists FROM all_tab_columns
EXECUTE IMMEDIATE 'ALTER TABLE tipo_evento_extra ADD (indquantviasimprimir NUMBER(1) DEFAULT 1)'; WHERE table_name = 'TIPO_EVENTO_EXTRA'
EXCEPTION AND column_name = 'INDQUANTVIASIMPRIMIR';
WHEN dup_val_on_index THEN
DBMS_OUTPUT.PUT_LINE('A coluna QUANTIDADEVIASIMPRIMIR já existe.'); IF col_exists = 0 THEN
WHEN OTHERS THEN BEGIN
RAISE; EXECUTE IMMEDIATE 'ALTER TABLE tipo_evento_extra ADD (indquantviasimprimir NUMBER(1) DEFAULT 1)';
END; EXCEPTION
WHEN dup_val_on_index THEN
DBMS_OUTPUT.PUT_LINE('A coluna QUANTIDADEVIASIMPRIMIR já existe.');
WHEN OTHERS THEN
RAISE;
END;
BEGIN BEGIN
EXECUTE IMMEDIATE 'UPDATE tipo_evento_extra SET indquantviasimprimir = 1'; EXECUTE IMMEDIATE 'UPDATE tipo_evento_extra SET indquantviasimprimir = 1';
EXCEPTION EXCEPTION
WHEN except_02291 THEN WHEN except_02291 THEN
DBMS_OUTPUT.PUT_LINE('Erro ao atualizar valores padrão.'); DBMS_OUTPUT.PUT_LINE('Erro ao atualizar valores padrão.');
WHEN OTHERS THEN WHEN OTHERS THEN
RAISE; RAISE;
END; END;
-- Ajusta o valor da coluna para 2 nos casos específicos de "Vale Cobrador" e "Sangria" RETRO para os CARDS: AL-3449 e AL-2817 -- Ajusta o valor da coluna para 2 nos casos específicos de "Vale Cobrador" e "Sangria" RETRO para os CARDS: AL-3449 e AL-2817
BEGIN BEGIN
EXECUTE IMMEDIATE 'UPDATE tipo_evento_extra SET indquantviasimprimir = 2 WHERE desctipoevento IN (''VALE COBRADOR'', ''SANGRIA'')'; EXECUTE IMMEDIATE 'UPDATE tipo_evento_extra SET indquantviasimprimir = 2 WHERE desctipoevento IN (''VALE COBRADOR'', ''SANGRIA'')';
EXCEPTION EXCEPTION
WHEN except_02291 THEN WHEN except_02291 THEN
DBMS_OUTPUT.PUT_LINE('Erro ao ajustar valores para "Vale Cobrador" e "Sangria".'); DBMS_OUTPUT.PUT_LINE('Erro ao ajustar valores para "Vale Cobrador" e "Sangria".');
WHEN OTHERS THEN WHEN OTHERS THEN
RAISE; RAISE;
END; END;
END IF;
END; END;
/ /