Histórico da Página

...

Painel

borderColor	white
bgColor	black
titleColor	white
borderWidth	0
borderStyle	solid

IfcIncidRRF $ "31|32|33|34".AND.cTipo $ "2|4"



                nEmplTafValue   := ( cAlias )->V3N_VALOR
                nEmplErpValue   := ( cAlias )->V3N_VALOR
                lRet            := .T.

            EndIf
            
            If cIncidRRF $ "31|32|33|34"
                
                If cTipo $ "2|4"

                    nDmTafVal   += ( cAlias )->V3N_VALOR
                    nDmErpVal   += ( cAlias )->V3N_VALOR
                    lRet        := .T.

                ElseIf cTipo $ "1|3"

                    nDmTafVal   -= ( cAlias )->V3N_VALOR
                    nDmErpVal   -= ( cAlias )->V3N_VALOR
                    lRet        := .T.

                EndIf

            ElseIf cIncidRRF $ "11|12|41|42|46|47|51|52|54|61|63|64|67|70|71|72|73|74|75|76|77|79|700|701|7900|7950|7951|7952"
                nDmTafVal       := 0
                nEmplTafValue   += 0
                lRet            := .T.
            ElseIf cIncidRRF $ "7952|7953|7954|7955|7956|7957|7958|7959|7960|7961|7962|7963|7964|9011|9012|9014|9031|9032|9034|9831|9832|9834|9041|9042|9046|9047|9051|9052|9054|9061|9062|9063|9064|9067|9082|9083"
                nDmTafVal       := 0
                nEmplTafValue   += 0
                lRet            := .T.
            EndIf

As quebras estão de um forma genérica pois o foco da parte sintética era mostrar apenas valores retidos. Para a parte analítica a quebra deve ser feita conforme tipo de <tpInfoIR>.

Pseudo código:

Painel

borderColor	white
bgColor	black
titleColor	white
borderWidth	0
borderStyle	solid

cIncidRRF = ( cAlias )->V3N_ITIRRF

If cIncidRRF $ "11|12|13"

nRendimentoTributaveis := ( cAlias )->V3N_VALOR

ElseIf cIncidRRF $ "31|32|34"

nRetencoesIRRF := ( cAlias )->V3N_VALOR

ElseIf cIncidRRF $ "9082|9083"

nCompensacaoJudical := ( cAlias )->V3N_VALOR

EndIf

Pontos de Ajuste:

Seq.

Nome da Atividade

Descrição do Desenvolvimento

1

Dicionário

Criação do campo V3N_CRMEN gravação da tag totApurMen\CRMen na V3N

Sugestão para o campo:

X3_CAMPO	X3_TIPO	X3_TAMANHO	X3_DECIMAL	X3_TITULO	X3_DESCRIC	X3_PICTURE
V3N_CRMEN	C	6	0	Cod. Receita	Código de Receita	@!
V3N_VLRCRM	N	14	2	Vlr. CR Men	Valor relativo ao Imposto de Renda Retido na Fonte	@E 99,999,999,999.99

A tag que ira alimentar o campo é <CRMen> V3N_CRMEN recebendo os valores:

056107 - IRRF mensal, 13° salário e férias sobre trabalho assalariado no país ou ausente no exterior a serviço do país, exceto se contratado por empregador doméstico ou por segurado especial sujeito a recolhimento unificado
056108 - IRRF mensal e férias - Empregado doméstico
056109 - IRRF 13° salário na rescisão de contrato de trabalho - Empregado doméstico
056110 - IRRF - Empregado doméstico 13º salário
056111 - IRRF - Empregado/Trabalhador rural - Segurado especial
056112 - IRRF - Empregado/Trabalhador rural - Segurado especial 13° salário
056113 - IRRF - Empregado/Trabalhador rural - Segurado especial 13° salário rescisório
058806 - IRRF sobre rendimento do trabalho sem vínculo empregatício
061001 - IRRF sobre rendimentos relativos a prestação de serviços de transporte rodoviário internacional de carga, pagos a transportador autônomo PF residente no Paraguai
353301 - Proventos de aposentadoria, reserva, reforma ou pensão pagos por previdência pública
356201 - IRRF sobre participação dos trabalhadores em lucros ou resultados - PLR
188901 - Rendimentos Recebidos Acumuladamente - RRA

A Tag que ira alimentar o campo V3N_VLRCRM <vlrCRMen>

2

TAFA422

TAF422Grv

Criação de uma nova #DEFINE para ser passado no array aAnalitico com o valor das TAG de código receita.

3

TAFESOCIALREPORT
Ajuste da Upsert()

Ajustar a função para que faça o INSERT do valor no campo novo criado na V3N.

4

WSTAF010

FilIRRFSynthetic : Necessário incluir os campos novos na query pois será possível filtrar pelo código <CRMen> tendo um visão similar com a DCTFWEB (Avaliar com o Evandro informação não esta no MOCK)

X

TAFA250

TAFA266
TAFA280

TAFA423

TAFCHARGERPT

Avaliar se a mudança do UPSERT não afetara os processos das rotinas que fazem uso deste método e se não será necessário alteração no tamanho do array nas funções
de grv(), xml() e SaveModel().

Avaliar todos os processos de CRUD destas rotinas por meio de integração e de modo manual, pois todo o processo para este evento é relacionado com a V3N para garantir
a persistência dos dados.

...

Árvore de páginas

Versões comparadas

Versão antiga 15

Nova versão 16

Chave