CE PLUS - Nota 004621

Módulo: DOC. EXPORTAÇÃO

Funcionalidade: Embarque

Data/Hora da Publicação: 04/09/2007 00:00:00

Data/Hora Última Alteração: 04/03/2010 11:04:45

Descrição da Nota: ALTERAÇÃO DA DESCRIÇÃO DA ABA DE ITENS NO EMBARQUE

Sintoma

 

Após modificar/exibir um embarque do tipo "D" (Embarque de Pedido de Compra) e sair utilizando o

botão "Voltar" e retornando para a tela de seleção de alteração/exibição de embarque, se informarmos

um outro sequencial de Embarque criado a partir de uma Ordem de Venda, o programa exibe a pasta de

itens com o nome de "Pedidos de Compra".

 

Solução

 

Ajustes para determinação correta da descrição a ser exibida na pasta de itens.

Versões Tratadas

7.0

Informações Complementares

 

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

Nota Número 04621 Data: 04/09/2007 Hora: 17:12:38

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

 

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

Nota Número              : 04621

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00002

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

Texto Rápido:

ALTERAÇÃO DA DESCRIÇÃO DA ABA DE ITENS NO EMBARQUE

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

Palavras Chave:

EMBARQUE, ABA, ITENS, DESCRIÇÃO, PEDIDO, ORDEM, PASTA

 

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

Objetos da nota:

REPS /PWS/MZYCE003F02

 

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

Modificações efetuadas em REPS /PWS/MZYCE003F02

 

...

  CHECK itab_zyglt100-zexit_ativa EQ 'X'.

  CHECK NOT itab_zyglt100-formulario IS INITIAL.

  CHECK NOT itab_zyglt100-programa IS INITIAL.

  CLEAR sy-subrc.

  PERFORM (itab_zyglt100-formulario)

          IN PROGRAM (itab_zyglt100-programa)

          IF FOUND.

ENDFORM.

FORM muda_descricao_aba.

  DATA: v_index TYPE sy-tabix.

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

  CHECK /pws/zycee001-tipo_emb CA 'DV'.

* << Fim da exclusão

  READ TABLE itab_tabstrip WITH KEY level   = 'HDR'

                                    tabname = 'T/02'.

  CHECK sy-subrc EQ 0.

  v_index = sy-tabix.

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

  CASE /pws/zycee001-tipo_emb.

* << Fim da inclusão

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

  IF /pws/zycee001-tipo_emb CA 'V'.

* << Fim da exclusão

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

    WHEN 'V'.

* << Fim da inclusão

    itab_tabstrip-descr = 'Pedidos de Compras/Ordens de Vendas'(c23).

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

  ELSE.

* << Fim da exclusão

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

    WHEN 'D'.

* << Fim da inclusão

    itab_tabstrip-descr = 'Pedidos de Compras'(c22).

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

  ENDIF.

* << Fim da exclusão

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

    WHEN OTHERS.

      itab_tabstrip-descr = 'Ordens de Vendas'(c02).

  ENDCASE.

* << Fim da inclusão

  MODIFY itab_tabstrip INDEX v_index TRANSPORTING descr.

ENDFORM.

FORM on_ctmenu_emb_it USING pif_menu TYPE REF TO cl_ctmenu.

  DATA: itab_fcode TYPE ui_functions,

        v_itens    TYPE i.

  CALL METHOD pif_menu->load_gui_status

              EXPORTING program = c_nome_prog

                        status  = 'EMB_IT'

                        menu    = pif_menu.

  DESCRIBE TABLE itab_zycet002_tc LINES v_itens.

...