Histórico da Página

Ponto de entrada executado ao fechar contrato de parceria.

Este ponto de entrada será executado ao fechar as janelas de Inclusão, Alteração, Exclusão, Cópia e Encerramento. Após a execução, ele não impede o fechamento da janela.

#Include 'Protheus.ch'

User Function FT400CLOSE()

Local nOpc := ParamIxb

Do Case

Case nopc == 3
Alert("INCLUI")
Case nopc == 4
Alert("ALTERA")
Case nopc == 5
Alert("EXCLUI")

End Case
Return

Português (Brasil)

Microsiga_Protheus11 - Microsiga_Protheus12

Todos

Todas

nOpc - número da operação selecionada
3 = Inclusão
4 = Alteração
5 = Exclusão
6 = Copia
7 = Encerrar

Nil = Nulo

FATA400.PRX