| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | Atestado Medico (MDTA685) |
| País: | Brasil |
| Ticket: | Não há. |
| Issue: | Não há. |
Ponto de entrada MDTA6854 na rotina Atestado Médico (MDTA685) após a inclusão de um Atestado Médico, possibilitando a alteração da tabela TNY.
| Ponto de Entrada | MDTA6854 |
|---|---|
| Chamada | Ao realizar a inclusão de um Atestado Médico na rotina. |
| Pré-Requisito | Existir um atestado. |
| Evento | Alteração da tabela TNY. |
| Retorno | Retorno verdadeiro assim que for realizada a inclusão do Atestado Médico, o ponto de entrada deverá ser executado em tela. |
| Função | MDTA6854() |
|---|---|
| Parâmetros | Local nOpcao, Array, armazena os parâmetros. |
| Retorno | .T., Lógico, retorno lógico sempre verdadeiro ao realizar a inclusão de um atestado médico na rotina. |
#include "Protheus.ch"
]
User Function MDTA6854()
Local nOpcao := PARAMIXB[1] //Selecionar o primeiro parâmetro
If nOpcao == 3 //Caso seja Inclusão.
RecLock("TNY",.F.)
TNY->TNY_OBSERV := "Observação do Atendimento Médico."
TNY->(MsUnlock())
EndIf
Return .T. |