Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Embarque
Data/Hora da Publicação: 15/08/2013 00:00:00
Data/Hora Última Alteração: 19/08/2013 17:23:40
Descrição da Nota: ERRO AO VINCULAR LI AO EMBARQUE
Sintoma
Erro ao vincular LI ao embarque, Fabricante difrente entre LI e Fatura.
Solução
Atualizado programa para consistir o fabricante da LI com o fabricante da Fatura na vinculação da Li
de LI do embarque.
9.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 13175 Data: 15/08/2013 Hora: 11:06:07
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 13175
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 9.0
Pacote : 00005
Agrupamento : 00161
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
12783 - 00001 - 9.0 - 00003 - LEVAR DADOS DE CÂMBIO E FABRICANTE AO VINCULAR LI OU CRIAR FATURA
13153 - 00002 - 9.0 - 00005 - VERIFICAR SE O PROCESSO ESTÁ SENDO ALTERADO POR ALGUM USUÁRIO E B
----------------------------------------------------------------------------------------------------
ERRO AO VINCULAR LI AO EMBARQUE
----------------------------------------------------------------------------------------------------
Palavras Chave:
FABRICANTE PEDIDO/ITEM DIFEREM ENTRE LI E FATURA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI001F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI001F01
...
FORM vinculacao_li.
* >> Início da inclusão: FORM VINCULACAO_LI
DATA: vl_lifnr TYPE /pws/zycit080-lifnr.
* << Fim da inclusão
...
...
MOVE v_descrlog TO itab_log-descr.
itab_log-pos = v_pos.
APPEND itab_log.
ENDIF.
ENDIF.
CLEAR: v_descrlog.
SELECT SINGLE lifnr INTO v_lifnrfabr
FROM /pws/zycit080
WHERE nrseqli EQ itab_zycit078-nrseqli
AND tipoforn EQ 'F'.
* >> Início da inclusão: FORM VINCULACAO_LI
IF /pws/zycit006-fabricante EQ '2'.
CLEAR: vl_lifnr.
SELECT SINGLE lifnr INTO vl_lifnr
FROM /pws/zycit080
WHERE nrseqli EQ /pws/zycit006-nrseq
AND ebeln EQ itab_zycit003-ebeln
AND ebelp EQ itab_zycit003-ebelp.
IF v_lifnrfabr NE vl_lifnr.
CONCATENATE text-540 itab_zycit003-ebeln text-081
itab_zycit003-ebelp text-091
INTO v_descrlog SEPARATED BY space.
MOVE: itab_zycit003-ebeln TO itab_log-ebeln ,
itab_zycit003-ebelp TO itab_log-ebelp ,
itab_zycit078-nrseqli TO itab_log-nrseqli,
v_descrlog TO itab_log-descr .
v_pos = v_pos + 1.
itab_log-pos = v_pos.
APPEND itab_log.
ENDIF.
ELSE.
* << Fim da inclusão
IF v_lifnrfabr NE /pws/zycit006-lifnrfabr.
CONCATENATE text-540 itab_zycit003-ebeln text-081
itab_zycit003-ebelp text-091
INTO v_descrlog SEPARATED BY space.
MOVE: itab_zycit003-ebeln TO itab_log-ebeln ,
itab_zycit003-ebelp TO itab_log-ebelp ,
itab_zycit078-nrseqli TO itab_log-nrseqli,
v_descrlog TO itab_log-descr .
v_pos = v_pos + 1.
itab_log-pos = v_pos.
APPEND itab_log.
* >> Início da inclusão: FORM VINCULACAO_LI
ENDIF.
* << Fim da inclusão
ENDIF.
ENDIF.
CLEAR: v_descrlog.
IF NOT itab_zycit003-qtd_itend IS INITIAL.
IF itab_zycit079-ntgew NE itab_zycit003-ntgewd.
IF /pws/zycit006 IS INITIAL.
CONCATENATE text-087 itab_zycit003-ebeln text-081
itab_zycit003-ebelp text-082
INTO v_descrlog SEPARATED BY space.
ELSE .
...