CE PLUS - Nota 005550
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 03/01/2008 00:00:00
Data/Hora Última Alteração: 09/03/2010 11:27:32
Descrição da Nota: CAMPO 'TOTAL USD PG' NA PASTA TRIBUTOS NOS DETALHES DO ITEM.
Sintoma
O campo Total USD Pg na pasta tributos da ANA não esta sendo preenchido corretamente .
Solução
O programa foi ajustado para somar todos os valores, mesmo os que não estão visiveis na tela.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05550 Data: 03/01/2008 Hora: 09:16:30
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05550
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00004
Agrupamento : 00028
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
CAMPO 'TOTAL USD PG' NA PASTA TRIBUTOS NOS DETALHES DO ITEM.
----------------------------------------------------------------------------------------------------
Palavras Chave:
ANA TOTAL USD PG TRIBUTOS DETALHES ITENS
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI059 0433
REPS /PWS/MZYCI059O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI059 0433
PROCESS BEFORE OUTPUT.
* >> Início da exclusão: Tela 0433
MODULE: set_screen_padrao.
* << Fim da exclusão
* >> Início da inclusão: Tela 0433
MODULE: set_screen_padrao,
carrega_totais.
* << Fim da inclusão
LOOP AT itab_zycit403_i WITH CONTROL tc_trib.
MODULE: carrega_zycie403,
ajuste.
ENDLOOP.
PROCESS AFTER INPUT.
MODULE clear_variavel.
LOOP AT itab_zycit403_i.
MODULE: carrega_zycit403.
ENDLOOP.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI059O01
...
ebelp = /pws/zycie403-ebelp.
IF sy-subrc EQ 0 AND itab_zycit082-doc NE space.
CLEAR: /pws/zycie403-percentual, /pws/zycie403-basered.
ENDIF.
ENDIF.
/pws/zycie403-valorcalc =
/pws/zycie403-base * /pws/zycie403-percentual / 100.
IF /pws/zycie085-recal EQ 'X'.
/pws/zycie403-valorrec = /pws/zycie403-valorcalc.
ENDIF.
* >> Início da exclusão: MODULE CARREGA_ZYCIE403
IF /pws/zycie403-condicoes EQ 'P'.
/pws/zycie403-valorusdp = /pws/zycie403-valorusdp +
/pws/zycie403-valorrec.
ELSEIF /pws/zycie403-condicoes EQ 'G'.
/pws/zycie403-valorusdg = /pws/zycie403-valorusdg +
/pws/zycie403-valorrec.
ELSEIF /pws/zycie403-condicoes EQ 'C'.
/pws/zycie403-valorusda = /pws/zycie403-valorusda +
/pws/zycie403-valorrec.
ENDIF.
* << Fim da exclusão
READ TABLE itab_zycit029 WITH KEY codmod = 'D'
codigo = /pws/zycie403-codigo
land1 = t001-land1.
IF sy-subrc EQ 0.
MOVE itab_zycit029-descricao TO /pws/zycit029-descricao.
ENDIF.
ENDMODULE.
MODULE status_0231 OUTPUT.
IF v_acto = 'A'.
SET PF-STATUS '0231' EXCLUDING 'REPL_A'.
...
...
CLEAR: /pws/zycie100a-ajuste.
ENDIF.
IF /pws/zycie403-base <= 0.
CLEAR: /pws/zycie100a-ajuste.
MESSAGE i039 WITH text-235.
ENDIF.
ENDMODULE.
MODULE status_custom_0100 OUTPUT.
PERFORM status_custom.
ENDMODULE.
* >> Início da inclusão:
MODULE carrega_totais OUTPUT.
LOOP AT itab_zycit403_i.
IF itab_zycit403_i-condicoes EQ 'P'.
/pws/zycie403-valorusdp = /pws/zycie403-valorusdp +
itab_zycit403_i-valorrec.
ELSEIF itab_zycit403_i-condicoes EQ 'G'.
/pws/zycie403-valorusdg = /pws/zycie403-valorusdg +
itab_zycit403_i-valorrec.
ELSEIF itab_zycit403_i-condicoes EQ 'C'.
/pws/zycie403-valorusda = /pws/zycie403-valorusda +
itab_zycit403_i-valorrec.
ENDIF.
ENDLOOP.
ENDMODULE.
* << Fim da inclusão