Módulo: DRAWBACK
Funcionalidade: Ato Concessório
Data/Hora da Publicação: 22/12/2005 00:00:00
Data/Hora Última Alteração: 17/02/2011 13:00:06
Descrição da Nota: AJUSTE NO PREENCHIMENTO DA QUANTIDADE NCM DE EXPORTAÇÃO
Sintoma
Ao entrar exibindo a composição exibe mensagem de erro na tabstrip.
Solução
Preencher a propriedade grupo 1 com NEX para as pastas Importações e
Notas Fiscais.
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00508 Data: 22/12/2005 Hora: 11:13:40
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00508
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00093
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00452 - 00001 - 6.0 - 00021 - AJUSTE PARA PREENCHIMENTO DA QUANTIDADE NCM DE EXPORTAÇÃO
----------------------------------------------------------------------------------------------------
AJUSTE NO PREENCHIMENTO DA QUANTIDADE NCM DE EXPORTAÇÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
AGRUPAMENTO - ATO CONCESSÓRIO - QTD NCM - EXPORTAÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI040 0206
REPS /PWS/MZYCI040F02
REPS /PWS/MZYCI040O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI040F02
...
itab_zycit247-vl_comis = /pws/zycie247-vl_comis.
itab_zycit247-gewei = /pws/zycie247-gewei .
itab_zycit247-brgew = /pws/zycie247-brgew .
itab_zycit247-ntgew = /pws/zycie247-ntgew .
itab_zycit247-j_1bnbm = /pws/zycie247-j_1bnbm .
* >> Início da inclusão: FORM FILL_ITAB_ZYCIT247_AGRUP
itab_zycit247-qtd_ncm = /pws/zycie247-qtd_ncm.
* << Fim da inclusão
itab_zycit247-markme = markme .
IF NOT itab_zycit247-j_1bnbm IS INITIAL .
PERFORM busca_um_ncm USING itab_zycit247-j_1bnbm
CHANGING itab_zycit247-um_ncm.
* >> Início da exclusão: FORM FILL_ITAB_ZYCIT247_AGRUP
IF NOT itab_zycit247-um_ncm IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: FORM FILL_ITAB_ZYCIT247_AGRUP
IF NOT itab_zycit247-um_ncm IS INITIAL and
itab_zycit247-um_ncm eq itab_zycit247-meins.
* << Fim da inclusão
itab_zycit247-qtd_ncm = itab_zycit247-qtd_iten.
ENDIF.
ENDIF.
IF itab_zycit247-meins = 'TO' AND
itab_zycit247-gewei = 'KG'.
...
...
itab_zycit247-vl_comis = /pws/zycie247-vl_comis.
itab_zycit247-gewei = /pws/zycie247-gewei .
itab_zycit247-brgew = /pws/zycie247-brgew .
itab_zycit247-ntgew = /pws/zycie247-ntgew .
itab_zycit247-j_1bnbm = /pws/zycie247-j_1bnbm .
* >> Início da inclusão: FORM FILL_ITAB_ZYCIT247_AGRUP
itab_zycit247-qtd_ncm = /pws/zycie247-qtd_ncm.
* << Fim da inclusão
itab_zycit247-markme = markme .
IF NOT itab_zycit247-j_1bnbm IS INITIAL .
PERFORM busca_um_ncm USING itab_zycit247-j_1bnbm
CHANGING itab_zycit247-um_ncm.
* >> Início da exclusão: FORM FILL_ITAB_ZYCIT247_AGRUP
IF NOT itab_zycit247-um_ncm IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: FORM FILL_ITAB_ZYCIT247_AGRUP
IF NOT itab_zycit247-um_ncm IS INITIAL and
itab_zycit247-um_ncm eq itab_zycit247-meins.
* << Fim da inclusão
itab_zycit247-qtd_ncm = itab_zycit247-qtd_iten.
ENDIF.
ENDIF.
IF itab_zycit247-meins = 'TO' AND
itab_zycit247-gewei = 'KG'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI040O01
...
ENDIF.
ENDIF.
MODIFY SCREEN.
ENDIF.
IF screen-name EQ '/PWS/ZYCIE247-QTD_NCM'.
* >> Início da exclusão: MODULE TRATA_SCREEN_0206
IF /pws/zycie244-tipo EQ 'F'.
* << Fim da exclusão
* >> Início da inclusão: MODULE TRATA_SCREEN_0206
IF /pws/zycie244-tipo EQ 'F' or
not v_agrup IS INITIAL.
* << Fim da inclusão
IF /pws/zycie247-meins NE /pws/zycie247-um_ncm.
screen-input = 1.
ELSE.
screen-input = 0.
ENDIF.
...