Clarion - TPS to DAT conversion

Author

TPS to DAT conversion

Peter

2005-01-22, 3:55 pm

Hi everybody!

Im currently trying to develop a new system from an old one that was
written in clarion ages ago. Its just a simple members records handler
so not difficult but the old system used a .TPS database file. I need
to get export the information out of that file and into a more
compatable format like access... (im using Delphi 2005 to develop the
new app).

If the above isn't gonna happen then can anyone please help me and
tell me how I can convert the .TPS file into a .DAT file? I think from
there I can convert the .DAT file into a dBase file...

Thanks alot!!
Peter

C.Joseph Drayton

2005-01-22, 3:55 pm

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Hi Peter,

I have been doing a lot of file conversions lately, and this is the
method that I follow;

1. Create source and destination files in Clarion dictionary. Make
sure that you select the correct file path for both.
2. Hand code procedure to equate fields in destination to source.
Make sure to build keys for the destination file.
3. Execute hand code.

Below is sample code for equating destination to source:

!***************************************
***************************
!
! CC is source table
! Countries is destination table
!
! This source will work with Legacy or ABC
!
!***************************************
***************************

data
Count ULONG
PROGRESS WINDOW('Copying Records'),AT(,,107,33),FONT('MS Sans

Serif',8),GRAY,CENTER,DOUBLE
STRING('Processing Record #:'),AT(4,13,,)
STRING(@n8),AT(74,12,24,12),USE(Count)
END

code
OPEN(Progress) ; Count = 0
open(CC)
set(CC,CC:PRIMARYKEY)
open(Countries)
empty(Countries)
loop until eof(CC)
next(CC)
Count += 1
DISPLAY(?Count)
cntr:CountryNumber = CC:ID
cntr:Country = CC:COUNTRY
cntr:CountryCode = CC:ABBREV
add(Countries)
end
build(Countries)
close(Progress)

If you have any questions, let me know.

Ciao . . . C.Joseph

That which a man buys too cheaply . . .
He esteems too lightly

Peter wrote:
> Hi everybody!
>
> Im currently trying to develop a new system from an old one that was
> written in clarion ages ago. Its just a simple members records handler
> so not difficult but the old system used a .TPS database file. I need
> to get export the information out of that file and into a more
> compatable format like access... (im using Delphi 2005 to develop the
> new app).
>
> If the above isn't gonna happen then can anyone please help me and
> tell me how I can convert the .TPS file into a .DAT file? I think from
> there I can convert the .DAT file into a dBase file...
>
> Thanks alot!!
> Peter
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.5 (MingW32)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iD8DBQFB8oUg0p5pZd9esrsRAiHGAKCI8dPsL0ej
CB1P4zvsS8xC+Ip4UACeJXyW
sl0Wsowr5tCAXTncjKCy1L4=
=4pUB
-----END PGP SIGNATURE-----

x-- 100 Proof News - http://www.100ProofNews.com
x-- 3,500+ Binary NewsGroups, and over 90,000 other groups
x-- Access to over 1 Terabyte per Day - $8.95/Month
x-- UNLIMITED DOWNLOAD

overdotnet

2005-02-01, 8:55 am

Dear kalek1,
Convert tps to DAT like tps to csv. But if tps has greater than 50
records, it raised an error "Record Limit Exceed" as I used the Clarion 5
evaluation Editon Enterprise.

Please help me in this case. Thank much.

dot.

C.Joseph Drayton

2005-02-03, 3:55 am

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Hi Dot,

The 50 record limit is because you are using the evaluation version.
To do the whole table you are going to need a gold copy of Clarion.

Ciao . . . C.Joseph

That which a man buys too cheaply . . .
He esteems too lightly

overdotnet wrote:
> Dear kalek1,
> Convert tps to DAT like tps to csv. But if tps has greater than 50
> records, it raised an error "Record Limit Exceed" as I used the Clarion 5
> evaluation Editon Enterprise.
>
> Please help me in this case. Thank much.
>
> dot.
>
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.5 (MingW32)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iD8DBQFCAa040p5pZd9esrsRAkwFAJ9QEQ1nmwzN
vkBBh8oDVyvNH8AVVwCfQzm8
SU98YLZqUNJP/VRdR5h43fw=
=LY9b
-----END PGP SIGNATURE-----

x-- 100 Proof News - http://www.100ProofNews.com
x-- 3,500+ Binary NewsGroups, and over 90,000 other groups
x-- Access to over 1 Terabyte per Day - $8.95/Month
x-- UNLIMITED DOWNLOAD

C.Joseph Drayton

2005-02-10, 3:55 am

Sponsored Links