4D v12.4

On Server Open Connection Database Method

Página Inicial

 
4D v12.4
On Server Open Connection Database Method

 

On Server Open Connection Database Method  


 

O On Server Open Connection Database Method é chamado uma vez no computador servidor cada vez que um computador 4D remoto inicia um processo de conexão. O On Server Open Connection Database Method NÃO se invoca por outro ambiente 4D diferente de 4D Server.

O On Server Open Connection Database Method se chama cada vez que:

  • um 4D remoto se conecta (inicio do processo principal)
  • um 4D remoto abre o ambiente Desenho (inicio do processo de Desenho)
  • um 4D remoto inicia um processo no local, utilizando o comando New process, um comando de menu ou utilizando a caixa de diálogo Executar um método

Em cada caso com um 4D remoto, se iniciam três processos. Um na máquina cliente e outros dois no computador servidor. Na máquina cliente, o processo executa o código e envia as petições a 4D Server. No computador servidor, o processo 4D Client mantém o entorno do banco de dados do processo cliente (as seleções atuais e o bloqueio de registros para o processo usuário) e responde as petições enviadas pelo processo executado na máquina cliente. O processo base 4D Client está a cargo de controlar o processo 4D Client correspondente.

Importante: As conexões web e as conexões SQL não provocam a execução do On Server Open Connection Database Method. Quando um navegador web se conecta a 4D Server, é chamado o Método de banco On Web Aunthentication (se existe) e/ou ao On Web Connection Database Method. Quando 4D Server recebe uma petição SQL, é chamado o On SQL Authentication Database Method(se existe). Para maior informação, consulte a descrição deste método base no manual de Linguagem 4D.

Importante: Quando se inicia um procedimento armazenado, o On Server Open Connection Database Method NÃO é chamado. Stored Procedures são processos servidor e não processos 4D Client. Eles executam o código no computador servidor, mas não respondem as petições mudadas por 4D client (ou outros clientes) e 4D Server.

O On Server Open Connection Database Method é executado no equipo servidor no processo 4D Client que provocou a chamada do método.

Por exemplo, se um 4D remoto se conecta a uma base 4D Server interpretada, é iniciado o processo usuário, o processo de desenho e o processo de registro do cliente (por defeito). O On Server Open Connection Database Method se executa três vezes seguidas. A primeira vez dentro do processo principal, a segunda vez no processo de inscrição do cliente e a terceira vez no processo de desenhoo. Se os três processos são respectivamente o sexto, sétimo e oitavo processo a iniciar-se no equipo servidor, e é chamado Current process desde o On Server Open Connection Database Method, a primeira vez Current process devolve 6, a segunda vez 7 e a terceira 8.

Observe que o On Server Open Connection Database Method se executa no equipo servidor, ao interior do processo 4D Client no servidor, independente do processo executado no cliente. Além disso, no momento em que se invoca o método, o processo 4D Client ainda não foi nomeado (PROCESS PROPERTIES não devolverá neste momento o nome do processo 4D Client).

O On Server Open Connection Database Method não têm acesso à tabela das variáveis processo do processo executado no client. Esta tabela reside no equipo client, não no equipo servidor.

Quando o On Server Open Connection Database Method acede a uma variável processo, trabalha com uma tabela de variáveis processo particular, criada dinamicamente pelo processo 4D Client.

4D Server passa três parâmetros de tipo Inteiro longo ao On Server Open Connection Database Method e espera um resultado Inteiro longo. O método deve portanto ser declarado explicitamente com três parâmetros Inteiro longo assim também como com um resultado de função Inteiro longo:

 C_LONGINT($0;$1;$2;$3)

Se não devolve um valor em $0, por conseguinte deixa a variável indefinida ou inicializada em zero, 4D Server considera que o método base aceita a conexão. Se não é aceitada a conexão, devolve um valor não nulo em $0.

Esta tabela detalha a informação oferecida pelos três parâmetros passados no método base:

ParâmetroDescrição
$1Número de usuário utilizado internamente por 4D Server para identificar-los
$2Número de conexão utilizado internamente por 4D Server para identificar-la
$3Obsoleto: sempre devolve 0 mas deve ser declarado

Estes números de referencia não são utilizados diretamente como fontes de informação a passar, por exemplo, como parâmetros a um comando 4D. No entanto, oferecem uma maneira particular de identificar um processo 4D Client entre o On Server Open Connection Database Method e o Método banco de dados On Server Close Connection. A combinação destes valores é único no momento de uma seção 4D Server. Ao guardar esta informação em uma tabela ou em um array entre processos, os dois métodos base podem trocar informações. No exemplo ao final desta sessão, os dois métodos base utilizam esta informação para armazenar a data e hora de inicio e fim de uma conexão no mesmo registro de uma tabela.

O seguinte exemplo mostra como manter um histórico das conexões à base de dados utilizando o On Server Open Connection Database Method e utilizando o Método banco de dados On Server Close Connection. A tabela [Server Log] (mostrada a continuação) se utiliza para fazer seguimento aos processos de conexão:

A informação armazenada nesta tabela é administrada pelo On Server Open Connection Database Method e o Método banco de dados On Server Close Connection listado a continuação:

  ` Método base On Server Open Connection
 
 C_LONGINT($0;$1;$2;$3)
  ` Criar um registro [Server Log]
 CREATE RECORD([Server Log])
 [Server Log]Log ID:=Sequence number([Server Log])
  ` Guardar o histórico de data e Hora
 [Server Log]Log Date:=Current date
 [Server Log]Log Time:=Current time
  ` Guarda a informação de conexão
 [Server Log]User ID:=$1
 [Server Log]Connection ID:=$2
 SAVE RECORD([Server Log])
  ` Não devolve erro da maneira que a conexão pode continuar
 $0:=0
 
  ` Método base On Server Close Connection
 C_LONGINT($1;$2;$3)
  ` Recuperar o registro [Server Log]
 QUERY([Server Log];[Server Log]User ID=$1;*)
 QUERY([Server Log];&;[Server Log]Connection ID=$2;*)
 QUERY([Server Log];&;[Server Log]Process ID=0)
  ` Guardar data e hora de desconexão
 [Server Log]Exit Date:=Current date
 [Server Log]Exit Time:=Current time
  ` Guardar informação processo
 [Server Log]Process ID:=Current process
 PROCESS PROPERTIES([Server Log]Process ID;$vsProcName;$vlProcState;$vlProcTime)
 [Server Log]Process Name:=$vsProcName
 SAVE RECORD([Server Log])

Estas são algumas entradas em [Server Log] mostrando varias conexões remotas:

O seguinte exemplo evita uma nova conexão entre as 2 e 4 A.M.

  ` Método base On Server Open Connection
 C_LONGINT($0;$1;$2;$3)
 
 If((?02:00:00?<=Current time)&(Current time<?04:00:00?))
    $0:=22000
 Else
    $0:=0
 End if

 
PROPRIEDADES 

Produto: 4D
Tema: Métodos banco de dados