Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

O Ponto de entrada é disparado após a inclusão dos gatilhos padrões na Viagem Modelo 3. Permite a inclusão de novos gatilhos.


Parâmetros:


Nome

Tipo

Descrição

Default

Obrigatório

Referência

oStruct



Caracter

Contém a estrutura da tabela.










Retorno

      ()

Variáveis:


Nome

Tipo

Escopo

Pode Alterar

Descrição

aRet



Array of Record

Local

Não

Retorna no novo gatilho já no formato FwStruTrigger.

n,1 : ID do campo de origem

n,2 : ID do campo de destino

n,3 : Bloco de validação na execução do gatilho

n,4 : Bloco de execução do gatilho


03. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagejava
themeMidnight
titleTMF60GAT
#INCLUDE "PROTHEUS.CH"

User Function TMF60GAT()
Local oStru := ParamIXB[1]
Local aRet  := {}
Local aAux  := {}

If oStru:aTable[1] == "SDG"
	aAux := (FwStruTrigger("DG_CODDES",; // Campo de DominioDomínio
						"DG_BANCO" ,; // Campo de ContraDominioContradomínio
						"'CX1'",; // Regra de Preenchimento
						,; // Se posicionara ou não antes da execução do gatilhos (Opcional)
						,; // Alias da tabela a ser posicionada (ObrigatorioObrigatório se lSeek = .T.)
						,; // Ordem da tabela a ser posicionada (ObrigatorioObrigatório se lSeek = .T.)
						,; // Chave de busca da tabela a ser posicionada (Obrigatorio se lSeek = .T)
						)) // Condição para execução do gatilho (Opcional)
	Aadd(aRet,aAux)

	aAux := (FwStruTrigger("DG_CODDES" ,; // Campo de DominioDomínio
						"DG_AGENCIA",; // Campo de ContraDominioContradomínio
						"'00001'",; // Regra de Preenchimento
						,; // Se posicionara ou não antes da execução do gatilhos (Opcional)
						,; // Alias da tabela a ser posicionada (ObrigatorioObrigatório se lSeek = .T.)
						,; // Ordem da tabela a ser posicionada (ObrigatorioObrigatório se lSeek = .T.)
						,; // Chave de busca da tabela a ser posicionada (ObrigatorioObrigatório se lSeek = .T)
						)) // Condição para execução do gatilho (Opcional)
	Aadd(aRet,aAux)
Endif

Return aRet
   

...