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: | Gerar Programação (MDTA190) |
| País: | Brasil |
| Ticket: | Não há. |
| Issue: | Não há. |
02. DESCRIÇÃO
Ponto de entrada MDTA190Fil criado na rotina Gerar Programação (MDTA190) para possibilitar que o sistema no momento de gerar Exames por Filial para os funcionários, para cada um dos exames deste tipo, será chamado o ponto de entrada que deverá retornar um conteúdo verdadeiro ou falso, indicando se este exame deverá ser gerado para o funcionário ou não.
| Ponto de Entrada | MDTA190Fil |
|---|---|
| Chamada | No momento da geração de Exames por Filial. |
| Pré-Requisito | Realizar a inclusão de uma Programação de Exames. |
| Evento | Tratamento na geração de Exames por Filial. |
| Retorno | Indica se o exame deverá ou não ser gerado para o funcionário. |
03. DEMAIS INFORMAÇÕES
| Função | MDTA190Fil() |
|---|---|
| Parâmetros | lRet, Lógico, Se o campo Centro de Custo existir na tabela de Exames por Filial, somente será gerado este exame para os funcionários pertencentes ao Centro de Custo informado. |
| Retorno | lRet, Lógico, Retorna verdadeiro ou falso indicando se o Exame por Filial deverá ser gerado para o funcionário. |
Exemplo
#include "Protheus.ch"
User Function MDTA190Fil
Local lRet := .t. /*Se o campo Centro de Custo existir na tabela de Exames por Filial,
somente será gerado este exame para os funcionários pertencentes ao C.Custo informado.*/
If TN9->(FieldPos("TN9_CC")) > 0
If SRA->RA_CC != TN9->TN9_CC
lRet := .f.
Endif
Endif
Return lRet
04. ASSUNTOS RELACIONADOS
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas