Home

Linha Microsiga Protheus

Páginas filhas
  • PNM060SRA - Recebimento de abono -- 10431

Ponto-de-Entrada: PNM060SRA - Recebimento de abono
Versões: Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição:

Selecionar os funcionários a receber abono em "Abono Coletivo" (PONM060).
Na rotina "Abono Coletivo" (PONM060), este ponto de entrada permite selecionar os funcionários que deverão ter abono conforme definição dos parâmetros, sendo que é chamado para cada funcionário e seu retorno permite a continuidade do processo ou a leitura do próximo funcionário.

Programa Fonte
PONM060.PRW
Sintaxe

PNM060SRA - Recebimento de abono ( ) --> lRetorno

Retorno
    lRetorno(logico)
  • Deve-se retornar um conteúdo lógico definindo se considera o funcionário lido.
Observações

Retorno

Define se retorna um conteúdo lógico, considerando o funcionário lido, sendo:

  • .T. -> Considera o funcionário
  • .F. -> Desconsidera o funcionário

Procedimentos para Implementação

  1. No RdMake, obter o array enviado.
  2. Realizar os procedimentos necessários.
Exemplos
Exemplo de implementação do ponto de entrada PONM060SRA:Neste exemplo, o campo RA_BUSUSER é um campo de usuário que identifica o ônibus fornecido pelaempresa e utilizado pelo funcionário para transporte até o local de trabalho. Quando esse campoé definido como "0" (zero), o funcionário não utiliza o ônibus. A empresa deseja abonar um determiando dia para os funcionários que utilizam o ônibus.#INCLUDE 'RWMAKE.CH'USER FUNCTION PNM060SRA()Local lRet    :=  .T.If   (SRA->RA_BUSUSER == 0 )    lRet:= .F.EndifRETURN (lRet)