CE PLUS - Nota 007689
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: LI
Data/Hora da Publicação: 02/12/2008 00:00:00
Data/Hora Última Alteração: 23/02/2011 10:04:19
Descrição da Nota: VINCULAÇÃO / DESVINCULAÇÃO DA LI AO AC
Sintoma
- Ao desvincular a LI do Ato Concessório o programa esta apagando o regime tributário da LI;
- O programa não emite mensagem ao tentar vincular uma LI que não possue pedido.
Solução
Atualização da vinculação/desvinculação da LI ao Ato Concessório.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07689 Data: 02/12/2008 Hora: 10:58:44
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07689
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00007
Agrupamento : 00076
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
07681 - 00001 - 7.0 - 00007 - VINCULAÇÃO DA LI AO ATO CONCESSÓRIO
----------------------------------------------------------------------------------------------------
VINCULAÇÃO / DESVINCULAÇÃO DA LI AO AC
----------------------------------------------------------------------------------------------------
Palavras Chave:
VINCULAÇÃO / DESVINCULAÇÃO LI ATO CONCESSÓRIO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI020F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F02
...
ENDFORM.
FORM deleta_transm.
DELETE FROM /pws/zycit136 WHERE nrseq = /pws/zycie078-nrseqli AND
tp_doc EQ 'LI'.
ENDFORM.
FORM desvincula_ato.
CLEAR: v_descr11.
MOVE: /pws/zycie078-nrseqd TO v_nrseqd ,
space TO /pws/zycie078-nrseqd ,
space TO /pws/zycie078-reg_drawback,
* >> Início da exclusão: FORM DESVINCULA_ATO
space TO /pws/zycie078-codregtri ,
* << Fim da exclusão
space TO /pws/zycie078-modalidade ,
space TO /pws/zycie078-tipodb ,
space TO /pws/zycie078-digito .
CLEAR: it_zycit079.
MODIFY it_zycit079 TRANSPORTING item_drawback qtd_drawback
vl_prod_drawback nritem_db
WHERE nrseqli EQ /pws/zycie078-nrseqli.
ENDFORM.
FORM vincula_ato.
DATA: v_nrseqd_v LIKE /pws/zycit244-nrseqd.
...
...
( it_zycit079-qtd_iten * /pws/zycie078-qtdest ).
ENDIF.
it_zycit079-vl_prod_drawback =
it_zycit079-qtd_iten * it_zycit079-netpr.
MODIFY it_zycit079.
ENDLOOP.
ENDIF.
ELSE.
PERFORM vincular_atoc.
ENDIF.
* >> Início da inclusão: FORM VINCULA_ATO
ELSE.
MESSAGE s015 WITH text-109.
* << Fim da inclusão
ENDIF.
ENDFORM.
FORM load_pttext USING p_matnr
p_spras.
IF wa_zycit000 IS INITIAL.
SELECT SINGLE * FROM t001 WHERE bukrs EQ /pws/zycie001-bukrs.
SELECT SINGLE *
FROM /pws/zycit000
INTO wa_zycit000
WHERE land1 EQ t001-land1.
...