CE PLUS - Nota 008309

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: DI

Data/Hora da Publicação: 16/04/2009 00:00:00

Data/Hora Última Alteração: 09/03/2010 16:46:04

Descrição da Nota: DI TIPO DE CONHECIMENTO TIPO DE DECLARAÇÃO

Sintoma

 

Ao entrar na DI, o sistema está exibindo uma mesagem de que a empresa não está cadastrada.

 

Solução

 

Atualização da seleção do tipo de conhecimento na DI.

Versões Tratadas

7.0

Informações Complementares

 

----------------------------------------------------------------------------------------------------

Nota Número 08309 Data: 16/04/2009 Hora: 10:28:16

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 08309

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00009

Agrupamento              : 00094

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

----------------------------------------------------------------------------------------------------

Texto Rápido:

DI TIPO DE CONHECIMENTO TIPO DE DECLARAÇÃO

----------------------------------------------------------------------------------------------------

Palavras Chave:

DI TIPO DE CONHECIMENTO TIPO DE DECLARAÇÃO

 

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCI023F02

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI023F02

 

...

  SELECT SINGLE nrseq FROM /pws/zycit094 INTO wa_zycit094-nrseq

     WHERE nrseqce = /pws/zycie093-nrseqce.

  IF NOT /pws/zycie001-nrseq IS INITIAL.

    SELECT SINGLE * FROM /pws/zycit001 INTO wa_zycit001

       WHERE nrseq = /pws/zycie001-nrseq.

  ELSE.

    SELECT SINGLE * FROM /pws/zycit001 INTO wa_zycit001

       WHERE nrseq = wa_zycit094-nrseq.

  ENDIF.

* >> Início da exclusão: FORM LOAD_CON

  SELECT SINGLE descr FROM /pws/zycit117 INTO s_cont WHERE

         meiotransp = wa_zycit001-meioemba AND

         tpconh     = wa_zycit001-tpdecl.               "#EC CI_NOFIRST

* << Fim da exclusão

* >> Início da inclusão: FORM LOAD_CON

  SELECT SINGLE descr FROM /pws/zycit117 INTO s_cont WHERE

         tpdecl     = wa_zycit001-tpdecl   AND

         meiotransp = wa_zycit001-meioemba AND

         tpconh     = /pws/zycie093-tpconh.

* << Fim da inclusão

  CLEAR: wa_zycit001, wa_zycit094.

ENDFORM.

FORM load_uti.

...