Árvore de páginas

Ponto de entrada TRM070AG

Esse Ponto de Entrada é executado antes da gravação de cada item no arquivo de Cursos do Funcionário (RA4).

Linha de Produto:

Microsiga Protheus

Segmento:

Recursos Humanos

Módulo:

SIGAGPE

Tickets relacionados

DRHPONTP-1230

Requisito/Story/Issue (informe o requisito relacionado):

990269

Descrição

Este Ponto de Entrada será executado antes da gravação da baixa de treinamento na pasta cursos do funcionário.


O retorno da customização deverá ser do tipo Lógico onde:

.T. - (Default) - Permite a gravação dos registros no arquivo RA4 (Cursos de Funcionário).

.F. - Os registros no arquivo RA4 (Cursos do Funcionário) não são gravados.


Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function TRM070AG()

Local lGrava := .T.

 

DbSelectArea("SRA")

DbSetOrder(1)

 

If !( DbSeek( RA4->(RA4_FILIAL+RA4_MAT) ) )

lGrava := .F.

EndIf


Return lGrava