CE PLUS - Nota 012017
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 08/03/2012 00:00:00
Data/Hora Última Alteração: 25/04/2014 10:45:58
Descrição da Nota: QUANDO NÃO HÁ CÓDIGO NO FABRICANTE DA FATURA, NÃO LEVA DESCRIÇÃO NA NF
Sintoma
Quando não há código no fabricante da Fatura, não leva descrição na NF
Solução
Carregar a descrição fornecida na capa da Fatura
Versões Tratadas
9.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12017 Data: 08/03/2012 Hora: 14:25:46
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12017
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00010
Agrupamento : 00107
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
11690 - 00001 - 8.0 - 00009 - ERRO NO FABRICANTE AO NAVEGAR ENTRE ITENS DA FATURA
11750 - 00002 - 8.0 - 00009 - ERRO AO FAZER BATCH INPUT TELA IMPORTADOR NA NF
13694 - 00003 - 9.0 - 00007 - FATURA ACEITA QUALQUER CÓDIGO DE FABRICANTE
----------------------------------------------------------------------------------------------------
QUANDO NÃO HÁ CÓDIGO NO FABRICANTE DA FATURA, NÃO LEVA DESCRIÇÃO NA NF
----------------------------------------------------------------------------------------------------
Palavras Chave:
CÓDIGO DO FABRICANTE - FATURA - DADOS DA ADIÇÃO - NF
----------------------------------------------------------------------------------------------------
Objetos da nota:
METH /PWS/CL_ZYCI_TRATA_NF DADOS_ADICAO
----------------------------------------------------------------------------------------------------
Modificações efetuadas em METH /PWS/CL_ZYCI_TRATA_NF DADOS_ADICAO
Na se24 editar a classe /PWS/CL_ZYCI_TRATA_NF . Selecionar o método DADOS_ADICAO.
Editar conforme abaixo
CLEAR v_lifnr .
CASE wa_zycie006-fabricante.
WHEN 0.
*>>Início da Inclusão
IF NOT wa_zycie006-lifnrfabr IS INITIAL.
*>>Fim da Inclusão
v_lifnr = wa_zycie006-lifnrfabr .
*>>Início da Inclusão
SELECT SINGLE name1 FROM lfa1
INTO t_zycee007-fabricante
WHERE lifnr EQ wa_zycie006-lifnrfabr.
ELSE.
t_zycee007-fabricante = wa_zycie006-descfab.
ENDIF.
*>>Fim da Inclusão
WHEN 1.
v_lifnr = wa_zycie006-lifnr .
*>>Início da Inclusão
IF NOT v_lifnr IS INITIAL .
SELECT SINGLE name1 FROM lfa1
INTO t_zycee007-fabricante
WHERE lifnr EQ v_lifnr.
ENDIF.
*>>Fim da Inclusão
WHEN 2.
SELECT SINGLE lifnrfabr
INTO v_lifnr
FROM /pws/zycit003
WHERE nrseq = nrseq
AND ebeln = ebeln
AND ebelp = ebelp.
*>>Início da Inclusão
IF NOT v_lifnr IS INITIAL .
SELECT SINGLE name1 FROM lfa1
INTO t_zycee007-fabricante
WHERE lifnr EQ v_lifnr.
ENDIF.
*>>Fim da Inclusão
WHEN 3.
SELECT SINGLE paisfab
INTO v_land
FROM /pws/zycit003
WHERE nrseq = nrseq
AND ebeln = ebeln
AND ebelp = ebelp.
IF sy-subrc EQ 0 .
SELECT SINGLE landx
INTO t_zycee007-fabricante
FROM t005t
WHERE land1 = v_land
AND spras = sy-langu.
ENDIF .
ENDCASE.
*>>Início da Exclusão
IF NOT v_lifnr IS INITIAL .
SELECT SINGLE name1 FROM lfa1
INTO t_zycee007-fabricante
WHERE lifnr EQ v_lifnr.
ENDIF.
*>>Fim da Exclusão
ENDIF.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em PROG /PWS/MZYCI003F02
FORM atualiza_fornecedor.
*>> Inicio Inclusao: FORM ATUALIZA_FORNECEDOR
* IF v_paisfab NE 'X' .
*>> Fim Inclusao
IF v_tpfabr EQ '0'.
itab_zycit003-lifnrfabr = /pws/zycie006-lifnrfabr.
itab_zycit003-descfab = /pws/zycie006-descfab .
itab_zycit003-paisfab = /pws/zycie006-paisfab.
ELSE.
IF sy-dynnr = '0106'.
itab_zycit003-lifnrfabr = /pws/zycie003-lifnrfabr.
itab_zycit003-descfab = /pws/zycie003-descfab .
itab_zycit003-paisfab = /pws/zycie003-paisfab.
IF v_tpfabr EQ '3' .
/pws/zycie003-porigem = itab_zycit003-porigem =
/pws/zycie003-paisfab.
ENDIF.
ENDIF.
ENDIF.
PERFORM carrega_descr.
CLEAR v_paisfab.
*>> Inicio Exclusao: FORM ATUALIZA_FORNECEDOR
* ENDIF.
*>> Fim Exclusao
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em PROG /PWS/MZYCI003F03
FORM consiste_fabrictp.
CLEAR lfa1.
*>> Inicio Exclusao: FORM CONSISTE_FABRICTP
IF /pws/zycie003-fabric EQ '2'.
*>> Fim Exclusao
*>> Inicio Inclusao: FORM CONSISTE_FABRICTP
IF /pws/zycie003-fabric EQ '2'
AND NOT /pws/zycie003-lifnrfabr IS INITIAL.
*>> Fim Inclusao
SELECT SINGLE * FROM lfa1
WHERE lifnr EQ /pws/zycie003-lifnrfabr.
...