Módulo: DRAWBACK
Funcionalidade: Ato Concessório
Data/Hora da Publicação: 30/01/2006 00:00:00
Data/Hora Última Alteração: 17/02/2011 12:48:46
Descrição da Nota: AJUSTE PARA PREENCHIMENTO DA QUANTIDADE COMPROVADA DO MERCADO INTERNO
Sintoma
A quantidade comprovada do mercado interno não está sendo preenchidade
para o ato concessório tipo intermediario-importador.
Solução
Ao entrar no ato concessório atualizar as quantidades comprovadas.
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00747 Data: 30/01/2006 Hora: 09:13:21
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00747
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00022
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
Texto Rápido:
AJUSTE PARA PREENCHIMENTO DA QUANTIDADE COMPROVADA DO MERCADO INTERNO
----------------------------------------------------------------------------------------------------
Palavras Chave:
ATO CONCESSÓRIO - MERCADO INTERNO - COMPROVADO - QUANTIDADE
/PWS/SAPMZYCI040 - TRANSFERENCIA - UTILIZAÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI040 0239
REPS /PWS/MZYCI040F02
REPS /PWS/MZYCI040I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI040 0239
Eliminar coluna: /PWS/ZYCIE279-TRANSF
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI040F02
...
ELSE.
wa_cols2-screen-input = 0.
ENDIF.
MODIFY tc_realizi-cols FROM wa_cols2.
ENDIF.
* >> Início da inclusão: FORM CHECK_FIELD_0204
IF wa_cols2-screen-name EQ 'INF_IMP'
and /pws/zycie244-tipo eq 'N'.
wa_cols2-invisible = 1.
MODIFY tc_realizi-cols FROM wa_cols2.
endif.
* << Fim da inclusão
ENDLOOP.
LOOP AT SCREEN.
IF ( /pws/zycie244-modalidade EQ 'I' ) AND
( screen-name EQ '/PWS/ZYCIE245C-NETPR' ).
screen-invisible = 1.
...
...
ENDIF.
ENDIF.
SELECT * FROM /pws/zycit432
INTO TABLE itab_zycit432
WHERE nrseqd EQ /pws/zycie244-nrseqd.
* >> Início da inclusão: FORM TRATA_BUTTON_ENTE2
IF NOT itab_zycit432[] IS INITIAL.
REFRESH: itab_zycit373.
SELECT * FROM /pws/zycit373 INTO TABLE itab_zycit373
FOR ALL ENTRIES IN itab_zycit432
WHERE docnum EQ itab_zycit432-docnum
AND itmnum EQ itab_zycit432-itmnum.
LOOP AT itab_zycit432.
CLEAR: itab_zycit432-qtd_compv.
LOOP AT itab_zycit373 WHERE docnum EQ itab_zycit432-docnum
AND itmnum EQ itab_zycit432-itmnum.
itab_zycit432-qtd_compv = itab_zycit432-qtd_compv +
itab_zycit373-qtd_iten.
ENDLOOP.
MODIFY itab_zycit432.
ENDLOOP.
ENDIF.
* << Fim da inclusão
SELECT * FROM /pws/zycit371
INTO TABLE itab_zycit371
WHERE nratoc EQ /pws/zycie244-nratoc.
SELECT * FROM /pws/zycit427 INTO TABLE itab_zycit427
WHERE nrseqd EQ /pws/zycie244-nrseqd.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI040I01