Árvore de páginas

Este Ponto de Entrada é Válido para Protheus 12 a partir do Release 12.1.7 - Expedição Ago/ 2016 ou para Protheus 11 a partir do Release 11.80.17 - Expedição Ago/2016.

 

Ponto de Entrada para realizar validações do Funcionário para Geração da Ficha Médica

Características do Requisito

 

Linha de Produto:

Microsiga Protheus.

Segmento:

Serviços.

Módulo:

Medicina e Segurança do Trabalho (SIGAMDT).

Rotina:

Rotina

Nome Técnico

MDTA001

Gerar Ficha Médica

Cadastros Iniciais:

GPEA010 - Funcionários.

País(es):

Todos.

Sistema(s) Operacional(is):

Windows/Linux.

Ponto de Entrada

Descrição:

Ponto de entrada MDTA0011 criado para possibilitar filtrar os funcionários a serem considerados para geração das Fichas Médica.

Localização:

SIGAMDT: Miscelânea\Implantação\Gerar Ficha Médica

Eventos:

Gerar Ficha Médica

Programa Fonte:

MDTA001.prx

Função:

MDTA0011().

Retorno:

Nome

Tipo

Descrição

Obrigatório

aRetValid

Array

Array bidimensional onde a primeira posição corresponde ao retorno da consistência e a segunda a mensagem de rejeição.

Ex.:

aRetValid[ 1 ] = .F.

aRetValid[ 2 ] = "Funcionário não está entre as matrículas especificadas."

X

 

Exemplo:

#Include "Protheus.ch"

User Function MDTA0011()

Local aRetValid := {}

If SRA->RA_MAT >= "000001" .And. SRA->RA_MAT <= "000003"

 aRetValid := { .T. , "" }
Else

 aRetValid := { .F. , "Funcionário não está entre as matrículas especificadas." }
EndIf


Return aRetValid