Roteiro - Função Somar Incidências FSOMAINC -- 10272

1864 SomaInc

oBjetivo = Somar as verbas na matriz aPd conforme incidências solicitadas.

Sintaxe = SomaInc(aPd,nElem,nBas,nCond1,cPar1,nCond2,cPar2,nMes,lSemana,aCodFol)

aPd = Matriz com as verbas para somatório
nElem = Incidência a ser somada conforme posição na matriz aPdV
nBas = Variável de retorno as somatória
nCond1 = Elemento para 1o.condição, conforme posição na matriz aPdV
cPar1 = Parâmetro para a 1o.condição ("S" ou "N" ).
nCond2 = Elemento para 2o.condição, conforme posição na matriz aPdV
cPar2 = Parâmetro para a 2o.condição ("S" ou "N" ).
nMes = Se desejar especificar o mês de pagamento a ser somado.
lSemana = .T. soma todas as semanas do mês, e .F. soma somente a semana do calculo.
aCodFol = Matriz com os identificadores de calculo.


Exemplos de Funções para somatório de verbas checando incidências.
_________________________________________________________________

Total de Proventos:
------------------
nTotProv := 0.00 -> Variável de retorno do total de proventos
aEval( aPd, { |x| SomaInc(X,1,@nTotProv, , , , , , ,aCodFol})

Total de Descontos
------------------
nTotDesc := 0.00 -> Variável de retorno do total de Descontos
aEval( aPd, { |x| SomaInc(X,2,@nTotDesc, , , , , , ,aCodFol})

Liquido
-------
nTotLiq := 0.00 -> Variável de retorno do valor liquido
aEval( aPd, { |x| SomaInc(X,0,@nTotLiq, , , , , , ,aCodFol})

Base de Inss sem 13o. salário.
-----------------------------
nInssBas := 0.00
aEval( aPd, { |x| SomaInc(X,4,@nInssBas,12 ,"N" , , , , ,aCodFol})

Base de Ir sem férias e 13o. salário.
------------------------------------
nInssBas := 0.00
aEval( aPd, { |x| SomaInc(X,5,@nIrBas,11 ,"N" ,12 ,"N" ,,,aCodFol})