| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | Recibo (biometria) (MDTA333) |
| País: | Brasil |
| Ticket: | Não há. |
| Issue: | Não há. |
Ponto de entrada MDTA3332 criado é chamado na rotina de Recibo (biometria) (MDTA333) após a impressão do recibo de entrega do EPI.
|
| Ponto de Entrada | MDTA3332() |
|---|---|
| Chamada | Após a impressão do recibo de entrega do EPI. |
| Pré-Requisito | Já ter cadastrado no sistema um funcionário + Ficha Médica, EPI e Fornecedor. |
| Evento | Não há. |
| Retorno | Não há. |
| Função | MDTA3332() |
|---|---|
| Parâmetros | lDevol, Array, determina se é uma devolução de EPI |
| Retorno | Não há. |
#Include "Protheus.ch"
User Function MDTA3332()
lDevol := PARAMIXB[1] //Determina se é devolução.
RecLock("TNF",.F.)
TNF->TNF_DTRECI := STOD("")
TNF->(MsUnLock())
Return |