Página 1 de 1
rotina xHarbour executa no xp, no windows 7 64 bits nao
Enviado: 18 Jan 2016 14:17
por porter
ola pessoal, compilei essa rotina com xHarbour, se executar essa rotina no windows xp, da certo, funciona tudo perfeitamente, mas se executar essa mesma rotina no windows 7, 64 bits, trava, fica processando e nao consigo fechar nem com o Gerenciador de Tarefas, é dessa forma que compilo um sistema inteiro contendo varios prgs e da certo, mas esse com apenas um prg nao roda no windows 7 64 bits.
TESTE.PRG
Código: Selecionar todos
USE CLIENTES
GOTO TOP
do while !eof()
IF YEAR(CLI_NASCEU) >= 2000
REPLACE CLI_NASCEU WITH CLI_NASCEU - 36500
ENDIF
SKIP
ENDDO
Return
estou compilando assim:
compteste.bat
Código: Selecionar todos
CLS
DEL *.C
C:\xHarbour\BIN\XBuild TESTE.EXE.XBP -DEBUG -CLASSIC -B -ALL
TESTE.EXE.XBP
Código: Selecionar todos
CINI =
C_OUTPUTFOLDER =
DEFFILE =
INCLUDEFOLDERS =
LAUTORUN =
LDEBUG = .T.
LGUI = .F.
LIBFOLDERS =
LMT = .F.
LNOAUTOFWH = .F.
LPRG_CLASSICDEBUG = .T.
LPRG_DEBUG = .T.
LUSEDLL = .F.
MAPFILE =
MYC_FLAGS =
MYDEFINES =
MYLINK_FLAGS = -Gn -s
MYPRG_FLAGS =
MYRC_FLAGS =
MYSLY_FLAGS =
OUTPUTFOLDER =
PRG_OUTPUTFOLDER =
RC_OUTPUTFOLDER =
RUNARGUMENTS =
SLY_OUTPUTFOLDER =
STARTIN =
TARGETFOLDER =
[TESTE.PRG]
MYC_FLAGS =
MYDEFINES =
MYPRG_FLAGS =
[dbfcdx.lib]
[codepage.lib]
rotina xHarbour executa no xp, no windows 7 64 bits nao
Enviado: 18 Jan 2016 15:02
por porter
fiz o teste em outro computador com windows 7, 64 bits e funcionou corretamente, alguem ja teve esse problema, somente em um pc especifico essa rotina nao roda, fica travado, nao consigo finalizar o processo nem pelo Gerenciador de Tarefas.
rotina xHarbour executa no xp, no windows 7 64 bits nao
Enviado: 18 Jan 2016 16:42
por Kapiaba
Se for em REDE, Experimente TRAVAR O REGISTRO, dar o REPLACE, o COMMIT, e DESTRAVAR O REGISTRO e ponha um:
Código: Selecionar todos
? "Registro Gravado com sucesso" // uma Msg de gravação.
Verifique se o anti virus é mesmo ou se o firewall não está bloqueando se programa.
Abs.
rotina xHarbour executa no xp, no windows 7 64 bits nao
Enviado: 18 Jan 2016 19:07
por JoséQuintas
Não sei se aí é só um trecho, mas não se esqueça do SET EPOCH pra acertar o ano.
Talvez ajude se colocar no programa pra mostrar alguma informação sobre o andamento, pra ver aonde trava.
Talvez mostrar RecNo() e código, pra ver se tem a ver com o registro.
De repente não detecta EOF(), vai saber.
É essa rotina mesmo, ou está usando indexado?
E coloca também opção de cancelar com ESC, só pra ter a opção
Dependendo do resultado, usar o DEBUG e acompanhar passo a passo (não sei se o xHarbour tem).
rotina xHarbour executa no xp, no windows 7 64 bits nao
Enviado: 19 Jan 2016 12:59
por porter
ola pessoal, esse problema que relatei, acontece em uma máquina especifica, fiz o mesmo teste em um notebook windows 7 64 bits e funcionou perfeitamente, creio que o problema esta na maquina que nao esta dando certo.
Este mesmo computador que nao roda uma pequena rotina, eu compilo um sistema inteiro e executo sem problema, nao estou entendendo.
rotina xHarbour executa no xp, no windows 7 64 bits nao
Enviado: 19 Jan 2016 14:11
por JoséQuintas
Nessa rotina pequena, usa a mesma configuração do aplicativo?
De repente é DBFCDX com abertura automática de índice, e na rotina pequena está usando DBFNTX.
Ou DBT ao invés de FTP
Coloca pra mostrar linha a linha, assim vai ver em que momento trava.
Se na abertura, ou na detecção de EOF.
É local ou em rede? Se for local, então não está testando com os mesmos arquivos.
rotina xHarbour executa no xp, no windows 7 64 bits nao
Enviado: 19 Jan 2016 15:52
por AutomoSistema
Porque você não tenta assim:
USE CLIENTES
GOTO TOP
do while !eof()
IF YEAR( field -> CLI_NASCEU) >= 2000
field -> cli_nasceu := field -> cli_nasceu - 36500
ENDIF
SKIP
ENDDO
Return
rotina xHarbour executa no xp, no windows 7 64 bits nao
Enviado: 19 Jan 2016 23:15
por Clipper
Tive um problema semelhante e era o bendito do Avast.
Tive que colocar o programa na lista de exclusões para rodar.
Até logo.
Marcelo
rotina xHarbour executa no xp, no windows 7 64 bits nao
Enviado: 20 Jan 2016 17:25
por porter
ola pessoal, formatei o computador e agora esta dando certo, tive que trocar o HD tambem, acho que o motivo do problema era esse, obrigado pela atenção de todos.