CE PLUS - Nota 002657

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Transmissão Siscomex

Data/Hora da Publicação: 08/12/2006 00:00:00

Data/Hora Última Alteração: 21/02/2011 12:46:24

Descrição da Nota: TRANSMISSÃO DA LI OU DI PARA SISCOMEX

Sintoma

Quando transmitida a LI para o Siscomex as informações complementares estão ficando

desconfiguradas.

 

 

Solução

Aumentar o tamnho do campo OBS.

 

Versões Tratadas

6.0

Informações Complementares

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

Nota Número 02657 Data: 08/12/2006 Hora: 16:53:18

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

 

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

Nota Número              : 02657

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 6.0

Pacote                   : 00026

Agrupamento              : 00142

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

TRANSMISSÃO DA LI OU DI PARA SISCOMEX

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

Palavras Chave:

INFORMAÇÕES COMPLEMENTARES; OBSERVAÇÕES; TLINE;

TDLINE; TRANSMISSÃO; LI; DI; SISCOMEX

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

Objetos da nota:

FUNC /PWS/ZYCI_TRANSFER_LI

 

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

Modificações efetuadas em FUNC /PWS/ZYCI_TRANSFER_LI

 

...

    CALL FUNCTION 'READ_TEXT'

      EXPORTING

              client                  = sy-mandt

              id                      = 'ZTLI'

              language                = sy-langu

              name                    = v_txtkey

              object                  = '/PWS/DTLI'

      TABLES

              lines                   = itab_tline

      EXCEPTIONS

              id                      = 1

              language                = 2

              name                    = 3

              not_found               = 4

              object                  = 5

              reference_check         = 6

              wrong_access_to_archive = 7

              OTHERS                  = 8.

    IF sy-subrc = 0.

      CLEAR: v_add, v_obs1.

      LOOP AT itab_tline.

* >> Início da exclusão:

        v_obs1+v_add = itab_tline-tdline(65).

        v_add = v_add + 66.

* << Fim da exclusão

* >> Início da inclusão:

        v_obs1+v_add = itab_tline-tdline(66).

        v_add = v_add + 67.

* << Fim da inclusão

        IF sy-tabix = 30.

          EXIT.

        ENDIF.

      ENDLOOP.

      li_txt-txt_longo = v_obs1(2000).

    ENDIF.

    APPEND li_txt.

    SELECT * FROM /pws/zycit079 INTO TABLE li_itens WHERE

           nrseqli = i_nrseqli AND

           tpli    = i_tpli.

...