PW.TP - Nota 002131
Módulo: GERAL
Funcionalidade: Atual. Estr. Lista Técnica Revenda
Data/Hora da Publicação: 21/09/2006 00:00:00
Data/Hora Última Alteração: 11/02/2011 10:30:48
Descrição da Nota: LISTA TÉCNICA DE REVENDA MOV. 309
Sintoma
Programa não seleciona os parâmetros gerais corretamente.
Solução
Selecionar os parâmetros de gerais de acordo com o grupo de empresas da empresa informada na tela de
seleção.
Versões Tratadas
Não Usar - 2.00.0000
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02131 Data: 21/09/2006 Hora: 11:00:21
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02131
Categoria : Melhoria
Prioridade : Baixa
Versão PW.TP : 2.0
Pacote : 00023
Agrupamento : 00000
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
LISTA TÉCNICA DE REVENDA MOV. 309
----------------------------------------------------------------------------------------------------
Palavras Chave:
LISTA TÉCNICA DE REVENDA MOV. 309 - PARÂMETROS GERAIS
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYTPR702
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYTPR702
...
COMPARING bukrs_g branch.
SELECT *
FROM t001w
INTO TABLE t_t001w.
SORT t_t001w BY werks.
* >> Início da inclusão: FORM F_SELECIONA_DADOS
RANGES: r_bukrs_g FOR /pws/zytpt021-bukrs_g.
r_bukrs_g-sign = 'I'.
r_bukrs_g-option = 'EQ'.
LOOP AT t_zytpt021.
AT NEW bukrs_g.
r_bukrs_g-low = t_zytpt021-bukrs_g.
APPEND r_bukrs_g.
ENDAT.
ENDLOOP.
* << Fim da inclusão
SELECT SINGLE *
FROM /pws/zytpt000
* >> Início da exclusão: FORM F_SELECIONA_DADOS
CLIENT SPECIFIED
WHERE mandt = sy-mandt.
IF sy-subrc <> 0.
SELECT SINGLE *
FROM /pws/zytpt000
CLIENT SPECIFIED
WHERE mandt IN r_mandt.
ENDIF.
* << Fim da exclusão
* >> Início da inclusão: FORM F_SELECIONA_DADOS
WHERE bukrs_g IN r_bukrs_g.
* << Fim da inclusão
IF /pws/zytpt000-qtd_f IS INITIAL.
/pws/zytpt000-qtd_f = 1000.
ENDIF.
SELECT *
INTO TABLE t_zytpt025
...