Árvore de páginas

Ponto-de-Entrada: GP240EXC - Exclusão Afastamento de Funcionário
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição:

O Ponto de Entrada GP240EXC é executado antes da exclusão do registro na tabela SR8 (Cadastro de Afastamentos).

Programa Fonte
.PRW
Sintaxe

GP240EXC - Exclusão Afastamento de Funcionário ( [ PARAMIXB ] )

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
PARAMIXB Vetor PARAMIXB[1] := {nOperacao}
Retorno
    ()
Observações

No vetor PARAMIXB[1] é passado o tipo de Operação selecionada no browser:

PARAMIXB[1] == 5 (Exclusão)

 

Exemplos
User Function GP240EXC()Local cOperacao := ""   If AllTrim( SRA->RA_MAT ) == "000019"                             If PARAMIXB[1] = 5	cOperacao := "EXCLUSAO"      EndIf      Alert("Ponto de Entrada: GP240EXC está sendo executado antes da " + cOperacao )   EndIfReturn