Árvore de páginas

Ponto de Entrada GPDAV040 - Alterar dias de aviso no cálculo da rescisão


Ponto de Entrada

Descrição:

Este ponto de entrada permite alterar dias de Aviso no cálculo da rescisão

Localização:

GPEM040

Eventos:

GPEM040

Programa Fonte:

GPEM040.PRX

Função:

GPEM040

Retorno:

Nenhum

 

Exemplo:

#Include 'Protheus.ch'

User Function GPDAV040()

Alert("GPDAV040")

If Type("cAvPrev") != "U" .And. cAvPrev == "T"
    nDiasAv  := 90
    nDiasCum := 30
    nDiaInde := 60
ElseIf Type("cAvPrev") != "U" .And. cAvPrev == "I"
    nDiasAv  := 30
    nDiaInde := 30
EndIf

 

/*

No exemplo, é feito verificação do tipo de aviso prévio (trabalho/indenizado) através da variável cAvPrev.

Se for aviso trabalhado, é feito alteração dos dias de aviso (variável nDiasAv) para 90 dias, dias de aviso cumprido (variável nDiasCum) para 30 dias e dias de aviso indenizado (nDiaInde) para 60 dias.

Se for aviso indenizado, é feito alteração dos dias de aviso (variável nDiasAv) para 30 dias e dias de aviso indenizado (nDiaInde) para 30 dias

*/


Return