Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --------------------------------------------------------
- -- Arquivo criado - Segunda-feira-Março-11-2019
- --------------------------------------------------------
- --------------------------------------------------------
- -- DDL for Table S_SOLICITACAO_FORNECEDOR
- --------------------------------------------------------
- CREATE TABLE "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"
- ( "NU_SEQ_SOLICITACAO_FORNECEDOR" NUMBER(10,0),
- "DT_PDF_GERADO" DATE,
- "NU_SEQ_ASSINATURA" NUMBER(10,0),
- "NU_SEQ_SOLICITACAO_ADESAO" NUMBER(10,0),
- "NU_SEQ_FORNECEDOR_CONTATO" NUMBER(10,0),
- "NU_OFICIO" VARCHAR2(20 BYTE),
- "NU_OFICIO_AUTORIZADO" VARCHAR2(20 BYTE),
- "NU_SEQ_FORNECEDOR" NUMBER(22,8),
- "LOB_OFICIO_ANUENCIA" BLOB,
- "LOB_OFICIO_AUTORIZADO" BLOB,
- "ST_ASSINATURA" CHAR(1 BYTE),
- "ST_RESSALVA" CHAR(1 BYTE),
- "NU_SEQ_SOL_ADESAO_SUBSTITUTA" NUMBER(10,0)
- ) SEGMENT CREATION IMMEDIATE
- PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255
- NOCOMPRESS LOGGING
- STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
- PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1
- BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
- TABLESPACE "SIGARPD"
- LOB ("LOB_OFICIO_ANUENCIA") STORE AS BASICFILE (
- TABLESPACE "SIGARPL" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
- NOCACHE LOGGING
- STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
- PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1
- BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("LOB_OFICIO_AUTORIZADO") STORE AS BASICFILE (
- TABLESPACE "SIGARPL" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
- NOCACHE LOGGING
- STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
- PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1
- BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)) ;
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."NU_SEQ_SOLICITACAO_FORNECEDOR" IS 'Chave primária da tabela. É alimentado automaticamente pela sequence sigarp_fnde.slfr_nu_seq_sol_fornecedor_sq quando o valor do campo vier nulo durante uma operação de insert.';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."DT_PDF_GERADO" IS 'Data no qual o PDF do oficio foi gerado para assinatura';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."NU_SEQ_ASSINATURA" IS 'Chave estrangeira da tabela sigarp_fnde.s_assinatura.';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."NU_SEQ_SOLICITACAO_ADESAO" IS 'Chave estrangeira da tabela sigarp_fnde.s_solicitação adesão.';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."NU_SEQ_FORNECEDOR_CONTATO" IS 'Nome por extenso do preposto.';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."NU_OFICIO" IS 'Recebe o numero do oficio para geração do pdf e ser conferido na tela seguinte.';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."NU_OFICIO_AUTORIZADO" IS 'Recebe o numero do oficio autorizado.';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."NU_SEQ_FORNECEDOR" IS 'Chave estrangeira da tabela sigarp_fnde.s_categoria_fornecedor.';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."LOB_OFICIO_ANUENCIA" IS 'Campo para armazenamento do ofício digitalizado.';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."LOB_OFICIO_AUTORIZADO" IS 'Campo para armazenamento do ofício gerado na autorização';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."ST_ASSINATURA" IS 'Controla se a imagem pode ser baixada (controlar o acesso à imagem da assinatura).';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."ST_RESSALVA" IS 'Coluna criada para gravar se houve ressalva.';
- COMMENT ON COLUMN "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR"."NU_SEQ_SOL_ADESAO_SUBSTITUTA" IS 'Número da adesão que substitui a adesão reformulada';
- COMMENT ON TABLE "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" IS 'Tabela que vincula um ou mais fornecedores uma solicitação de adesão.';
- --------------------------------------------------------
- -- DDL for Index SLFR_PK
- --------------------------------------------------------
- CREATE UNIQUE INDEX "SIGARP_FNDE"."SLFR_PK" ON "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" ("NU_SEQ_SOLICITACAO_FORNECEDOR")
- PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
- STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
- PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1
- BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
- TABLESPACE "SIGARPI" ;
- --------------------------------------------------------
- -- DDL for Index SLFR_SLAD_FK
- --------------------------------------------------------
- CREATE INDEX "SIGARP_FNDE"."SLFR_SLAD_FK" ON "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" ("NU_SEQ_SOLICITACAO_ADESAO")
- PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
- STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
- PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1
- BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
- TABLESPACE "SIGARPI" ;
- --------------------------------------------------------
- -- DDL for Index SLFR_FRCN_FK
- --------------------------------------------------------
- CREATE INDEX "SIGARP_FNDE"."SLFR_FRCN_FK" ON "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" ("NU_SEQ_FORNECEDOR_CONTATO")
- PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
- STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
- PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1
- BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
- TABLESPACE "SIGARPI" ;
- --------------------------------------------------------
- -- DDL for Index SLFR_FORN_FK
- --------------------------------------------------------
- CREATE INDEX "SIGARP_FNDE"."SLFR_FORN_FK" ON "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" ("NU_SEQ_FORNECEDOR")
- PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
- STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
- PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1
- BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
- TABLESPACE "SIGARPI" ;
- --------------------------------------------------------
- -- DDL for Index SLFR_ASTR_FK
- --------------------------------------------------------
- CREATE INDEX "SIGARP_FNDE"."SLFR_ASTR_FK" ON "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" ("NU_SEQ_ASSINATURA")
- PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
- STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
- PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1
- BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
- TABLESPACE "SIGARPI" ;
- --------------------------------------------------------
- -- DDL for Trigger SLFR_I_TG
- --------------------------------------------------------
- CREATE OR REPLACE EDITIONABLE TRIGGER "SIGARP_FNDE"."SLFR_I_TG"
- BEFORE INSERT
- ON sigarp_fnde.s_solicitacao_fornecedor
- REFERENCING NEW AS NEW OLD AS OLD
- FOR EACH ROW
- DECLARE
- x INTEGER := 0;
- BEGIN
- IF (:NEW.nu_seq_solicitacao_fornecedor IS NULL)
- THEN
- SELECT sigarp_fnde.slfr_nu_seq_sol_fornecedor_sq.NEXTVAL
- INTO x
- FROM DUAL;
- :NEW.nu_seq_solicitacao_fornecedor := x;
- END IF;
- END;
- /
- ALTER TRIGGER "SIGARP_FNDE"."SLFR_I_TG" ENABLE;
- --------------------------------------------------------
- -- DDL for Trigger SLFR_LOG_TG
- --------------------------------------------------------
- CREATE OR REPLACE EDITIONABLE TRIGGER "SIGARP_FNDE"."SLFR_LOG_TG"
- AFTER
- INSERT OR DELETE OR UPDATE
- ON SIGARP_FNDE.s_solicitacao_fornecedor
- REFERENCING NEW AS NEW OLD AS OLD
- FOR EACH ROW
- DECLARE
- v_tamanho_lob NUMBER (10);
- wk_operacao CHAR (3);
- wk_jn_session VARCHAR2 (38);
- wk_jn_appln VARCHAR2 (48);
- wk_audsid log_fnde.sessao.audsid%TYPE;
- wk log_fnde.s_solicitacao_fornecedor_jn%ROWTYPE;
- v_insere_tab CHAR (1) := 'N';
- BEGIN
- SELECT USERENV ('SESSIONID')
- INTO wk_audsid
- FROM DUAL;
- wk_jn_session := log_fnde.pega_jn_session (wk_audsid);
- wk_jn_appln := log_fnde.pega_jn_appln (wk_audsid);
- IF INSERTING
- THEN
- wk_operacao := 'INC';
- wk.nu_seq_solicitacao_fornecedor := :NEW.nu_seq_solicitacao_fornecedor;
- wk.dt_pdf_gerado := :NEW.dt_pdf_gerado;
- wk.nu_seq_solicitacao_adesao := :NEW.nu_seq_solicitacao_adesao;
- wk.st_assinatura := :NEW.st_assinatura;
- wk.st_ressalva := :NEW.st_ressalva;
- wk.lob_oficio_autorizado := :NEW.lob_oficio_autorizado;
- wk.nu_oficio := :NEW.nu_oficio;
- wk.nu_seq_fornecedor := :NEW.nu_seq_fornecedor;
- wk.nu_seq_assinatura := :NEW.nu_seq_assinatura;
- wk.nu_seq_fornecedor_contato := :NEW.nu_seq_fornecedor_contato;
- wk.lob_oficio_anuencia := :NEW.lob_oficio_anuencia;
- wk.nu_oficio_autorizado := :NEW.nu_oficio_autorizado;
- wk.nu_seq_sol_adesao_substituta := :NEW.nu_seq_sol_adesao_substituta;
- v_insere_tab := 'S';
- ELSIF DELETING
- THEN
- wk_operacao := 'EXC';
- wk.nu_seq_solicitacao_fornecedor := :OLD.nu_seq_solicitacao_fornecedor;
- wk.dt_pdf_gerado := :OLD.dt_pdf_gerado;
- wk.nu_seq_solicitacao_adesao := :OLD.nu_seq_solicitacao_adesao;
- wk.st_assinatura := :OLD.st_assinatura;
- wk.st_ressalva := :OLD.st_ressalva;
- wk.lob_oficio_autorizado := :OLD.lob_oficio_autorizado;
- wk.nu_oficio := :OLD.nu_oficio;
- wk.nu_seq_fornecedor := :OLD.nu_seq_fornecedor;
- wk.nu_seq_assinatura := :OLD.nu_seq_assinatura;
- wk.nu_seq_fornecedor_contato := :OLD.nu_seq_fornecedor_contato;
- wk.lob_oficio_anuencia := :OLD.lob_oficio_anuencia;
- wk.nu_oficio_autorizado := :OLD.nu_oficio_autorizado;
- wk.nu_seq_sol_adesao_substituta := :OLD.nu_seq_sol_adesao_substituta;
- v_insere_tab := 'S';
- ELSIF UPDATING
- THEN
- wk_operacao := 'ALT';
- wk.nu_seq_solicitacao_fornecedor := :OLD.nu_seq_solicitacao_fornecedor;
- IF NVL (:OLD.dt_pdf_gerado, TO_DATE ('01-01-1950', 'DD-MM-YYYY')) <>
- NVL (:NEW.dt_pdf_gerado, TO_DATE ('01-01-1950', 'DD-MM-YYYY'))
- THEN
- wk.dt_pdf_gerado := :OLD.dt_pdf_gerado;
- v_insere_tab := 'S';
- END IF;
- IF NVL (:OLD.nu_seq_solicitacao_adesao, 0) <>
- NVL (:NEW.nu_seq_solicitacao_adesao, 0)
- THEN
- wk.nu_seq_solicitacao_adesao := :OLD.nu_seq_solicitacao_adesao;
- v_insere_tab := 'S';
- END IF;
- IF NVL (:OLD.st_assinatura, ' ') <> NVL (:NEW.st_assinatura, ' ')
- THEN
- wk.st_assinatura := :OLD.st_assinatura;
- v_insere_tab := 'S';
- END IF;
- IF NVL (:OLD.st_ressalva, ' ') <> NVL (:NEW.st_ressalva, ' ')
- THEN
- wk.st_ressalva := :OLD.st_ressalva;
- v_insere_tab := 'S';
- END IF;
- IF ( :OLD.lob_oficio_autorizado IS NOT NULL
- OR :NEW.lob_oficio_autorizado IS NOT NULL
- )
- THEN
- IF DBMS_LOB.getlength (:OLD.lob_oficio_autorizado) >=
- DBMS_LOB.getlength (:NEW.lob_oficio_autorizado)
- THEN
- v_tamanho_lob := DBMS_LOB.getlength (:OLD.lob_oficio_autorizado);
- ELSE
- v_tamanho_lob := DBMS_LOB.getlength (:NEW.lob_oficio_autorizado);
- END IF;
- IF (NVL (DBMS_LOB.compare (:OLD.lob_oficio_autorizado,
- :NEW.lob_oficio_autorizado,
- v_tamanho_lob,
- 1,
- 1
- ),
- -1
- ) <> 0
- )
- THEN
- wk.lob_oficio_autorizado := :OLD.lob_oficio_autorizado;
- v_insere_tab := 'S';
- END IF;
- END IF;
- IF NVL (:OLD.nu_oficio, ' ') <> NVL (:NEW.nu_oficio, ' ')
- THEN
- wk.nu_oficio := :OLD.nu_oficio;
- v_insere_tab := 'S';
- END IF;
- IF NVL (:OLD.nu_seq_fornecedor, 0) <> NVL (:NEW.nu_seq_fornecedor, 0)
- THEN
- wk.nu_seq_fornecedor := :OLD.nu_seq_fornecedor;
- v_insere_tab := 'S';
- END IF;
- IF NVL (:OLD.nu_seq_assinatura, 0) <> NVL (:NEW.nu_seq_assinatura, 0)
- THEN
- wk.nu_seq_assinatura := :OLD.nu_seq_assinatura;
- v_insere_tab := 'S';
- END IF;
- IF NVL (:OLD.nu_seq_fornecedor_contato, 0) <>
- NVL (:NEW.nu_seq_fornecedor_contato, 0)
- THEN
- wk.nu_seq_fornecedor_contato := :OLD.nu_seq_fornecedor_contato;
- v_insere_tab := 'S';
- END IF;
- IF ( :OLD.lob_oficio_anuencia IS NOT NULL
- OR :NEW.lob_oficio_anuencia IS NOT NULL
- )
- THEN
- IF DBMS_LOB.getlength (:OLD.lob_oficio_anuencia) >=
- DBMS_LOB.getlength (:NEW.lob_oficio_anuencia)
- THEN
- v_tamanho_lob := DBMS_LOB.getlength (:OLD.lob_oficio_anuencia);
- ELSE
- v_tamanho_lob := DBMS_LOB.getlength (:NEW.lob_oficio_anuencia);
- END IF;
- IF (NVL (DBMS_LOB.compare (:OLD.lob_oficio_anuencia,
- :NEW.lob_oficio_anuencia,
- v_tamanho_lob,
- 1,
- 1
- ),
- -1
- ) <> 0
- )
- THEN
- wk.lob_oficio_anuencia := :OLD.lob_oficio_anuencia;
- v_insere_tab := 'S';
- END IF;
- END IF;
- IF NVL (:OLD.nu_oficio_autorizado, ' ') <>
- NVL (:NEW.nu_oficio_autorizado, ' ')
- THEN
- wk.nu_oficio_autorizado := :OLD.nu_oficio_autorizado;
- v_insere_tab := 'S';
- END IF;
- IF NVL (:OLD.nu_seq_sol_adesao_substituta, 0) <> NVL (:NEW.nu_seq_sol_adesao_substituta, 0)
- THEN
- wk.nu_seq_sol_adesao_substituta := :OLD.nu_seq_sol_adesao_substituta;
- v_insere_tab := 'S';
- END IF;
- END IF;
- IF v_insere_tab = 'S'
- THEN
- INSERT INTO log_fnde.s_solicitacao_fornecedor_jn
- (jn_operation, jn_oracle_user, jn_datetime, jn_notes,
- jn_appln, jn_session,
- nu_seq_solicitacao_fornecedor, dt_pdf_gerado,
- nu_seq_solicitacao_adesao, st_assinatura,
- st_ressalva, lob_oficio_autorizado, nu_oficio,
- nu_seq_fornecedor, nu_seq_assinatura,
- nu_seq_fornecedor_contato, lob_oficio_anuencia,
- nu_oficio_autorizado,
- nu_seq_sol_adesao_substituta
- )
- VALUES (wk_operacao, USER, SYSDATE, NULL,
- wk_jn_appln, wk_jn_session,
- wk.nu_seq_solicitacao_fornecedor, wk.dt_pdf_gerado,
- wk.nu_seq_solicitacao_adesao, wk.st_assinatura,
- wk.st_ressalva, wk.lob_oficio_autorizado, wk.nu_oficio,
- wk.nu_seq_fornecedor, wk.nu_seq_assinatura,
- wk.nu_seq_fornecedor_contato, wk.lob_oficio_anuencia,
- wk.nu_oficio_autorizado,
- wk.nu_seq_sol_adesao_substituta
- );
- END IF;
- END;
- /
- ALTER TRIGGER "SIGARP_FNDE"."SLFR_LOG_TG" ENABLE;
- --------------------------------------------------------
- -- Constraints for Table S_SOLICITACAO_FORNECEDOR
- --------------------------------------------------------
- ALTER TABLE "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" MODIFY ("NU_SEQ_SOLICITACAO_FORNECEDOR" NOT NULL ENABLE);
- ALTER TABLE "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" MODIFY ("NU_SEQ_SOLICITACAO_ADESAO" NOT NULL ENABLE);
- ALTER TABLE "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" MODIFY ("NU_SEQ_FORNECEDOR" NOT NULL ENABLE);
- ALTER TABLE "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" ADD CONSTRAINT "SLFR_ST_ASSINATURA_CK" CHECK (st_assinatura IN ('N', 'S')) ENABLE;
- ALTER TABLE "SIGARP_FNDE"."S_SOLICITACAO_FORNECEDOR" ADD CONSTRAINT "SLFR_PK" PRIMARY KEY ("NU_SEQ_SOLICITACAO_FORNECEDOR")
- USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
- STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
- PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1
- BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
- TABLESPACE "SIGARPI" ENABLE;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement