[firebase-br] "Semáforo" no Firebird

[sicnemelpor em gmail.com]

Não seria mais interessante usar um GENERATOR? Procura na lista que tem  
toneladas de exemplos sobre isso.

[]s
Nelson

> Olá pessoal! Estou quebrando a cabeça para resolver um problema, gostaria
> que vocês me dessem uma ajuda... Eu tenho a seguinte situação:
>
>
> Tenho um sistema de gestão que é integrado à contabilidade, e este  
> sistema é
> multi-empresa. Todos lançamentos para as tabelas contábeis são feitos via
> stored procedures. Na contabilidade, cada lançamento contábil deve  
> receber
> um número único que é zerado para cada combinação de exercício / empresa  
> e
> que obviamente não seguem paralelamente. Assim:
>
>
>                     Empresa 1      Empresa  2      Empresa 3
>
> Lanctos:       1 / 2007            34 / 2007        5467 / 2007
>
>                     2 / 2007           35 / 2007        5468 / 2007
>
>
> * o exercício mudou *
>
>
>                    1 / 2008            1 / 2008             1 / 2008
>
>                    2 / 2008            2 / 2008             2 / 2008
>
>
> Muito bem. Acontece que o sistema é alimentado por dezenas de  
> funcionários,
> e praticamente todos os módulos geram lançamentos contábeis. Como o
> sequenciamento dos lançamentos é feito de forma tosca (SELECT
> MAX(COD_LANCAMENTO) FROM TABELA WHERE EMPRESA = 123), ocasionalmente
> acontece de duas procedures diferentes disparadas ao mesmo tempo gerarem
> lançamentos contábeis com a mesma numeração para a mesma empresa.
>
>
> Eu pensei em montar um tipo de semáforo; Se houvesse como comunicar o
> Firebird com uma interface externa, eu faria um webservice que  
> enfileirasse
> as requisições e disponibilizasse os números; Como não existe, eu preciso
> criar esse mecanismo dentro do firebird. Pensei em algo assim:
>
>
> - Crio uma tabela de semáforo com três campos: “Código da empresa”,
> “exercício” e “número do lançamento”.  Cada stored procedure que fosse  
> gerar
> um lançamento contábil iria acessar esta tabela, procurar o último
> lançamento para o exercício e empresa desejada e acrescentar 1 no número,
> gravando o novo número do lançamento nesta tabela.
>
>
> DÚVIDAS:
>
>
> 1) Para que este mecanismo funcione correntamente, eu precisaria fazer um
> lock explicito na tabela que fornecerá os números de lançamentos. Seria  
> esse
> o select ?:
>
>
> SELECT COD_LANCAMENTO FROM SEMAFORO WITH LOCK
>
> WHERE EXERCICIO = 2007 AND EMPRESA = 1
>
>
> 2) Como libero o ‘lock’ depois de utilizado ?
>
>
> 3) Como faço para a minha stored procedure não gerar um deadlock e sim
> aguardar a liberação do registro (uma como um ‘REPEAT UNTIL IS LOCKED’)  
> para
> continuar ? Existe essa possibilidade ou eu tenho que tratar isso dentro  
> da
> minha aplicação ?
>
>
>
> []’s
>
>
> Rodrigo A. de Freitas
>
> Análise & Desenvolvimento
>
>
> Soluções & Informática
>
>
>
>
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para editar sua configuração na lista, use o endereço  
> http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa