Linha Microsiga Protheus

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 3 minutos


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:

Atend. Enfermagem (MDTA161)

País:Brasil
Ticket:Não há.
Issue:Não há.


02. DESCRIÇÃO

Criação do ponto de entrada MDTA1611 no momento da montagem da tela do Atendimento de Enfermagem Diário para a possibilitar a visualização de novos campos criados na tabela TL5.


Ponto de EntradaMDTA1611()
ChamadaNa execução da rotina Atend. Enfermagem (MDTA161).
Pré-RequisitoCadastros nas rotinas Centro de Custo, Função, Funcionário, Ficha Médica e SESMT/Usuar, Atend..
EventoNovos campos personalizados na tela do Atendimento de Enfermagem Diário.
RetornoCampos personalizados.

03. DEMAIS INFORMAÇÕES

FunçãoMDTA1611()
ParâmetrosoPnlCmps, Objeto, painel em que estão os campos em tela.
Retorno.T., Lógico, retorna sempre verdadeiro.



Exemplo
#Include 'Protheus.ch'

User Function MDTA1611()

	Local oPanel := ParamIXB[1]//(Objeto) Painel para Criação dos campos em tela

         oPanel:nHeight := 700 //Aumenta o tamanho do painel, para comportar vários campos
         oPanel:Refresh()

	TGroup():New(280,02,275,380,"Especificos",oPanel,,,.T.)

	tSay():New( 291, 005, { | | OemtoAnsi( "Especifico" ) }, oPanel ,,,,,, .T. ,,, 200 , 010 )
	tGet():New( 290, 040, { | u | If( PCount() > 0, M->TL5_ESPECI := u, M->TL5_ESPECI ) }, oPanel, 20, 08, "@!" ,;
	,,,,,,.T.,,,,.F.,,,.F.,.F.,,'M->TL5_ESPECI',,,,.T.)

Return .T.


04. ASSUNTOS RELACIONADOS