DistribuiValorContasBancarias
Esta função é utilizada para carregar as variáveis de sistema de informações bancárias do colaborador, terceiro e dependente de pensão judicial, de acordo com a data passada como parâmetro.
Sintaxe: DistribuiValorContasBancarias(Numero xNumEmp, Numero xNumCad, Numero xTipCol, Numero xCodDep, Numero xDatRef, Numero xValTot);
Parâmetros:
Nome | Tipo | Descrição |
xNumEmp | Numérico | Código da empresa do colaborador. |
xTipCol | Numérico | Tipo do colaborador. |
xNumCad | Numérico | Cadastro do colaborador. |
xCodDep | Numérico | Código do dependente (quando informado buscará as informações bancárias do dependente de pensão judicial, senão busca as informações bancárias do colaborador). |
xDatRef | Numérico | Data de referência para buscar as contas bancárias, que seja igual ou a mais próxima a essa data. |
xValTot | Numérico | Valor total da conta. |
Tipo de Retorno: Carrega as seguintes variáveis de sistema:
CodBan,
CodAge,
TipBan,
ConBan,
DigBan,
PerCon,
ValConBan, QtdConBan e
HisCon.
Essas variáveis
possuem índices, pois um colaborador pode possuir até 50 registro de contas
bancárias.
Exemplo:
Colaborador possui um crédito de R$ 1.000,00 a ser distribuído conforme seu histórico de contas bancárias:
Banco | Agência | Tipo Conta | Conta | Dígito | Percentual |
1 | 1236 | 1 | 123654789 | 1 | 60,00 |
2 | 3654 | 2 | 965821423 | 40,00 |
DistribuiValorContasBancarias(R034FUN.NumEmp, R034FUN.NumCad, R034FUN.TipCol, 0, DatRef, xSalLiq);
@ Os retornos serão: @
CodBan[1] = 1;
CodBan[2] = 2;
CodAge[1] = 1236;
CodAge[2] = 3654;
TipBan[1] = 1;
TipBan[2] = 2;
ConBan[1] = 123654789;
ConBan[2] = 965821423;
DigBan[1] = 1;
DigBan[2] = ;
PerCon[1] = 60;
PerCon[2] = 40;
ValConBan[1] = 600,00;
ValConBan[2] = 400,00
QtdConBan = 2;
HisCon = S;
Utilização: Gerador de Relatórios, Regras e Cubos dos sistemas Administração de Pessoal, BS e PLR.