Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • PLVALAD1 - Altera Cobrança
  • Criado por Usuário desconhecido (ana.lira), última alteração por admin em 24 jun, 2012

Ponto-de-Entrada: PLVALAD1 - Altera Cobrança
Descrição: 
O ponto de entrada PLVALAD1 em conjunto com o PLVALAD2 permite alterar de cobrança da Taxa de Adesão de 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

PLVALAD1 - Altera Cobrança ( [ cMatric ], [ cMes ], [ cAno ] ) --> aRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cMatric Caracter Matrícula do usuário
cMes Array of Record Mês em que será avaliada a cobrança
cAno Array of Record Ano em que será avaliada a cobrança
Retorno
    aRet(array_of_record)
  • Array contendo:
    [1] - Boolean indicando que o sistema irá verifica o valor para cobrança e a faixa, mesmo que já tenha sido cobrada (indicado através do BA1_CBTXAD).

    O usuário pode retornar mais informações neste Array para serem utilizadas no PLVALAD2.
Exemplos 
User Function PLVALAD1Local cMatric := paramixb[1]Local cAno    := paramixb[2]Local cMes    := paramixb[3]Local lRet    := .F.Local aRet    := {}                   //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿//³ Tratamento de acordo com a Regra do cliente                ³//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙaadd(aRet,lRet)aadd(aRet,cAno) // Neste exemplo vou retornar o Ano e Mes aadd(aRet,cMes) // para serem utilizados no PE PLVALAD2 Return(aRet)//Verificar o exemplo do PE PLVALAD2  em sua respectiva documentação