xbrdbu : new version

[Franklin Demont]

Greetings mister Franklin.
I beg you excuse my ignorance.. .: Would it be possible to get in XBRDBU, that to rename a field the restrained data did not get lost in the same...?

Thank you for your attention.

I give not attention till now on these matter. First impression : when a Dbf is active , Modify srtucture must at least load the active structure.
Personally i use a routine which uses a datadirectory (Text witch describes the dbf structure's) .
I adopted it from a library i bought +/- 1992 (* Copyright(c) 1991 -- James Occhiogrosso)
If you are intrested : i will send it when i have your e-mail adress.



Last week i worked on Edit (Copy record , Paste Record , Insert record Edit record)

Next week i hope to work on Modify structure

[desdesummer87]

Thank you very much for your kindness.. I will follow the future modifications attentively.

Greetings.

[Franklin Demont]

Hello Franklin,
thank you. Please excuse me. I mixed up the official new Fivewin DBU with the xWDBU clone.
You are right. In the xBRWDBU there is now all the functionality xWDBU had.
But the version is not very stable. Some functions freeze. Where should we report the errors.
Which version should now become the xWDBU replacement.

Best regards,
Otto

Otto

Today me too had some problems. Eliminating each oMsgBar:aItems[n]:refresh() solved the problem.

Only oMsgBar:refresh() seems to be allowed

FRank

[Franklin Demont]

Thank you very much for your kindness.. I will follow the future modifications attentively.

Greetings.

a New version is available at : http://rapidshare.com/files/3521880066/XBRDBUFD2.ZIP
(version from 17/2/2013 19h)
I believe that the most important items are now present :

Changes from FRANK DEMONT are included with the define FD

This version has omitted the defines to simplify the code !!!
Also unused code is omitted.
In the menu are the unfinished items disabled

Version from 5/2/2013

1) Xbrdbu uses only files from his own , no files from fwh as
WindowsXP.Manifest , bmp-files , some ch-files

2) Added : launch parameter cDbfFile
From command line : xbrdbu.exe cDbfFile

3) Added : Static Var : hIndex
Hash variable , holding the data to (re)index

4) Index menu and his actions : changed

NEW

5) Index management
Open Index
Close index
Index Order
Filter by scope
Change/add index

6) Utilities
Browse columns (columns configuration)
Relations
Establish Filter
Count
Statistics
Append From
Copy To
Delete
Recall
Pack
Zap

Added in this version (16/2/2013)


Messagebar from oDbfWnd : enhanced
Append From , Copy To : Format Clipboard Appended

7) Edit
Copy Record
Paste Record
Insert record : If Ordcount() == 0 , not present in old xbrdbu
Append record
Edit rec : from fivedbu
File
New / modify structure : New module , based on xbrowse
This module has many checks as :
Existing field : type cannot change
Field from a index expression : only len or dec can change


Frank Demont

[desdesummer87]

Thanks again for its attention, but the problem persists. When publishing the name of a field, the data contained in him erase.

Nevertheless, quietly grateful.

desdesummer87.

[Franklin Demont]

Thanks again for its attention, but the problem persists. When publishing the name of a field, the data contained in him erase.

Nevertheless, quietly grateful.

desdesummer87.

Sorry , i am afraid that i don't understand the problem.

Frank

[cnavarro]

Buenas tardes
Da un error en la linea 214 - > When .... en el inicio de la aplicacion en la opcion Edit si no se ha abierto ninguna base de datos
Un saludo y gracias

Translate google

good afternoon
Give an error on line 214 -> When .... at the start of the application in the Edit if not opened any database
Regards and thanks

[Franklin Demont]

Buenas tardes
Da un error en la linea 214 - > When .... en el inicio de la aplicacion en la opcion Edit si no se ha abierto ninguna base de datos
Un saludo y gracias

Translate google

good afternoon
Give an error on line 214 -> When .... at the start of the application in the Edit if not opened any database
Regards and thanks

I am Sorry.

Line 194 MENUITEM "&Edit"

Should be MENUITEM "&Edit" WHEN ! EMPTY(alias())

Also MENUITEM "&Navigation" WHEN ! EMPTY(alias())

Frank

[Franklin Demont]

Thanks again for its attention, but the problem persists. When publishing the name of a field, the data contained in him erase.

Nevertheless, quietly grateful.

desdesummer87.

I think that i understood the problem : when a fieldname is changed the data from this field is lost.

This i a behaviour from (x)harbour's APPEND FROM command.

First we creata a empty database with the new structure , then the old data are appended.

When the name is changed , (x)harbour can not know to which field the data belong's

Also the position from the field can not be used , fields can be erased or changed in order.

Only possibilty : use the backup file to update the new file with a little routine where you specify which field in the backup should update which field in the new one

OR as in the good old days from DBASE

