CE PLUS - Nota 008434

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Nota Fiscal Complementar

Data/Hora da Publicação: 25/05/2009 00:00:00

Data/Hora Última Alteração: 09/03/2010 16:59:41

Descrição da Nota: ACRESCENTAR INCOTERM NO BATCH INPUT DA NF COMPLEMENTAR

Sintoma

 

Acrescentar Incoterm no Batch input da NF Complementar

 

Solução

 

Acrescentar preenchimento do campo no batch input.

Versões Tratadas

7.0

Informações Complementares

 

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

Nota Número 08434 Data: 25/05/2009 Hora: 11:12:48

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

 

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

Nota Número              : 08434

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00009

Agrupamento              : 00098

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

ACRESCENTAR INCOTERM NO BATCH INPUT DA NF COMPLEMENTAR

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

Palavras Chave:

INCOTERM - BI - BATCH INPUT - NF COMPLEMENTAR

 

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

Objetos da nota:

REPS /PWS/MZYCI029F01

 

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

Modificações efetuadas em REPS /PWS/MZYCI029F01

 

...

              PERFORM  itens_nfc.

            ELSE.

              READ TABLE itab_zycit033 WITH KEY

                     tpnf = itab_zycit265_c2-tpnf

                     regio = space.

              PERFORM  itens_nfc.

            ENDIF.

            CLEAR itab_zycit033.

          ENDLOOP.

        ENDLOOP.

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

        PERFORM pega_inco_pedido

                USING

                  itab_zycit265_c2-ebeln

                CHANGING

                  it_zycee005-inco1

                  it_zycee005-inco2.

* << Fim da inclusão

        APPEND it_zycee005.

        PERFORM mensagens_nfc.

...

 

...

            PERFORM  itens_nfc.

          ELSE.

            READ TABLE itab_zycit033 WITH KEY

                   tpnf = itab_zycit265_c2-tpnf

                   regio = space.

            PERFORM  itens_nfc.

          ENDIF.

          CLEAR itab_zycit033.

        ENDLOOP.

      ENDLOOP.

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

      PERFORM pega_inco_pedido

              USING

                itab_zycit265_c2-ebeln

              CHANGING

                it_zycee005-inco1

                it_zycee005-inco2.

* << Fim da inclusão

      APPEND it_zycee005.

      PERFORM mensagens_nfc.

...

 

...

 

* >> Início da inclusão:

FORM pega_inco_pedido USING     p_ebeln          LIKE ekko-ebeln

                      CHANGING  p_zycee005-inco1 LIKE ekko-inco1

                                p_zycee005-inco2 LIKE ekko-inco2.

  SELECT SINGLE inco1 inco2

  FROM ekko

  INTO (p_zycee005-inco1, p_zycee005-inco2)

  WHERE ebeln = p_ebeln.

ENDFORM.

* << Fim da inclusão