Módulo: CÂMBIO FINANCEIRO
Funcionalidade: Remessa
Data/Hora da Publicação: 25/01/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 11:38:21
Descrição da Nota: RECONTABILIZAÇÃO IRRF REMESSA DADOS RELEVANTES
Sintoma
Verificar porque o programa de remessa financeira não aceita o imposto que está registrado na tabela
/pws/zycat024. Isto é, COFINS e COFINS P.
Solução
Nos programas de: Remessa, Processar Boleto Remessa, Complemento do Boleto Remessa, Saída de
Pagamento Remessa, Arquivo Eletrônico Remessa e Relatório de Follow-up Remessas, fazer com que
considere o início do nome do imposto(CIDE,COFINS,IRRF,PIS,IOF,ISS), permitindo assim criar novos
impostos como (CIDE1, COFINS_A, PIS2, IOF_Z1, etc). Lembrando que a Remessa só pode ter um tipo de
imposto de IRRF, por exemplo, não podendo ter IRRF e IRRF2 na mesma.
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00723 Data: 25/01/2006 Hora: 14:11:44
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00723
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00098
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
RECONTABILIZAÇÃO IRRF REMESSA DADOS RELEVANTES
----------------------------------------------------------------------------------------------------
Palavras Chave:
RECONTABILIZAÇÃO IRRF REMESSA DADOS RELEVANTES
/PWS/ZYGLT321
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCA109F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCA109F01
...
itab_zycat025_aux-dedfat = 'X' ).
PERFORM preenche_estorna_contabeis USING 'PRINCIPAL'
/pws/zycbe124-belnr
/pws/zycbe124-dtdocto.
ENDIF.
* >> Início da exclusão: FORM EFETUA_ESTORNO
IF itab_zycat025_aux-advalorem = itab_zycat025-advalorem AND
itab_zycat025_aux-basecalc = itab_zycat025-basecalc AND
itab_zycat025_aux-vlimpme = itab_zycat025-vlimpme AND
itab_zycat025_aux-vlimpmi = itab_zycat025-vlimpmi AND
itab_zycat025_aux-reajbase = itab_zycat025-reajbase AND
itab_zycat025_aux-codrf = itab_zycat025-codrf AND
itab_zycat025_aux-dtlanc = itab_zycat025-dtlanc AND
itab_zycat025_aux-dtvencto = itab_zycat025-dtvencto AND
itab_zycat025_aux-frpagto_imp = itab_zycat025-frpagto_imp
AND w_ok NE 'TRASH'.
CONTINUE.
ENDIF.
* << Fim da exclusão
MESSAGE i061 WITH itab_zycat025_aux-tpimp '-' text-162 text-163.
PERFORM preenche_estorna_contabeis USING itab_zycat025_aux-tpimp
itab_zycat025_aux-belnr_pr
itab_zycat025_aux-dtlanc.
ELSE.
...
...
ENDIF.
ENDIF.
ELSE.
READ TABLE itab_zycat025 WITH KEY tpimp = p_tpimp.
IF sy-subrc NE 0 OR itab_zycat025 NE itab_zycat025_aux.
* >> Início da inclusão: FORM VERIF_ALTERACOES_RELEVANTES
IF p_tpimp EQ 'IRRF' AND
itab_zycat025_aux-advalorem EQ itab_zycat025-advalorem AND
itab_zycat025_aux-basecalc EQ itab_zycat025-basecalc AND
itab_zycat025_aux-vlimpme EQ itab_zycat025-vlimpme AND
itab_zycat025_aux-vlimpmi EQ itab_zycat025-vlimpmi AND
itab_zycat025_aux-reajbase EQ itab_zycat025-reajbase AND
itab_zycat025_aux-codrf EQ itab_zycat025-codrf AND
itab_zycat025_aux-dtlanc EQ itab_zycat025-dtlanc AND
itab_zycat025_aux-dtvencto EQ itab_zycat025-dtvencto AND
itab_zycat025_aux-frpagto_imp EQ itab_zycat025-frpagto_imp AND
w_ok NE 'TRASH'.
CLEAR p_estorna.
ELSE.
* << Fim da inclusão
p_estorna = 'X'.
EXIT.
* >> Início da inclusão: FORM VERIF_ALTERACOES_RELEVANTES
ENDIF.
* << Fim da inclusão
ENDIF.
IF itab_zycbt141_i_aux2[] NE itab_zycbt141_i2[].
p_estorna = 'X'.
EXIT.
ENDIF.
...