1) Modi struct , append newfield (the newname) (Modify structure , file menu)
2) REPL newname WITH oldname (utilty's)
3) Modi Struct , delete oldfield
If the order from the fields is important you can also this change , using copy record, delete record , insert record and paste record


Frank

[Franklin Demont]

http://rapidshare.com/files/2886427750/XBRDBUFD1.ZIP

Correction from some bug's

Version from 19 h

http://rapidshare.com/files/3521880066/XBRDBUFD2.ZIP

Frank

[cnavarro]

El enlace no funciona
Muchas gracias por tu esfuerzo y trabajo

The link does not work
Thank you very much for your hard work

[Franklin Demont]

Sorry , i tested it from here and it is ok.
At this moment i can see that 6 downloads have been done.

Mail me at FranklinDemont@gmail.com , and i will send it.

Frank

[Bayron]

Error when opening an empty database and hitting the Source Button...

Code: Select all  Expand view  RUN

Application
===========
   Path and name: C:\Users\Maya\Downloads\4Shared\XBRDBUFD2\xbrdbu.Exe (32 bits)
   Size: 2,884,608 bytes
   Compiler version: Harbour 3.1.0dev (Rev. 17025)
   FiveWin  Version: FWH 12.02
   Windows version: 6.1, Build 7600

   Time from start: 0 hours 0 mins 25 secs
   Error occurred at: 17-02-2013, 12:25:33
   Error description: Error BASE/1132  Bound error: array access
   Args:
     [   1] = A   { ... }
     [   2] = N   6

Stack Calls
===========
   Called from:  => ARRAY:__OPARRAYINDEX( 0 )
   Called from: .\source\classes\XBRCODE.PRG => CEDITCONST( 941 )
   Called from: .\source\classes\XBRCODE.PRG => TXBRCOLCODE:PRGVARCODE( 752 )
   Called from: .\source\classes\XBRCODE.PRG => TXBRCOLCODE:PRGCODECMD( 689 )
   Called from: .\source\classes\XBRCODE.PRG => TXBRCOLCODE:PRGCODE( 564 )
   Called from: .\source\classes\XBRCODE.PRG => (b)TXBRCODE_PRGCODE( 239 )
   Called from:  => AEVAL( 0 )
   Called from: .\source\classes\XBRCODE.PRG => TXBRCODE:PRGCODE( 239 )
   Called from: xbrdbu.prg => VIEWCODE( 1037 )
   Called from: xbrdbu.prg => (b)BRWBTNBAR( 794 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 465 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 656 )
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1690 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 1407 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
   Called from:  => WINRUN( 0 )
   Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 980 )
   Called from: xbrdbu.prg => MAIN( 76 )
 

[Franklin Demont]

Error when opening an empty database and hitting the Source Button...

Code: Select all  Expand view  RUN

Application
===========
   Path and name: C:\Users\Maya\Downloads\4Shared\XBRDBUFD2\xbrdbu.Exe (32 bits)
   Size: 2,884,608 bytes
   Compiler version: Harbour 3.1.0dev (Rev. 17025)
   FiveWin  Version: FWH 12.02
   Windows version: 6.1, Build 7600

   Time from start: 0 hours 0 mins 25 secs
   Error occurred at: 17-02-2013, 12:25:33
   Error description: Error BASE/1132  Bound error: array access
   Args:
     [   1] = A   { ... }
     [   2] = N   6

Stack Calls
===========
   Called from:  => ARRAY:__OPARRAYINDEX( 0 )
   Called from: .\source\classes\XBRCODE.PRG => CEDITCONST( 941 )
   Called from: .\source\classes\XBRCODE.PRG => TXBRCOLCODE:PRGVARCODE( 752 )
   Called from: .\source\classes\XBRCODE.PRG => TXBRCOLCODE:PRGCODECMD( 689 )
   Called from: .\source\classes\XBRCODE.PRG => TXBRCOLCODE:PRGCODE( 564 )
   Called from: .\source\classes\XBRCODE.PRG => (b)TXBRCODE_PRGCODE( 239 )
   Called from:  => AEVAL( 0 )
   Called from: .\source\classes\XBRCODE.PRG => TXBRCODE:PRGCODE( 239 )
   Called from: xbrdbu.prg => VIEWCODE( 1037 )
   Called from: xbrdbu.prg => (b)BRWBTNBAR( 794 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 465 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 656 )
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1690 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 1407 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
   Called from:  => WINRUN( 0 )
   Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 980 )
   Called from: xbrdbu.prg => MAIN( 76 )
 

This error was already reported , see viewtopic.php?f=3&t=25537#p139286

at 19 h i published a new download link:

http://rapidshare.com/files/3521880066/XBRDBUFD2.ZIP

[desdesummer87]

Si. Ese es el problema que procuraré solventar del mejor modo posible.. Gracias de nuevo por su dedicación.
=====================================================================
If. That one is the problem that I will try to solve as good as possible.. Thanks again for its dedication.