Para A. Linares Compatibilidad con Clipper falla

Para A. Linares Compatibilidad con Clipper falla

Postby mmercado » Wed Apr 02, 2008 11:47 pm

Hola Antonio:

El siguiente código no generaba ningún error en Clipper aún cuando no esistiera ninguna base de datos abierta
Code: Select all  Expand view  RUN
#include "FiveWin.ch"

Function Main()

   Local nArea   := Select(), ;
         nIndex  := IndexOrd(), ;
         nRecord := RecNo()

   DbSelectArea( nArea )
   DbSetOrder( nIndex )
   DbGoTo( nRecord )

   MsgInfo( "Yes" )

Return Nil


Con (x)Harbour me da el siguiente error:

Application
===========
Path and name: C:\FWH\samples\SHOOT.exe (32 bits)
Size: 1,109,504 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 04/02/08, 17:40:13
Error description: Error DBCMD/2001 Workarea not in use: ORDSETFOCUS

Stack Calls
===========
Called from: => ORDSETFOCUS(0)
Called from: source\rdd\rddord.prg => DBSETORDER(76)
Called from: shoot.prg => MAIN(13)

System
======
CPU type: Intel(R) Pentium(R) M processor 2.00GHz 2000 Mhz
Hardware memory: 1016 megs

Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %

Compiler version: Harbour devel build 1.1-1 Intl.
Windows version: 5.1, Build 2600 Service Pack 2

Para mí es importante porque practicamente en todas mis rutinas uso este código para restaurar la base de datos actual al salir de la rutina.

Saludos.

Manuel Mercado
User avatar
mmercado
 
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Postby Antonio Linares » Thu Apr 03, 2008 8:20 am

Manuel,

Es un error propio de Harbour/xHarbour que tendrías que reportar en sus respectivas listas de correo (de desarrollo). Gracias
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42160
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby karinha » Thu Apr 03, 2008 1:13 pm

Maestro Manuel, o que intentas? Para que uso esto se destina?
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7860
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Postby mmercado » Thu Apr 03, 2008 9:44 pm

karinha wrote:Maestro Manuel, o que intentas? Para que uso esto se destina?


Hola, es solamente para reproducir el error, obviamente no lo uso de esta forma en mis programas.

Saludos.

Manuel Mercado
User avatar
mmercado
 
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 46 guests

cron