01. DADOS GERAIS
Produto: | TOTVS Medicina e Segurança do Trabalho |
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | Serviços |
Módulo: | TOTVS RH (Linha Protheus) - Medicina e Segurança do Trabalho (SIGAMDT) |
Função: | Enc. Especialista (MDTA925) |
Ticket: | Não há. |
Issue: | Não há. |
02. SITUAÇÃO/REQUISITO
Atualização documentação PE da rotina Enc. Especialista (MDTA925). O ponto de entrada MDTA9251 permite realizar a impressão de valores específicos ao final do relatório de encaminhamento.
Esse Ponto de entrada tem a finalidade de imprimir valores específicos ao final do relatório de encaminhamento, logo antes da saudação de finalização.
03. SOLUÇÃO
Ponto de Entrada | MDTA9251() |
---|---|
Chamada | Na impressão do relatório. |
Pré-Requisito | Ter um encaminhamento ao médico especialista. |
Evento | Imprime uma mensagem no final do relatório, conforme configurado no fonte. |
Retorno | Pode retornar uma mensagem de aviso ou uma observação sobre o relatório de encaminhamento ao médico especialista no final do relatório, por exemplo, solicitando uma urgência no encaminhamento. |
04. DEMAIS INFORMAÇÕES
Função | MDTA1452() |
---|---|
Parâmetros | aParam - Array contendo duas posições sendo que a primeira é o objeto de impressão e a segunda a linha em que deve ser iniciada a impressão. |
Retorno | lin - Valor de linha em que encerrou a impressão específica. |
#include 'protheus.ch' User Function MDTA9251() Local aParam := PARAMIXB Local lin := aParam[ 2 ] Local oPrint := aParam[ 1 ] Local oFont14 := TFont():New("Arial",13,13,,.F.,,,,.F.,.F.) lin += 80 oPrint:Say( lin , 280 , "Observação" , oFont14 ) lin += 80 oPrint:Say( lin , 200 , "Favor proceder com urgência" , oFont14 ) Return lin
05. ASSUNTOS RELACIONADOS.
Não há.