Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 14/09/2012 00:00:00
Data/Hora Última Alteração: 21/05/2013 16:18:40
Descrição da Nota: MENSAGENS INCORRETAS QUANDO VINCULA FATURA DE SERVIÇO
Sintoma
Mensagens incorretas quando vincula fatura de serviço
Solução
Corrigir mensagens
9.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12514 Data: 14/09/2012 Hora: 16:11:09
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12514
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 9.0
Pacote : 00001
Agrupamento : 00128
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
10782 - 00001 - 8.0 - 00005 - AO CRIAR FATURA PELO MENU /PWS/ZYCI EXIBE MENSAGENS INCORRETAS.
12425 - 00002 - 9.0 - 00001 - BLOQUEAR A CRIAÇÃO DA FATURA CASO O INCOTERM NÃO SEJA DA MESMA FA
----------------------------------------------------------------------------------------------------
MENSAGENS INCORRETAS QUANDO VINCULA FATURA DE SERVIÇO
----------------------------------------------------------------------------------------------------
Palavras Chave:
MENSAGEM - FATURA - ITENS DE SERVIÇO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
REPS /PWS/MZYCI003F02
REPS /PWS/MZYCI003F03
REPS /PWS/MZYCI003I01
REPS /PWS/MZYCI003O01
REPS /PWS/MZYCI003TOP
REPS /PWS/MZYCI003X01
REPT /PWS/SAPMZYCI003
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
PERFORM trata_fabricante.
LOOP AT itab_zycit003 WHERE servico NE 'X'.
ENDLOOP.
IF sy-subrc EQ 0.
* >> Início da exclusão: FORM SALVAR_DADOS
MESSAGE i013 WITH text-130.
* << Fim da exclusão
* >> Início da inclusão: FORM SALVAR_DADOS
MESSAGE i013 WITH text-228.
* << Fim da inclusão
v_stop = 'X'.
ENDIF.
ELSEIF /pws/zycie006-tpfatura = '01'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
CLEAR okcode.
* >> Início da inclusão: FORM TRATA_SAVE
IF /pws/zycie006-tpfatura EQ '01' OR
/pws/zycie006-tpfatura EQ '11'.
* << Fim da inclusão
MESSAGE e015 WITH text-200.
ENDIF.
* >> Início da inclusão: FORM TRATA_SAVE
ENDIF.
* << Fim da inclusão
ENDFORM.
...
...
ENDIF.
IF /pws/zycie006-tpfatura NE '01'
AND /pws/zycie006-tpfatura NE '11'
AND NOT /pws/zycie001-nrseq IS INITIAL.
SELECT SINGLE *
FROM /pws/zycit263
WHERE nrseq EQ /pws/zycie001-nrseq
AND eliminado NE 'X'.
IF sy-subrc NE 0.
MESSAGE e039 WITH text-171.
ENDIF.
ENDIF.
ENDIF.
* >> Início da inclusão: FORM TP_FATURA
IF /pws/zycie006-tpfatura EQ '01'.
LOOP AT itab_zycit003 WHERE servico EQ 'X' .
MESSAGE e039 WITH text-227.
ENDLOOP.
ENDIF.
* << Fim da inclusão
IF /pws/zycie006-tpfatura EQ '03'
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003I01
...
MESSAGE e015 WITH text-208.
ENDIF.
ENDIF.
IF /pws/zycie006-frpagto IS INITIAL.
MESSAGE e015 WITH text-168.
ENDIF.
* >> Início da inclusão: MODULE USER_COMMAND_0100
IF /pws/zycie006-tpfatura EQ '01' OR
/pws/zycie006-tpfatura EQ '11'.
* << Fim da inclusão
CLEAR: lt_zycit031, lt_zycit031[], lt_ekko, lt_ekko[],
lv_inco1_ci.
SELECT SINGLE inco1_ci INTO lv_inco1_ci
FROM /pws/zycit031
WHERE inco1 EQ /pws/zycie001-inco1
AND land1 EQ t001-land1
AND codmod EQ 'D'.
...
...
SELECT ebeln inco1 FROM ekko
INTO TABLE lt_ekko
FOR ALL ENTRIES IN itab_zycit003
WHERE ebeln EQ itab_zycit003-ebeln.
LOOP AT lt_ekko.
READ TABLE lt_zycit031 WITH KEY inco1 = lt_ekko-inco1.
IF sy-subrc NE 0.
MESSAGE e015 WITH text-532.
ENDIF.
ENDLOOP.
* >> Início da inclusão: MODULE USER_COMMAND_0100
ENDIF.
* << Fim da inclusão
PERFORM trata_save.
WHEN 'MODI'.
PERFORM trata_modi.
WHEN 'MODO'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003O01
...
AND /pws/zycie006-vinserv EQ 'X'.
DELETE itab_zycit003 WHERE servico NE 'X'.
ENDIF.
IF /pws/zycie006-tpfatura = '01'.
DELETE itab_zycit003 WHERE servico EQ 'X'.
ENDIF.
IF /pws/zycie006-tpfatura = '11'.
LOOP AT itab_zycit003 WHERE servico NE 'X'.
ENDLOOP.
IF sy-subrc EQ 0.
* >> Início da exclusão: MODULE LOAD_DATA
MESSAGE i013 WITH text-130.
* << Fim da exclusão
* >> Início da inclusão: MODULE LOAD_DATA
MESSAGE i013 WITH text-228.
* << Fim da inclusão
ENDIF.
ELSEIF /pws/zycie006-tpfatura = '01'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCI003
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: EN
Símbolo: 227
Texto: (35 caracteres)
"Type not allowed with service items"
Comprimento máximo: 40
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 227
Texto: (40 caracteres)
"Tipo não permitido com itens de serviço."
Comprimento máximo: 40
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 228
Texto: (47 caracteres)
"Itens vinculados não são de serviço. Verificar."
Comprimento máximo: 47