Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 11/03/2013 00:00:00
Data/Hora Última Alteração: 04/04/2013 14:45:44
Descrição da Nota: NA DI, PASTA 2, NÃO DEIXA % DO SEGURO SER IGUAL A ZERO.
Sintoma
Ao entrar na pasta carga 2 , o sistema traz a % de seguro pelo parâmetro da /pws/zycit000, porém se
eu coloco 0 na % , ao dar Enter ele traz novamente o parâmetro da /pw/zycit000.
Solução
Atualizado programa para aceitar valor 0 no campo de percentual de seguro
9.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12844 Data: 11/03/2013 Hora: 16:33:57
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12844
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 9.0
Pacote : 00003
Agrupamento : 00149
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
12839 - 00001 - 9.0 - 00003 - QUANDO CRIO UMA DI POR FORA DO EMBARQUE, NÃO TRAZ A % DE SEGURO.
----------------------------------------------------------------------------------------------------
NA DI, PASTA 2, NÃO DEIXA % DO SEGURO SER IGUAL A ZERO.
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - PORCENTAGEM SEGURO - ZYCIT000 - PARAMETRO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023TOP
REPS /PWS/MZYCI023F04
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023TOP
...
* >> Início da inclusão:
v_perseg_vez TYPE c ,
* << Fim da inclusão
data end of common part.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F04
...
FORM data_clean_seg.
IF sy-tcode = '/PWS/ZYCI023_C'.
IF /pws/zycie085-waersseg IS INITIAL.
CLEAR: /pws/zycie085-ukursseg, s_stvr, /pws/zycie085-vlseg.
ENDIF.
* >> Início da inclusão: FORM DATA_CLEAN_SEG
IF v_perseg_vez = ' '.
* << Fim da inclusão
IF /pws/zycie085-per_seg IS INITIAL AND
/pws/zycie085-vlseg IS INITIAL.
IF t001-bukrs NE /pws/zycie085-bukrs OR
/pws/zycit000-land1 NE t001-land1.
SELECT SINGLE * FROM t001 WHERE bukrs EQ /pws/zycie085-bukrs.
SELECT SINGLE per_seg FROM /pws/zycit000
INTO /pws/zycie085-per_seg
WHERE land1 EQ t001-land1.
ELSE.
/pws/zycie085-per_seg = /pws/zycit000-per_seg.
* >> Início da inclusão: FORM DATA_CLEAN_SEG
ENDIF.
ENDIF.
IF NOT /pws/zycie085-per_seg IS INITIAL.
v_perseg_vez = 'X'.
* << Fim da inclusão
ENDIF.
ENDIF.
ENDIF.
ENDFORM.
...