Defeito #272
O.S. #00091173 - Alterar subprogramas B4001502 e I10015R9
100%
Descrição
Solicito que seja realizado alteração nos subprogramas B4001502 e I10015R9, conforme segue:
B4001502:
1- Ano/Mês de referência do lançamento:
Alterar o código que define/preenche a a variável #ANO-MES-REFERENCIA, que atualmente é preenchida com o ANO/MÊS da data da geração do lançamento e passar a preencher com o ANO/MÊS da data de entrada.
Diante do acima exposto venho solicitar:
Dentro do "FIND NOTA WITH ..." (linhas 508 a 529), na linha 528 incluir o código abaixo:
MOVE SUBSTRING TO #ANO-MES-REFERENCIA
Na DEFINE SUBROUTINE CALCULA-VENCIMENTO, excluir o código onde é preenchida a variável #ANO-MES-REFERENCIA (linhas 1567 a 1569)
2- Códigos que fazia a prorrogação de vencimento relativo ao Decreto 29505/2024:
Estes códigos estão em desuso visto que só tinha efeitos para os lançamentos gerados no período de 01/10/2024 a 15/02/2025.
Visando "economizar" processamento, bem como facilitar futuras análises e/ou intervenção neste subprograma com a eliminação de "lixo", venho solicitar:
No bloco que gera lançamento de valor maior que R$ 3,00, excluir todo o IF que chama a subroutine PRORROGA-VENCIMENTO (linhas 545 a 547)
No bloco que gera lançamento de valor igual ou menor que R$ 3,00, excluir todo o IF que chama a subroutine PRORROGA-VENCIMENTO (linhas 837 a 839)
Na DEFINE PRORROGA-VENCIMENTO, excluir toda a subroutine (linhas 939 a 975)
I10015R9:
1- Ano/Mês de referência do lançamento:
Alterar o código que define/preenche a a variável #ANO-MES-REFERENCIA, que atualmente é preenchida com o ANO/MÊS da data da geração do lançamento e passar a preencher com o ANO/MÊS da data de entrada.
Diante do acima exposto venho solicitar:
Dentro do "FIND NOTA WITH ..." (linhas 753 a 770), na linha 769 incluir o código abaixo:
MOVE SUBSTRING TO #ANO-MES-REFERENCIA
Na CALCULA-VENCIMENTO-REGULARIDADE, excluir o código onde é preenchida a variável #ANO-MES-REFERENCIA (linhas 1599 a 1601)
Arquivos
Subtarefas
Atualizado por Alisson Cleiton dos Santos há aproximadamente 1 mês
Em tempo:
Incluir a checagem do regime de pagamento '058' quando da checagem de Regime Especial:
B4001502:
Na DEFINE SUBROUTINE REGIME-ESPECIAL, alterar:
De: IF SITUACAO.IT-CO-SITUACAO-CONTRIBUINTE = '001'
Para: IF SITUACAO.IT-CO-SITUACAO-CONTRIBUINTE = '001' OR = '058'
I10015R9:
Na DEFINE SUBROUTINE CHECA-DESTINATARIO, alterar:
De: IF SITUACAO.IT-CO-SITUACAO-CONTRIBUINTE = '001'
Para: IF SITUACAO.IT-CO-SITUACAO-CONTRIBUINTE = '001' OR = '058'
Na DEFINE SUBROUTINE BUSCA-REGIME-ESPECIAL, alterar:
De: IF SITUACAO.IT-CO-SITUACAO-CONTRIBUINTE = '001'
Para: IF SITUACAO.IT-CO-SITUACAO-CONTRIBUINTE = '001' OR = '058'
Atualizado por Rebson Yuko Moraes há aproximadamente 1 mês
- Situação alterado de Nova para Resolvida
Atualizada conforme solicitado.