Função Win_OSNetRegOK

[asimoes]

Pessoal,

A função Win_OSNetRegOK funciona no windows 7, 10 32/64 ?

Ela resolve problemas relacionados ao dbf ?

Estamos com problemas de gravação de append, commit em rede, a rede é novell, 2 estações ou mais fazendo append ao mesmo tempo, uma consegue ir até o final em um loop com contador de 50 e as outras falham, as outras até conseguem appendar alguma coisa, uma para no 10 outra no 30 e outra consegue ir até o final do loop de 50, detalhe, uma hora a falha acontece na máquina a e b outra hora falha na máquina c e a, pelo menos uma consegue adicionar os 50 registros.

São operações básicas que todos estão acostumados o seu uso:

dbappend()
dbcommit()
dbskip(0) //uso opcional
dbunlock()

Isso como eu disse em um loop para adicionar 50 registros

A rede é novell
Não tem plugin de banco nas máquinas envolvidas
O antivirus é mcfee corporativo

Obs.: nas estações que falham, vem a mensagem famosa no título da janela: "não está respondendo"
Mesmo usando função de eventos, tipo hwg_doevents()
Não dá erro, a aplicação congela, muito louco esse problema.

[JoséQuintas]

as outras até conseguem appendar

por um momento pensei que as máquinas estavam peidando.... kkkkkk

Colocou intervalo de tempo entre cada APPEND?
Não sei se sua LIB permite isso, mas deve ter algum timer ou coisa assim, caso não tenha inkey().

[asimoes]

Sim, usei inkey(2) 2 segundos, nada, muito estranho

[Itamar M. Lins Jr.]

Ola!
Trabalhei muitos anos com o Netware da Novell, instalei tantas..., neste caso ai eu trocaria o servidor para Linux Umbutu, instalaria LetodbF ou NetIO nele.
Já que o servidor com Netware é dedicado, ainda poderia instalar Apache, PHP, etc para usar junto com o Harbour.
Como está o arquivo de configuração ?
Tem uns arquivos que devem está no boot, IPX etc... faz tantos anos que não lembro direito.

FILES=
Share=

Qual é a versão da Netware ?

Saudações,
Itamar M. Lins Jr.

[asimoes]

Itamar,
A coisa não é tão simples assim, aqui é a informática da prefeitura do Rio de janeiro, o que eu queria saber é se usando a função win_osnetregok, resolve o problema ou parte dele

[gilbertosilverio]

Simões,

Tive um problema parecido, a tempos, em uma rede w2003, minha rotina usava:

dbappend()
replace ...
dbunlock()
dbcommit()

retirei o dbcommit(), e não tive mais problemas, creio que pelo dbcommit() atualizar a base de dados, ele ficava mais lento e trava a estação, ate hoje, e ja faz um bom tempo, não tive mais problema.

Fica a dica...

[Itamar M. Lins Jr.]

Ola!

aqui é a informática da prefeitura do Rio de janeiro, o que eu queria saber é se usando a função win_osnetregok,

IMHO, nada a ver win_osnetregok(), não vai afetar em nada ai o uso. Netware não tem nada a ver com Windows.

Você pode fazer um teste com clipper 5x, se funcionar eu tentaria usa harbour com a opção de travamento do clipper 5.

Código: Selecionar todos

#define DB_DBFLOCK_CLIPPER      1   /* default Cl*pper locking scheme */ 
Set( _SET_DBFLOCKSCHEME, 1 ) 

Porque vc não informou a versão da Netware. Se for 3.12 ou 3.14 é 16 Bits se não estiver enganado, e o Harbour pode está usando travamento 32 Bits...
Vc não deu muitas explicações...
Veja se com Clipper trava, porque tem que funcionar 100% com clipper.
Uma ultima opção, tentaria usar DJCPP para compilar o Harbour em 16Bits.(extrema) pois não roda Hwgui ai só telas CUI.
Teria que ver o opção de boot da Netware também, a estações rodam XP ? Win98 ?

Mas, adianto que no meu ponto de vista é o mesmo problema relatado no forum do clipper, por uma empresa que usa a SIX. A resposta do desenvolvedor do SIX foi que o cliente passasse a usar o "SERVIDOR" SIX, a mesma coisa do LetoDBf ou NetIO.
...
http://pctoledo.com.br/forum/viewtopic. ... 9&start=15

MAS ENCONTRAMOS A SOLUCAO:
Utilizaremos CLIENTE/SERVER TCP-IP.
Nosso sistema esta rodando a 2 dias, em campo, e nenhum problema de corrupção foi comunicado.
No suporte da APOLLODB, obtivemos o seguinte, traduzido pelo googletradutor:
Usando regras de classificação do DOS vs. regras de classificação do Windows:
Esta é a solução # 1 para corrigir problemas relacionados a índices corrompidos ou dados correntes.

...
O servidor Netware pode ser substituído pelo Linux, 100% de possibilidade de rodar tudo ai com o mínimo de troca de hardware. Penso que vai até ganhar em velocidade, etc... e terá a mesma robustez da Netware ou até mais com o Linux Usando Ext3, RaiserFS... ai já é outro assunto...
Usando Linux + LetoDbf, como servidor, não irá mexer nas estações. Só irá abrir mais o leque de opções depois que sair da Netware.

Saudações,
Itamar M. Lins Jr.

[asimoes]

Itamar,

Eu tentei usando DB_DBFLOCK_CLIPPER mas falha

De cabeça não sei a versão da novell, mas com certeza é a mais atual, porque tem contrato com a prefeitura.

[Itamar M. Lins Jr.]

Ola!
A mais atual Netware é velha! rssrs mas é bom saber a versão.
Eu testaria com clipper para tentar isolar o problema.

Saudações,
Itamar M. Lins Jr.