CE PLUS - Nota 012236
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: PLI
Data/Hora da Publicação: 24/05/2012 00:00:00
Data/Hora Última Alteração: 14/06/2012 10:42:39
Descrição da Nota: OS CAMPOS REFERENTES AO FABRICANTE NÃO SEGUEM O TIPO DE FABRICANTE
Sintoma
Os campos referentes ao fabricante não estão sendo abertos e fechados de acordo com o informado o
tipo de fabricante.
Solução
Atualizado programa para tratar os campos de fabricantes conforme o tipo selecionado.
Versões Tratadas
9.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12236 Data: 24/05/2012 Hora: 13:56:44
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12236
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00011
Agrupamento : 00115
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
----------------------------------------------------------------------------------------------------
OS CAMPOS REFERENTES AO FABRICANTE NÃO SEGUEM O TIPO DE FABRICANTE
----------------------------------------------------------------------------------------------------
Palavras Chave:
ABRIR - FECHAR - CAMPO - TIPO - FABRICANTE - PLI
/PWS/SAPMZYCI020
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI020F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F02
...
LOOP AT SCREEN.
IF /pws/zycie078-aplicpli EQ '2'.
IF screen-name EQ '/PWS/ZYCIE079A-CODSUFRA'.
/pws/zycie079-codsufra = /pws/zycie079a-codsufra = '0000'.
screen-input = 0.
ELSEIF screen-name EQ '/PWS/ZYCIE079A-DESTAQUE'.
/pws/zycie079a-destaque = '0001'.
screen-input = 0.
ENDIF.
ENDIF.
* >> Início da exclusão: FORM SET_SCREEN_0521
IF /pws/zycie078-fabricante EQ '3'.
IF screen-name EQ '/PWS/ZYCIE079A-FABRIC'.
screen-input = '0'.
ENDIF.
ELSEIF /pws/zycie078-fabricante EQ '2'.
IF screen-name EQ '/PWS/ZYCIE079A-FABRIC' OR
screen-name EQ '/PWS/ZYCIE079A-LIFNR '.
screen-input = '1'.
ENDIF.
ENDIF.
* << Fim da exclusão
* >> Início da inclusão: FORM SET_SCREEN_0521
CASE /pws/zycie078-fabricante.
WHEN '0' OR '1' OR '3'.
IF screen-name EQ '/PWS/ZYCIE079A-LIFNR' OR
screen-name EQ '/PWS/ZYCIE079A-FABRIC' OR
screen-name EQ '/PWS/ZYCIE079A-DESCFAB' OR
screen-name EQ '/PWS/ZYCIE079A-PAISFAB'.
screen-input = 0.
ENDIF.
WHEN '2'.
IF screen-name EQ '/PWS/ZYCIE079A-FABRIC'.
screen-input = 1.
ENDIF.
CASE /pws/zycie079a-fabric.
WHEN '1'.
IF screen-name EQ '/PWS/ZYCIE079A-LIFNR' OR
screen-name EQ '/PWS/ZYCIE079A-DESCFAB' OR
screen-name EQ '/PWS/ZYCIE079A-PAISFAB'.
screen-input = 0.
ENDIF.
WHEN '2'.
IF screen-name EQ '/PWS/ZYCIE079A-LIFNR'.
screen-input = 1.
ENDIF.
IF screen-name EQ '/PWS/ZYCIE079A-DESCFAB' OR
screen-name EQ '/PWS/ZYCIE079A-PAISFAB'.
screen-input = 0.
ENDIF.
WHEN '3'.
IF screen-name EQ '/PWS/ZYCIE079A-LIFNR' OR
screen-name EQ '/PWS/ZYCIE079A-DESCFAB' OR
screen-name EQ '/PWS/ZYCIE079A-PAISFAB'.
screen-input = 0.
ENDIF.
ENDCASE.
ENDCASE.
* << Fim da inclusão
MODIFY SCREEN.
ENDLOOP.
ENDFORM.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020I01
...
MODULE user_command_0521 INPUT.
CASE okcode.
WHEN 'CLI'.
GET CURSOR FIELD v_field.
IF v_field = 'V_ESP' OR v_field = 'V_ESP338'.
PERFORM atualiza_v_esp.
PERFORM preenche_v_esp.
ENDIF.
ENDCASE.
* >> Início da inclusão: module user_command_0521
IF /pws/zycie079a-fabric EQ '3'.
CLEAR /pws/zycie079a-lifnr.
ENDIF.
* << Fim da inclusão
ENDMODULE.
...