Linha Microsiga Protheus

Árvore de páginas

Tempo aproximado para leitura: 10 min

01. DADOS GERAIS

Produto:

TOTVS Medicina e Segurança do Trabalho

Linha de Produto:

Linha Protheus

Segmento:

Serviços

Módulo:Medicina e Segurança do Trabalho (SIGAMDT)
Função:Agenda Médica (MDTA076)
Ticket:

18747072

Issue:DNG-22323


02. SITUAÇÃO/REQUISITO

Solicitação de criação de um ponto de entrada na rotina de Agenda Médica (MDTA076) para o preenchimento automático do campo Hora Chegada com o atual horário.

03. SOLUÇÃO

Ponto de EntradaMDTA0761()
ChamadaRotina de Agenda Médica (MDTA076), quando selecionada a opção Hora Chegada nas opções para o horário selecionado.
Pré-RequisitoExistir um atendimento médico agendado no horário selecionado.
Evento

Ao selecionar um horário que tem um atendimento médico agendado e selecionar a opção de Hora Chegada, o sistema dispara o ponto de entrada.

Retorno

O ponto de entrada tem como objetivo preencher o horário do campo Hora Chegada com o horário atual.

04. DEMAIS INFORMAÇÕES

Função:MDTA0761()
Parâmetros:Não há.
Retorno:Não há.
Exemplo
#include 'protheus.ch'

User Function Mdta0761()

    // Campo TMJ_HRCHGD (Hora Chegada) recebe a função Time() que informa a hora atual conforme Protheus.
    M->TMJ_HRCHGD := time()
    MsgStop( "Ponto de Entrada Mdta0761 Executado. A hora informada no campo Hora Chegada é:" + M->TMJ_HRCHGD )

Return





05. ASSUNTOS RELACIONADOS.

Não há.