GPM030EX - Ponto de Entrada após Exclusão de Cálculo de Férias

CONTEÚDO

1. Visão Geral
2. Exemplo de utilização

01. VISÃO GERAL

Ponto de entrada que permite executar tratamentos posteriores à exclusão do Cálculo de Férias.

Fonte: GPEM030.PRW

02. EXEMPLO DE UTILIZAÇÃO

#INCLUDE "Protheus.ch"
#INCLUDE "RWMAKE.CH"

User Function GPM030EX()
Local aArea := GetArea()

dbSelectArea("SRA")
dbSetOrder(1)
If SRA->(dbSeek(RA_FILIAL + RA_MAT))
RecLock("SRA",.F.,.T.)
SRA->RA_SITFOLH := "F"
SRA->( MsUnLock() )
EndIf

RestArea(aArea)

Return( .T. )