Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 17/11/2009 00:00:00
Data/Hora Última Alteração: 22/02/2011 14:12:37
Descrição da Nota: REMOVER OBRIGATORIEDADE DE CANAL PARA O CHILE (ANA)
Sintoma
O programa não permite salvar a ANA enquento não preencher o campo canal porém este campo não deve
existir para processos do Chile.
Solução
Ajustado programa para ocultar o campo canal para processos Chile.
7.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 09392 Data: 17/11/2009 Hora: 08:32:15
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 09392
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00001
Agrupamento : 00001
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
07277 - 00001 - 7.0 - 00006 - CRIADA MENSAGEM PARA INFORMAR QUE CANAL NÃO ESTÁ PREENCHIDO
----------------------------------------------------------------------------------------------------
REMOVER OBRIGATORIEDADE DE CANAL PARA O CHILE (ANA)
----------------------------------------------------------------------------------------------------
Palavras Chave:
REMOVER - OBRIGATORIEDADE - CANAL - CHILE - ANA
/PWS/SAPMZYCI059
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI059F01
REPS /PWS/MZYCI059O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI059F01
...
FORM save_data.
* >> Início da exclusão: FORM SAVE_DATA
IF /pws/zycie085-canal2 IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: FORM SAVE_DATA
IF /pws/zycie085-canal2 IS INITIAL AND t001-land1 NE 'CL'.
* << Fim da inclusão
CLEAR /pws/zycie085-canal.
MESSAGE i015 WITH text-237.
EXIT.
ENDIF.
CHECK NOT /pws/zycie085-dttax IS INITIAL.
PERFORM: taxa_converte USING /pws/zycie085-waersfob
/pws/zycie085-dttax
CHANGING /pws/zycie085-ukursfob.
PERFORM: taxa_converte USING /pws/zycie085-waersfre
/pws/zycie085-dttax
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI059O01
...
ELSE.
screen-input = '1'.
IF screen-group4 = 'REQ'.
screen-required = '1'.
ENDIF.
ENDIF.
ENDIF.
ENDCASE.
MODIFY SCREEN.
ENDIF.
* >> Início da inclusão: MODULE SET_SCREEN
IF screen-name EQ '/PWS/ZYCIE085-CANAL2' OR
screen-name EQ '/PWS/ZYCIE085-CANAL' OR
screen-name EQ 'V_CANAL'.
IF t001-land1 EQ 'CL'.
screen-invisible = 1.
screen-active = 0.
ELSE.
screen-invisible = 0.
screen-active = 1.
ENDIF.
MODIFY SCREEN.
ENDIF.
* << Fim da inclusão
IF screen-name = 'TAB_CONT'.
SELECT SINGLE * FROM t001 WHERE bukrs EQ /pws/zycie085-bukrs.
SELECT SINGLE * FROM /pws/zycit000 WHERE land1 EQ t001-land1.
IF /pws/zycit000-flag_reclass IS INITIAL.
IF /pws/zycie085-flag_reclass IS INITIAL AND
/pws/zycie085-belnr_0 IS INITIAL AND
/pws/zycie085-belnr_1 IS INITIAL AND
/pws/zycie085-belnr_2 IS INITIAL AND
/pws/zycie085-belnr_3 IS INITIAL.
screen-invisible = '1'.
...