Clipper On Line • Ver Tópico - Como verificar se registro está travado no postgres

Como verificar se registro está travado no postgres

Discussão sobre Banco de Dados e RDDs para Clipper/[x]Harbour.

Moderador: Moderadores

 

Como verificar se registro está travado no postgres

Mensagempor rossine » 27 Out 2008 10:11

Olá pessoal,

Como faço para testar se o registro está travado no postgres ? Já tentei assim:


BEGIN WORK
SELECT * FROM MINHA_TABELA WHERE "RECNO" = 10 FOR UPDATE


...mas quando executo esta senteça novamente, o programa fica travado até o 1º comandar o "Commit"

Obrigado,

Rossine.
Rossine.

Harbour 3.4, MingW / Msvc, QT, Qt5xhb, GtQtc, DbfCdx, MySql/MariaDB.
rossine
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 313
Data de registro: 06 Ago 2007 09:57
Cidade/Estado: Divinópolis-MG
Curtiu: 1 vez
Mens.Curtidas: 21 vezes

Re: Como verificar se registro está travado no postgres

Mensagempor sygecom » 05 Nov 2008 18:44

Olá Rossine,
Uma dica:
Baixe a versão demo do xharbour comercial, pegue um sistema seu compile com ele e faça ele se conectar no seu prostregres e use comandos do xBase para travar, append, commit e etc.. veja como ela trata isso em SQL usando as seguintes funções abaixo:

SR_StartTrace() // PARA VER OS COMANDOS SQL EM UM ALERT()
SR_StartLog() // PARA SALVAR OS COMANDOS SQL EM DBF LOCAL

Isso tem me ajudado bastante a fazer query complexas, o pessoal do xharbour comercial esta de parabens.
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
leonardodemachado@hotmail.com

Faça você também sua doação esse fórum é uma lenda viva: http://www.pctoledo.com.br/doacao
Avatar de usuário

sygecom
Usuário Nível 7

Usuário Nível 7
 
Mensagens: 7006
Data de registro: 21 Jul 2006 10:12
Cidade/Estado: Alvorada-RS
Curtiu: 1 vez
Mens.Curtidas: 130 vezes

Re: Como verificar se registro está travado no postgres

Mensagempor rossine » 06 Nov 2008 21:58

Olá Leonardo,

Obrigado pela Dica :)Pos Procurando na internet achei p "NOWAIT", era o que faltava:

BEGIN WORK
SELECT * FROM MINHA_TABELA WHERE "RECNO" = 10 FOR UPDATE NOWAIT


Valeu,

Rossine.
Rossine.

Harbour 3.4, MingW / Msvc, QT, Qt5xhb, GtQtc, DbfCdx, MySql/MariaDB.
rossine
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 313
Data de registro: 06 Ago 2007 09:57
Cidade/Estado: Divinópolis-MG
Curtiu: 1 vez
Mens.Curtidas: 21 vezes




Retornar para Banco de Dados

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 8 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro