Módulo: DOC. IMPORTAÇÃO
Funcionalidade: LI
Data/Hora da Publicação: 27/11/2007 00:00:00
Data/Hora Última Alteração: 09/03/2010 11:21:44
Descrição da Nota: FILTRO DE PEDIDO ITEM MATERIAL NA VINCULAÇÃO DO PEDIDO NA LI
Sintoma
Na vinculação do Pedido na LI, não tinha a possibilidade de filtrar por Item do Pedido ou pelo
Material como no embarque.
Solução
Permitir filtrar na vinculação do Pedido na LI, por Item do Pedido ou pelo Material
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05326 Data: 27/11/2007 Hora: 11:23:22
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05326
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00003
Agrupamento : 00023
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
FILTRO DE PEDIDO ITEM MATERIAL NA VINCULAÇÃO DO PEDIDO NA LI
----------------------------------------------------------------------------------------------------
Palavras Chave:
FILTRO - PEDIDO - ITEM - MATERIAL - VINCULAÇÃO - LI
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI020F01
REPS /PWS/MZYCI020TOP
REPT /PWS/SAPMZYCI020
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F01
...
FROM ( ekpo INNER JOIN ekko ON ekpo~ebeln = ekko~ebeln )
INTO TABLE itab_itens
WHERE ekko~bukrs EQ pa_bukrs
AND ekpo~j_1bnbm IN so_ncm
AND ekpo~bstyp IN itab_bstyp
AND ekko~waers IN so_waers
AND ekko~inco1 IN so_inco1
AND ekpo~bednr IN so_bednr
AND ekko~aedat IN so_aedat
AND ekko~ebeln IN so_ebeln
* >> Início da inclusão: FORM SELECIONAR_ITENS
AND ekpo~ebelp IN so_ebelp
AND ekpo~matnr IN so_matnr
* << Fim da inclusão
AND ekpo~elikz NE 'X'
AND ekpo~loekz NE 'L'.
ENDIF.
CLEAR v_novo_item.
LOOP AT itab_itens.
IF NOT it_zycit079[] IS INITIAL.
CLEAR it_zycit079.
READ TABLE it_zycit079 WITH KEY ebeln = itab_itens-ebeln
ebelp = itab_itens-ebelp.
IF NOT sy-subrc IS INITIAL.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020TOP
...
NO-EXTENSION NO INTERVALS,
so_waers FOR /pws/zycie078-waers
NO-EXTENSION NO INTERVALS,
so_inco1 FOR /pws/zycie078-inco1
NO-EXTENSION NO INTERVALS,
so_nrseq FOR /pws/zycie078-nrseq
NO-EXTENSION NO INTERVALS,
so_bednr FOR /pws/zycit079-bednr
NO-EXTENSION NO INTERVALS,
so_aedat FOR ekko-aedat,
* >> Início da exclusão:
so_ebeln FOR ekko-ebeln.
* << Fim da exclusão
* >> Início da inclusão:
so_ebeln FOR ekko-ebeln,
so_ebelp FOR ekpo-ebelp,
so_matnr FOR ekpo-matnr.
* << Fim da inclusão
SELECTION-SCREEN END OF SCREEN 0300.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF screen-name EQ 'SO_NRSEQ-LOW'.
screen-input = '0'.
MODIFY SCREEN.
ENDIF.
IF screen-name EQ 'SO_EBELN-LOW'.
IF NOT wa_impress IS INITIAL.
screen-input = '0'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCI020
------------------------------------------------------------------------
Incluído texto de seleção:
Idioma: PT
Variável (SELECT-OPTION / PARAMETER): SO_EBELP
Texto: (12 caracteres)
"Item"
Referência ao Dictionary: NÃO
------------------------------------------------------------------------
Incluído texto de seleção:
Idioma: PT
Variável (SELECT-OPTION / PARAMETER): SO_MATNR
Texto: (16 caracteres)
"Material"
Referência ao Dictionary: NÃO