Ponto-de-Entrada: GPE610REM - Altera Valor da Remuneração sem 13º Salário de Funcionários Demitidos
Abrangências: | Microsiga Protheus 10 , Microsiga Protheus 11 |
Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
Compatível Países: | Brasil |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Português (Brasil) |
Descrição:
Ponto de entrada acionado apenas para funcionários demitidos, após apuração da remuneração sem 13º salário do funcionário.Este Ponto de Entrada altera o valor da remuneração apurada pelo sistema, acrescentando ou diminuindo seu valor. Uma vez executado, o valor enviado para SEFIP como remuneração sem 13ºSalário, será o valor retornado por este ponto na variável nRemRet, mesmo este sendo zerado.
Programa Fonte
GPEM610.PRX
Sintaxe
GPE610REM - Altera Valor da Remuneração sem 13º Salário de Funcionários Demitidos ( [ ] ) --> nRemRet
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
Array of Record |
Retorno
-
nRemRet (numerico)
Observações
Deverá retornar variavel nRemRet com valor da Remuneração sem 13º Salário.
Exemplos
#INCLUDE 'RWMAKE.CH' //TESTE PONTO ENTRADA GP610REMUSER FUNCTION GPE610REM()Local cTitulo := "Teste Ponto de Entrada GPE610REM" Local cMat := SRA->RA_MATLocal nRemRet := 0 dbSelectArea("SRC")dbSetOrder(1)SRC->( dbSeek(SRA->RA_FILIAL+SRA->RA_MAT))While !Eof() .And. (!lRat .And. SRC->RC_FILIAL+SRC->RC_MAT == SRA->RA_FILIAL+SRA->RA_MAT) If SRC->RC_PD == aCodFol[111,1] // Aviso Indenizado nRemRet := nBInss - Round(SRC->RC_VALOR,2) EndIf dbSelectArea("SRC") dbSkip()EndDoReturn (nRemRet)
Variáveis
Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
nBInss | Numérico | Global | Não | Valor da Remuneracao sem 13.Salario calculada pelo sistema. | ||||||||||
nBFgts | Numérico | Global | Não | valor base do fgts do funcionario | ||||||||||
lRat | Lógico | Global | Não | Indica se a sefip esta sendo gerada por centro de custo | ||||||||||
aCodFol | Array of Record | Global | Não | Array com os identificadores de calculo e suas respectivas verbas. | ||||||||||
Array of Record | Global | Não |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas