CE PLUS - Nota 009456

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: DI

Data/Hora da Publicação: 26/11/2009 00:00:00

Data/Hora Última Alteração: 22/02/2011 14:13:27

Descrição da Nota: DATAS APARECEM SEM CONFIGURAÇÃO CORRETA NA PASTA COMPLEMENTARES

Sintoma

Datas aparecem sem configuração correta na pasta complementares

 

 

Solução

Fazer tratamento em formato de data.

 

Versões Tratadas

7.0


Pré-Requisitos

Produto:

Nota

Descrição

FORMATO DA DATA DE EMBARQUE NOS TEXTOS COMPLEMENTARES ESTÁ INCORRETO.

Informações Complementares

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

Nota Número 09456 Data: 26/11/2009 Hora: 10:39:24

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

 

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

Nota Número              : 09456

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 8.0

Pacote                   : 00001

Agrupamento              : 00001

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

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

09292  - 00001 - 8.0    - 00001  - FORMATO DA DATA DE EMBARQUE NOS TEXTOS COMPLEMENTARES ESTÁ INCORR

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

DATAS APARECEM SEM CONFIGURAÇÃO CORRETA NA PASTA COMPLEMENTARES

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

Palavras Chave:

DATA - PASTA COMPLEMENTARES - DI

 

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

Objetos da nota:

REPS /PWS/MZYCI023F03

 

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

Modificações efetuadas em REPS /PWS/MZYCI023F03

 

...

          IF NOT /pws/zycie093-embarca IS INITIAL.

            it_words-word = /pws/zycie093-embarca.

          ENDIF.

        WHEN 'DTCHEG'.

          CLEAR it_words-word.

          IF NOT /pws/zycie093-dtcheg IS INITIAL.

            SELECT SINGLE * FROM usr01 INTO wa_usr01

                     WHERE bname EQ sy-uname.

            CASE wa_usr01-datfm.

              WHEN 1.

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

                CONCATENATE /pws/zycie093-dtcheg+06(2)

                /pws/zycie093-dtcheg+04(2)

* << Fim da exclusão

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

                CONCATENATE /pws/zycie093-dtcheg+06(2) '/'

                /pws/zycie093-dtcheg+04(2) '/'

* << Fim da inclusão

                /pws/zycie093-dtcheg+0(4) INTO it_words-word.

              WHEN 2 OR 3.

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

                CONCATENATE /pws/zycie093-dtcheg+4(2)

                /pws/zycie093-dtcheg+6(2)

* << Fim da exclusão

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

                CONCATENATE /pws/zycie093-dtcheg+4(2) '/'

                /pws/zycie093-dtcheg+6(2) '/'

* << Fim da inclusão

                /pws/zycie093-dtcheg+0(4) INTO it_words-word.

              WHEN 4 OR 5 OR 6.

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

                CONCATENATE /pws/zycie093-dtcheg+0(4)

                /pws/zycie093-dtcheg+4(2)

* << Fim da exclusão

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

                CONCATENATE /pws/zycie093-dtcheg+0(4) '/'

                /pws/zycie093-dtcheg+4(2) '/'

* << Fim da inclusão

                /pws/zycie093-dtcheg+6(2) INTO it_words-word.

            ENDCASE.

          ENDIF.

        WHEN 'IDENT'.

          CLEAR it_words-word.

          IF NOT /pws/zycie093-identconh IS INITIAL.

            it_words-word = /pws/zycie093-identconh.

          ENDIF.

        WHEN 'MASTER'.

          CLEAR it_words-word.

...

 

...

          CLEAR it_words-word.

          CLEAR it_words-word.

          IF NOT /pws/zycie093-localemb IS INITIAL.

            it_words-word = /pws/zycie093-localemb.

          ENDIF.

        WHEN 'DTEMB'.

          CLEAR it_words-word.

          IF NOT /pws/zycie093-dtemb IS INITIAL.

            CASE wa_usr01-datfm.

              WHEN 1.

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

                CONCATENATE /pws/zycie093-dtemb+06(2)

                /pws/zycie093-dtemb+04(2)

* << Fim da exclusão

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

                CONCATENATE /pws/zycie093-dtemb+06(2) '/'

                /pws/zycie093-dtemb+04(2) '/'

* << Fim da inclusão

                /pws/zycie093-dtemb+0(4) INTO it_words-word.

              WHEN 2 OR 3.

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

                CONCATENATE /pws/zycie093-dtemb+4(2)

                /pws/zycie093-dtemb+6(2)

* << Fim da exclusão

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

                CONCATENATE /pws/zycie093-dtemb+4(2) '/'

                /pws/zycie093-dtemb+6(2) '/'

* << Fim da inclusão

                /pws/zycie093-dtemb+0(4) INTO it_words-word.

              WHEN 4 OR 5 OR 6.

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

                CONCATENATE /pws/zycie093-dtemb+0(4)

                /pws/zycie093-dtemb+4(2)

* << Fim da exclusão

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

                CONCATENATE /pws/zycie093-dtemb+0(4) '/'

                /pws/zycie093-dtemb+4(2) '/'

* << Fim da inclusão

                /pws/zycie093-dtemb+6(2) INTO it_words-word.

            ENDCASE.

          ENDIF.

      ENDCASE.

      MODIFY it_words INDEX v_idxa.

    ENDLOOP.

 

...