Histórico da Página

Ponto de Entrada SitFol106 para alterar a situação do funcionário no totalizador do relatório da Folha de Pagamento

Características do Requisito

Linha de Produto:	Microsiga Protheus
Segmento:	Recursos Humanos
Módulo:	SIGAGPE
Rotina	GPER106 - Relatório da Folha de Pagamento

Ponto de Entrada

Descrição:	Permite alterar a Situação do funcionário utilizada no totalizador do relatório da folha de pagamento.
Localização:	SIGAGPE - Relatórios - Periódicos - Folha de Pagamento
Eventos:	Impressão do relatório personalizável da Folha de Pagamento, GPER106, com totalizador por filial, unidade de negócio ou empresa.
Programa Fonte:	GPER106
Retorno:	Array com quatro posições tendo a seguinte estrutura: aReturn[1], Caracter, Situação ( " " = Normal; "A" = Afastado; "F" = Férias; "T" = Transferido; "D" = Demitido) aReturn[2], Caracter, Codigo Afastamento FGTS (RA_AFASFGT) aReturn[3], Caracter, Código Rescisão RAIS (RA_RESCRAI) aReturn[4], Data, Data de Demissão (Se a data de demissão for menor que a data final do período o funcionário será impresso com situação normal) Um array com a mesma estrutura é passado por parâmetro, PARAMIXB[1], esse parâmetro contém as informações que o sistema usa no padrão.

Totvs custom tabs box

tabs	Exemplo,Impressão do relatório
ids	exemplo,sistema

Totvs custom tabs box items

default	yes
referencia	exemplo

No exemplo abaixo alteramos a situação do funcionário que foi transferido, ao imprimir o relatório no período em que ocorreu a transferência.

Bloco de código

language	cpp
theme	Confluence
firstline	1
linenumbers	true

#INCLUDE "TOTVS.CH"

/*/{Protheus.doc} SitFol106
Altera a Situação do funcionário para o totalizador do relatório da Folha, GPER106
@type  User Function
@author User
@since 27/03/2020
@return aSituacao, Array, Array com as informações sobre a situação do funcinoário
		aReturn[1] := SRA->RA_SITFOLH
		aReturn[2] := SRA->RA_AFASFGT
		aReturn[3] := SRA->RA_RESCRAI
		aReturn[4] := SRA->RA_DEMISSA
@see https://tdn.totvs.com/x/AfB3I
/*/
User Function SitFol106()
	
	Local aArea		:= GetArea()
	Local aSituacao := PARAMIXB[1]	// Informações sobre a situação do funcionário utilizadas por padrão
	Local dDtPerIni := PARAMIXB[2]	// Data Inicial do período que está sendo impresso
	Local dDtPerFim := PARAMIXB[3]	// Data final do período que está sendo impresso
	Local nTamFil	:= GetSx3Cache("RE_FILIALP", "X3_TAMANHO")
	
	// Tabela de Funcionários já está posicionada
	If SRA->(RA_TIPOADM $ "1C/2C/3C/9C") // Funcinário transferido
		
		dbSelectArea("SRE")
		SRE->(dbSetOrder(2)) // Empr.Destino + Fil. Destino + Mat. Destino + Dt.Transfer
		If SRE->(dbSeek(cEmpAnt + PadR(SRA->RA_FILIAL, nTamFil) + SRA->RA_MAT))
			If SRE->(RE_DATA >= dDtPerIni .And. RE_DATA <= dDtPerFim) // Transferência dentro do período
				aSituacao[1] := "T" // Altera situação para Transferido
			EndIf
		EndIf
		
	EndIf
	
	RestArea(aArea)
	
Return aSituacao

Totvs custom tabs box items

default	no
referencia	sistema

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;
}

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>

Árvore de páginas

Versões comparadas

Versão antiga 5

Nova versão 6

Chave

Ponto de Entrada SitFol106 para alterar a situação do funcionário no totalizador do relatório da Folha de Pagamento

Características do Requisito

Ponto de Entrada