Árvore de páginas

Ponto de entrada para inclusão de novos campos na tela de Atendimento de Enfermagem

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

MDTA161

Atendimento de Enfermagem Diário

Cadastros Iniciais:

  • Centro de Custo
  • Função
  • Funcionário
  • Ficha médica
  • Enfermeiro

País(es):

Brasil

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

TL5

Sistema(s) Operacional(is):

Windows e Linux  

Descrição

Criação do ponto de entrada 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 Entrada

Descrição:

Atualizações

Localização:

Informe o Submenu em que estará localizada a rotina

Eventos:

Atendimento Médico\ Atend. Enfermagem

Programa Fonte:

MDTA161.PRX

Função:

MDTA1611()

Retorno:

Nome

Tipo

Descrição

Obrigatório

 .T.

Lógico

Retorna sempre verdadeiro

Sim

Parâmetros:
NomeTipo Descrição Obrigatório

oPnlCmps

ObjetoPainel em que estão os campos em telaSim

 

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.

1 comentário

  1. Anônimo

    Quando adiciona mais de 4 campos específico na tela o sistema não permite rolar a barra de rolagem mais que o padrão, será necessário rever a variável Scrol para acompanhar os novos campos deste ponto de entrada para não ficar limitado a quantidade de campos a serem inseridos na tela!