Módulo: DRAWBACK
Funcionalidade: CE Reports Formulários
Data/Hora da Publicação: 02/07/2009 00:00:00
Data/Hora Última Alteração: 17/02/2011 15:39:54
Descrição da Nota: ANEXO PEDIDO DE DRAWBACK(IMPORTAÇÃO) NÃO ESTA EXIBINDO TODOS OS ITENS
Sintoma
Ao gerar o anexo de importação e o ultima linha do anexo ser a ultima ocorrencia para um NCM o
programa gera um novo anexo devido a necessidade de exibição do total para aquele ncm porém não
exibi o ultimo item.
Solução
Ajustado controle dos itens impressos para este tipo de quebra.
7.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 08625 Data: 02/07/2009 Hora: 11:30:55
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 08625
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00010
Agrupamento : 00103
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03747 - 00001 - 7.0 - 00001 - AJUSTE PARA EXIBIR TOTAL POR NCM E AS QUANTIDADES TOTAIS COM A UN
----------------------------------------------------------------------------------------------------
ANEXO PEDIDO DE DRAWBACK(IMPORTAÇÃO) NÃO ESTA EXIBINDO TODOS OS ITENS
----------------------------------------------------------------------------------------------------
Palavras Chave:
ANEXO - PEDIDO - DRAWBACK - IMPORTAÇÃO - PERDENDO - ITENS
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCRR004
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCRR004
...
ADD 1 TO current_item.
READ TABLE p_t_items INTO wa_itens INDEX current_item.
IF sy-subrc NE 0.
v_completo = 'X'.
EXIT.
ENDIF.
IF v_linha EQ 19.
v_proximo = current_item + 1.
READ TABLE p_t_items INTO wa_itens2 INDEX v_proximo.
IF wa_itens2-j_1bnbm IS INITIAL.
* >> Início da inclusão: FORM CREATE_EXCEL_CONTENT_TABLE
current_item = current_item - 1.
* << Fim da inclusão
EXIT.
ENDIF.
ENDIF.
PERFORM fill_items_fields
USING
p_t_items[]
'ITENS'
current_row
p_t_matrix[]
p_t_report_fields[]
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIT474
Nome campo Chv Elem.dados Tab.verif. N CtDt Comp.
MANDT X MANDT CLNT 3
NRSEQD X /PWS/ZYCIL435 CHAR 10
NRITEM X CHAR05 CHAR 5
TIPO X CHARX1 CHAR 1
PASTA X CHARX1 CHAR 1
WAERS X /PWS/ZYCIL546 CUKY 5
NCM X J_1BNBMCO1 CHAR 16
* >> Início da inclusão:
ADITIVO X NUMC3 NUMC 3
* << Fim da inclusão
ANEXO NUMC3 NUMC 3
...