Linha Microsiga Protheus

Árvore de páginas

Ponto de entrada no Atestado Médico para gravação de Afastamento

Características do Requisito

Linha de Produto:

Microsiga Protheus.

Segmento:

Serviços.

Módulo:

Medicina e Segurança do Trabalho (SIGAMDT).

Rotina:

Rotina

Nome Técnico

MDTA685 

Atestado Médico

Cadastros Iniciais:

- Centro Custos.
- Funções.
- Funcionários.
- Ficha Médica.

Parâmetro(s):

MV_MDTGPE - S
MV_NGMDTAF - S

Ponto de Entrada:

MDTA6853 

País(es):

Todos

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

CTT - Centro de Custo.
SRJ - Funções.
SRA - Funcionários.
TM0 - Ficha Médica.
TNY - Atestados Médicos.

Sistema(s) Operacional(is):

Windows e Linux  

Descrição

Realizado a criação do ponto de entrada MDTA6853 na rotina de Atestado Médico (MDTA685), para que seja permitido incluir informações na gravação do afastamento. 

 

Ponto de Entrada

Descrição:

Atendimento Médico.

Localização:

Atestado Médico.

Eventos:

Atestado Médico.

Programa Fonte:

MDTA685

Função:

Medicina e Segurança do Trabalho (SIGAMDT).

Retorno:

Nome

Tipo

Descrição

Obrigatório

aAfasta[1,1]

Array

Retorna o nome do campo que será adicionado o valor.

Sim

aAfasta[1,2]

Array

Retorna o valor que será gravado.

Sim

 

Exemplo:

#Include 'Protheus.ch'

User Function MDTA6853()

Local aAfasta := {}

   aAdd( aAfasta , { "R8_NUMID" , "Valor" } ) // Campo que receberá o valor ##  Valor que será gravado
    aAdd( aAfasta , { "R8_EMPPG" , "V" } ) // Campos que receberá o valor ##  Valor que será gravado

Return aAfasta