Ponto-de-Entrada: PLVALAD2 - Alteração de Valor
Descrição:
O ponto de entrada PLVALAD2 em conjunto com o PLVALAD1 permite alterar o valor que será cobrado de Taxa de Adesão para um usuário.
Os pontos são chamados nas rotinas de Cobrança de Faturamento, botão "Valor Cobrança" da Família/Usuário, ou seja, em todas as rotinas que apuram o valor de cobrança de um usuário para o Mês/Ano informado.
No ponto de entrada PLVALAD1 é retornado um Array com as informações desejadas, e no PLVALAD2 é retornado o novo valor de cobrança para a Taxa de Adesão do usuário.
Programa Fonte
PLSMCOB2
Sintaxe
PLVALAD2 - Alteração de Valor ( [ cMatric ], [ nValorFaixa ], [ aEspecifico ] ) --> nValorFaixa
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| cMatric | Caracter | Matrícula do usuário | |||||||||||||||
| nValorFaixa | Array of Record | Valor da faixa calculada pelo sistema. | |||||||||||||||
| aEspecifico | Array of Record | Array específico retornado pelo Ponto de Entrada PLVALAD1 * Verificar documentação desse ponto de entrada. |
Retorno
-
nValorFaixa(numerico)
- Valor da faixa que será cobrado do usuário
Exemplos
User Function PLVALAD2Local cMatric := paramixb[1]Local nValorFaixa := paramixb[2]Local aEspecifico := paramixb[3]Local cAno := aEspecifico[2]Local cMes := aEspecifico[3] //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿//³ Neste exemplo estarei utilizando o Array aEspecífico ³//³ enviado do exemplo do PE PLVALAD1, verificar a documentação ³ //³ do mesmo. ³//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙIf cMatric == "9999999999999999" //Nao irei cobrar se for Fevereiro ou Março de 2010 If (cMes == "02" .And. cAno == "2010") .Or. (cMes == "03" .And. cAno == "2010") nValorFaixa := 0 EndIfEndIfReturn (nValorFaixa)