Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
languagesql
firstline1
titleScript criação chave primária
linenumberstrue
declare
  contador number;
begin
  select count(*)
  into contador
  from user_constraints
  where upper(table_name) = 'MGC_APURACAONFDETITEM'
  and upper(constraint_name) = 'MGC_APURACAONFDETITEMPK';  if contador > 0 then
    execute immediate 'alter table Mgc_ApuracaoNfDetItem drop constraint Mgc_ApuracaoNfDetItemPK';
  end if;  delete 
  from Gex_DadosTemporarios DadosTemporarios 
  where DadosTemporarios.String1 = 'DSUPCONTR-9025';
  
  insert into Gex_DadosTemporarios (String1, String2, String3)
  select 'DSUPCONTR-9025',
          Trigger_Name,
          Status
  from    User_Triggers
  where   Table_Name = 'MGC_APURACAONFDETITEM'
  and     Status = 'ENABLED';
        
  execute immediate 'alter table Mgc_ApuracaoNfDetItem disable all triggers';  update Mgc_ApuracaoNfDetItem
  set SeqRetornoApuracaoPedProd = 0
  where SeqRetornoApuracaoPedProd is null;
  commit;
  
  begin
    for vtTrigger in (select DadosTemporarios.String2 as Trigger_Name
                        from Gex_DadosTemporarios DadosTemporarios
                       where DadosTemporarios.String1 = 'DSUPCONTR-9025')
    loop/
      execute immediate 'alter trigger ' || vtTrigger.Trigger_Name ||
                        ' enable';
    end loop;
  end;  delete 
  from Gex_DadosTemporarios DadosTemporarios 
  where DadosTemporarios.String1 = 'DSUPCONTR-9025';
 
  execute immediate 'alter table Mgc_ApuracaoNfDetItem
                     add constraint Mgc_ApuracaoNfDetItemPK primary key (SeqRetornoApuracaoPedProd, 
                                                                         SeqRetornoApuracao, 
                                                                         SeqIdentificador, 
                                                                         NumeroNf, 
                                                                         SeqPessoa, 
                                                                         SerieNf, 
                                                                         TipNotaFiscal, 
                                                                         NroEmpresa, 
                                                                         SeqNF, 
                                                                         SeqProduto, 
                                                                         NfReferenciaNro, 
                                                                         NfReferenciaSerie, 
                                                                         SeqItemNf)
                     using index 
                     tablespace &TSIndice';
end;
/  

05. REQUISITOS DE VERSÃO

       Se estiver na versão 25.01, atualizar o sistema para o service pack 25.01.

...

029 ou superior.

       Se estiver na versão 25.07, atualizar o sistema para o service pack 25.07.

...

004 ou superior.

06. DOCUMENTOS RELACIONADOS

DOCUMENTO(S) DE REFERÊNCIA
  • Clique Aqui para saber mais sobre Consultar Apuração dos Contratos de Retorno - MGC00101.
  • Clique Aqui para saber mais sobre Manutenção dos Contratos - MGC00102.
  • Clique Aqui para saber mais sobre Apuração dos Contratos - MGC00109.