...
Durante a operação de inclusão ou alteração do Castro de Cargos - TRMA020, o gatilho mostrado na imagem anterior, irá preencher a data atual, no campo Q3_DATA ( Campo personalizado).
Isso ocorrerá após selecionar o botão salvar do cadastro de cargos.
P.E - TRM020GLT
A variável cReadVar , contida no fonte abaixo deverá ser preenchida com o nome do gatilho. Caso o usuário deseje utilizar outro campo do tipo MEMO, que possua gatilho,
basta alterar o conteúdo da variável, removendo Q3_MEMO1 e adicionando o nome do gatilho cadastro através do módulo SIGACFG.
Bloco de código |
---|
language | cpp |
---|
firstline | 1 |
---|
title | TRM020GLT - Ponto de Entrada para execução de gatilhos em campos do tipo MEMO |
---|
linenumbers | true |
---|
|
#INCLUDE "PROTHEUS.CH"
User Function TRM020GTL()
Local cReadVar := "Q3_MEMO1" //Contem o nome do campo tipo MEMO que possui gatilho (Domínio)
If(FunName() == 'TRMA020' .And. !Empty(cReadVar) )
IF (ExistTrigger(cReadVar))
RunTrigger(1,nil,nil,,cReadVar)
EndIf
EndIf
Return .T. |
...