CE PLUS - Nota 008095
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: LI
Data/Hora da Publicação: 20/02/2009 00:00:00
Data/Hora Última Alteração: 23/02/2011 10:04:40
Descrição da Nota: BLOQUEIA DESVINCULAÇÃO DO ATO CONCESSÓRIO CASO LI VINCULADA A EMBARQUE
Sintoma
Ajuste para bloquear a desvinculação do ato concessório quando a LI já estiver vinculada a um
embarque.
Solução
Ajuste para bloquear a desvinculação do ato concessório quando a LI já estiver vinculada a um
embarque.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 08095 Data: 20/02/2009 Hora: 17:00:03
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 08095
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00008
Agrupamento : 00086
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
07689 - 00001 - 7.0 - 00007 - VINCULAÇÃO / DESVINCULAÇÃO DA LI AO AC
----------------------------------------------------------------------------------------------------
BLOQUEIA DESVINCULAÇÃO DO ATO CONCESSÓRIO CASO LI VINCULADA A EMBARQUE
----------------------------------------------------------------------------------------------------
Palavras Chave:
BLOQUEIO - DESVINCULA - ATO - CONCESSÓRIO - LI - VINCULADO - EMBARQUE
/PWS/SAPZYCI020
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI020F01
REPS /PWS/MZYCI020F02
REPT /PWS/SAPMZYCI020
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F01
...
screen-input = '0'.
ENDIF.
ENDIF.
ELSE.
IF v_tcode NE '/PWS/ZYCI020_E'.
IF screen-group3 EQ 'VIN'.
screen-input = '1'.
ENDIF.
ENDIF.
ENDIF.
* >> Início da inclusão: FORM MODO_EXIB
IF screen-name EQ '/PWS/ZYCIE078-NRSEQ'.
screen-input = '0'.
ENDIF.
* << Fim da inclusão
ENDIF.
IF v_tcode EQ '/PWS/ZYCI020_G' OR
v_tcode EQ '/PWS/ZYCI020_I' .
IF screen-name EQ '/PWS/ZYCIE079-ZUM' OR
screen-name EQ '/PWS/ZYCIE079-QTDEST'.
IF /pws/zycie078-aplicpli EQ '2'.
screen-input = '1'.
ELSE.
screen-input = '0'.
ENDIF.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F02
...
AND ddlanguage EQ sy-langu.
ELSE.
v_descr18 = space.
ENDIF.
ENDFORM.
FORM deleta_transm.
DELETE FROM /pws/zycit136 WHERE nrseq = /pws/zycie078-nrseqli AND
tp_doc EQ 'LI'.
ENDFORM.
FORM desvincula_ato.
* >> Início da inclusão: FORM DESVINCULA_ATO
IF NOT /pws/zycie078-nrseq IS INITIAL.
MESSAGE i015 WITH text-458 text-459.
EXIT.
ENDIF.
* << Fim da inclusão
CLEAR: v_descr11.
MOVE: /pws/zycie078-nrseqd TO v_nrseqd ,
space TO /pws/zycie078-nrseqd ,
space TO /pws/zycie078-reg_drawback,
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
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCI020
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 458
Texto: (42 caracteres)
"Ato não pode ser desvinculado pois LI está"
Comprimento máximo: 50
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 459
Texto: (23 caracteres)
"vinculada a um Embarque"
Comprimento máximo: 50