Linha Microsiga Protheus

Árvore de páginas


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:Exames P/ Admissao (MDTA275)
País:Brasil
Ticket:Não há.
Issue:Não há.


02. DESCRIÇÃO

Ponto de entrada MDT2751 criado para que seja possível adicionar componentes na tela de Exames da rotina de Exames p/ Admissão (MDTA275).


Ponto de EntradaMDT2751
ChamadaEntrada da rotina.
Pré-RequisitoPossuir cadastro de funcionários.
EventoCampos personalizados na tela de exames da rotina.
RetornoNovos campos personalizados conforme necessidade.

03. DEMAIS INFORMAÇÕES

FunçãoMDT2751()
Parâmetros

Não há.

RetornoNulo



Exemplo
#include "protheus.ch"
 
User Function MDT2751()
    dbSelectArea("SRA")
    dbSetOrder(1)
    dbSeek(xFilial("SRA") + TM0->TM0_NUMFIC)
     
    @ 31,096  
    SAY OemToAnsi("Função")
    Pixel @ 29,120  
    MSGET SRA->RA_CODFUNC Picture "@!" SIZE 40,8 WHEN .f. Pixel
     
    dbSelectArea("SRJ")
    dbSetOrder(1)
    dbSeek(xFilial("SRJ") + SRA->RA_CODFUNC)
     
    @ 31,165 
    SAY OemToAnsi("Descrição")
    Pixel @ 29,195 
    MSGET SRJ->RJ_DESC Picture "@!" SIZE 130,8 WHEN .f. Pixel
     
Return


04. ASSUNTOS RELACIONADOS