Gerar lançamento comissão no conta corrente da agência (issue 8900)
git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@69209 d1611594-4594-4d17-8e1d-87c2c4800839master
parent
a4a92f0066
commit
db7c8a0277
|
@ -0,0 +1,32 @@
|
|||
declare
|
||||
object_exists exception;
|
||||
pragma exception_init (object_exists , -00955);
|
||||
begin
|
||||
execute immediate
|
||||
'CREATE TABLE PTOVTA_EMPRESA_CONTABANCARIA (
|
||||
PTOVTAEMPRESACONTABANCARIA_ID NUMBER(7) NOT NULL,
|
||||
PTOVTAEMPRESA_ID NUMBER(7) NOT NULL,
|
||||
EMPRESACONTABANCARIA_ID NUMBER(7) NOT NULL,
|
||||
ACTIVO NUMBER(1),
|
||||
FECMODIF DATE,
|
||||
USUARIO_ID NUMBER(7),
|
||||
CONSTRAINT PTOVTAEMPCONBAN_PK PRIMARY KEY (PTOVTAEMPRESACONTABANCARIA_ID) ENABLE)';
|
||||
|
||||
execute immediate
|
||||
'CREATE SEQUENCE PTOVTAEMPCONBAN_SEQ INCREMENT BY 1 START WITH 1 NOCACHE ORDER NOCYCLE';
|
||||
|
||||
exception when object_exists then null;
|
||||
end;
|
||||
/
|
||||
|
||||
declare
|
||||
dup_val_on_index exception;
|
||||
pragma exception_init (dup_val_on_index , -00001);
|
||||
begin
|
||||
execute immediate
|
||||
'insert into PTOVTA_EMPRESA_CONTABANCARIA (PTOVTAEMPRESACONTABANCARIA_ID, PTOVTAEMPRESA_ID, EMPRESACONTABANCARIA_ID, ACTIVO, FECMODIF, USUARIO_ID)
|
||||
select PTOVTAEMPCONBAN_SEQ.nextval, PTOVTAEMPRESA_ID, EMPRESACONTABANCARIA_ID, ACTIVO, FECMODIF, USUARIO_ID from (
|
||||
select PTOVTAEMPRESA_ID, EMPRESACONTABANCARIA_ID, ACTIVO, FECMODIF, USUARIO_ID from PTOVTA_EMPRESA where EMPRESACONTABANCARIA_ID is not null)';
|
||||
|
||||
exception when dup_val_on_index then null;
|
||||
end;
|
Loading…
Reference in New Issue