ConexaoGpw is Connection
IF NOT gpwOpenConnection(conexaoGpw, ConfiguracoesBancoDados.NomeUsuarioBD, ConfiguracoesBancoDados.SenhaBanco, ConfiguracoesBancoDados.NomeServidor, ConfiguracoesBancoDados.NomeBancoDados, hAccessHFClientServer, hOReadWrite) THEN
Info("Falha na Conexão com o Grupo de Usuários"+CR+HErrorInfo())
EndProgram()
END |