CE PLUS - Nota 004549

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Fatura Mercadoria

Data/Hora da Publicação: 28/08/2007 00:00:00

Data/Hora Última Alteração: 22/02/2011 16:09:27

Descrição da Nota: FATURA MERCADORIA - DRILLDOWN PEDIDO

Sintoma

Pasta Itens da Fatura drilldown do Pedido não está funcionando.

 

 

Solução

Atualização do programa de fatura de mercadoria para que o drill down do pedido na pasta ítens da

fatura demonstre o mesmo corretamente.

 

 

Versões Tratadas

7.0


Pré-Requisitos

Produto:

Nota

Descrição

EMBARQUE - DRILLDOWN PEDIDO

Informações Complementares

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

Nota Número 04549 Data: 28/08/2007 Hora: 15:37:22

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

 

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

Nota Número              : 04549

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00002

Agrupamento              : 00010

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

Referência às notas relacionadas:

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

 

03763  - 00001 - 7.0    - 00001  - EMBARQUE - DRILLDOWN PEDIDO

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

FATURA MERCADORIA - DRILLDOWN PEDIDO

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

Palavras Chave:

PASTA ITENS; DRILLDOWN; PEDIDO

 

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

Objetos da nota:

REPS /PWS/MZYCI003I01

 

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

Modificações efetuadas em REPS /PWS/MZYCI003I01

 

...

    ENDIF.

    SELECT SINGLE ztag1 FROM t052 INTO itab_t052s-ztag1

      WHERE zterm = itab_zycit132-zterm.

    itab_zycit132-dtvencto =

          itab_zycit132-dtbase + itab_t052s-ztag1.

    MODIFY itab_zycit132.

  ENDLOOP.

ENDMODULE.

MODULE user_command_0102 INPUT.

  DATA v_valorn     LIKE ekko-ebeln.

* >> Início da inclusão: MODULE USER_COMMAND_0102

  DATA: v_zeros(10) VALUE '0000000000'.

* << Fim da inclusão

  CASE okcode.

    WHEN 'P-'.

      CHECK ts_faturas-activetab = 'FC_CLCONT'.

      tc_itens-top_line = tc_itens-top_line - 9.

      CLEAR okcode.

    WHEN 'P--'.

      CHECK ts_faturas-activetab = 'FC_CLCONT'.

      tc_itens-top_line = tc_itens-top_line - tc_itens-lines.

      CLEAR okcode.

    WHEN 'P+'.

...

 

...

        v_status_s = 0.

        AUTHORITY-CHECK OBJECT 'S_TCODE' ID 'TCD' FIELD

 '/PWS/ZYCI001_E'.

        IF sy-subrc EQ 0.

          CALL TRANSACTION '/PWS/ZYCI001_E' AND SKIP FIRST SCREEN.

        ELSE.

          MESSAGE e015 WITH text-105 text-107.

        ENDIF.

      ELSEIF v_campo EQ '/PWS/ZYCIE003-EBELN' .

        MOVE v_valor TO v_valorn.

* >> Início da inclusão: MODULE USER_COMMAND_0102

        SHIFT v_valorn RIGHT DELETING TRAILING space.

        OVERLAY v_valorn WITH v_zeros.

* << Fim da inclusão

        SELECT SINGLE * FROM ekko

          INTO ekko

          WHERE ebeln = v_valorn.

        IF sy-subrc EQ 0.

          i_ebeln = v_valorn.

          IF ekko-bstyp = 'L'.

            SET PARAMETER ID 'VRT' FIELD i_ebeln.

            AUTHORITY-CHECK OBJECT 'S_TCODE'

            ID 'TCD' FIELD 'ME33'.

            IF sy-subrc EQ 0.

...