Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Ana Karolina Holmes Coelho

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Ana Karolina Holmes Coelho

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Tempo aproximado para leitura: 10 min

01. DADOS GERAIS

Produto:

Solucoes_totvs_parceirosexptotvs
SolucaoParcsExpsTOTVSTOTVS Medicina e Segurança do Trabalho

Linha de Produto:

Linhas_totvs
SegmentoDistribuição
RegionConstrução Projetos
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoServiços

Módulo:

Modulos_totvs_rh
ModulosTOTVSRHTOTVS RH (Linha Protheus) - Medicina e Segurança do Trabalho (SIGAMDT)

Função:Gerar Programação (MDTA190)
Ticket:Não há.
Issue:Não há.


02. SITUAÇÃO/REQUISITO

É necessário retornar uma lista dos Aso's do funcionárioAtualização documentação de Ponto de Entrada da rotina Gerar Programação (MDTA190).

03. SOLUÇÃO

Criado uma função MDTRetAso( cFil, cMat ) para buscar os Asos's por matrícula e filial e a função MDTMsAso() que chamada no fonte retorna os Aso's do funcionário selecionadoO Ponto de Entrada MDTA1901 foi criado para possibilitar a inclusão de mais tipos de exames a serem considerados na Programação de Exames.


04. DEMAIS INFORMAÇÕES

Função:MDTRetAso( cFil, cMat )
Parâmetros:cFil (Filial do funcionário), cMat (Matrícula do funcionário)
Retorno:aAsos (Array contendo a numeração dos atestados do funcionário)
Bloco de código
themeEclipse
titleExemplo
Function MDTRetAso( cFil, cMat )

	Local aAsos := {}
	Local cFicha := ''

	Default cFil := xFilial( 'TM0' )

	cFicha := Posicione( 'TM0', 3, cFil + cMat, 'TM0_NUMFIC' )
	
	dbSelectArea( 'TMY' )
	dbSetOrder( 2 )

	If dbSeek( cFil + cFicha )

		While ( 'TMY' )->( !Eof() ) .And. cFil == TMY->TMY_FILIAL .And. cFicha == TMY->TMY_NUMFIC

				aAdd( aAsos, TMY->TMY_NUMASO )

			( 'TMY' )->( dbSkip() )

		End

	EndIf

Return aAsos


Templatedocumentos


HTML
<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>


05. ASSUNTOS RELACIONADOS.

Não há.