PE MDTA3331 Recibo EPI Por Biometria

01. DADOS GERAIS

Produto:	TOTVS Medicina e Segurança do Trabalho
Linha de Produto:	Linha Protheus
Segmento:	RH
Módulo:	TOTVS RH (Linha Protheus) - Medicina e Segurança do Trabalho (SIGAMDT)
Função:	Recibo (biometria) (MDTA333)
País:	Brasil
Ticket:	Não há.
Issue:	Não há.

Ponto de Entrada MDTA3331 chamado na rotina de Recibo (biometria) (MDTA333) após a confirmação da entrega de epi.

Ponto de Entrada	MDTA3331
Chamada	Ao confirmar a tela de entrega de EPIs na rotina, o ponto de entrada MDTA3331 será chamado.
Pré-Requisito	MV_BIOVLDR = 1. MV_BIOWERE = 1. MV_NG2BIOM = 1.
Evento	Confirmação da Entrega de EPI.
Retorno	Ponto de entrada executado quando a entrega de EPI for realizada com sucesso na rotina.

Função

MDTA3331()

Parâmetros

lRet, Lógico, Retorna verdadeiro ou falso.

aEpiProg, Array, Armazena os EPIs.

Retorno

lRet, Lógico, Retorna verdadeiro ou falso.

Exemplo

#Include "Protheus.ch"

User Function MDTA3331()

	Local lRet := .F.

	If Len(aEpiProg) > 0 //Array com os Epis
    	lRet := .T.
	EndIf

Return lRet