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: |
| ||||
Cadastros Iniciais: |
| ||||
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: |
| ||||||||
Parâmetros: |
|
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
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!