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.
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.
...