[REBOL] DBF lib
From: davidegessi::tin::it at: 21-Feb-2003 16:55
Hi all,
here's a small dbf lib, based on a dbf viewer of F. Jouen found in
RebolFrance http://www.rebolfrance.org/ .
Now it can only read dbf. This lib a part of a project for handling Esri
shapefile.
Not tested with dbf with memo field, tested only with medium DBF files
(about 10'000 record).
ciao
Davide
USAGE:
; open dbf
dbf-file/open %file.dbf
; print out dbf information
print dbf-file/tipo
print dbf-file/data-creazione
print dbf-file/num-record
print dbf-file/num-campi
print dbf-file/campi
print dbf-file/dim-record
; get all records
for i 1 dbf-file/num-record 1 [
r: dbf-file/get-record i
print r
]
CODE:
REBOL [
title: "dbf-lib"
author: "Davide Gessi"
email: [davidegessi--tin--it]
version: 0.0.1
note: "Based on a work of F. Jouen: %dbview.r"
]
do decompress #{
789C95575B6FDA4A107EE7574C2C1DA93D11E59656ADF350B9E0B44880237279
08E2C1D8EB641B7C91BD9C86FEFA3333BBC6C6B86D4A1462EFCECEE59B996F36
E126EA46722B6C88FD6701E9E6BB08D419ACA0833FA1AF7C1B8234DB83657520
7A127E28F2DA8A5EE816F2272AE8A3046AEAFA99C8556A43E46F0BD181B8A125
3ED1C2A76211E3997FDE7560BB4B1EBB9B6D1A9835D29BE67165A5034A66694D
0159E806B9F07FCA342943C145710649FAA3474F1D4876713717419A87AC845E
033FCE24BF85F268930C77B35C142251E210891167B3AB35F9116CD302F7571D
6862D502D6095AAD709DE0D5025813B136C81A98A1B34DD45E075B13B706704D
E47E01DD09760C5F9A8904457649C0105A0E9E03B9E5F020DC44200055EF1020
1F70A5D809D493FB4A895C164A064F82C248D258700DC38ABECF60976FCF503F
F410107F4B9117F231F1D50EB5477BE1E710C569A29E200AFD3D5908D25DA220
89A4D8860530BEF8D44DFC589847B5CFCA473F0C31BA0236DB67FA1D828A338C
67A531D6C9434CC3DE46267EBEAFDC6B16452FF373C5076034D4A72F6FA7D71E
5C4D67AE7E3FF88D28C9BC50A502B884CD5E09181CB25AFC902A78AA054AFEC0
0856D6CB17BF40EC44F2D3D759E0145904100C460394B84A59E61C42169DE207
1D4C4EA48717EFB5F4759EC2F0DDFB56A1C1E8130A194DF7AD22171F2B35A336
092E0EB89C38B70E4CA6305EBACEC3D45B10289C3F0C172B2E099B70108A3AB5
36A827999F088C4800938E70A6BB9C2AC0EC9702172D6DA1D22EB50226F57B2A
132C32AA1AAB679555C48F5C56E730F8D4EFAF4D2E17777377E951004B77EC2D
27B856D61A2B95D8208F689B5CC09DFF448E905585513CCBECE0DF057B566FC5
52953136BB5B7CFDE63E3C38F0CD7526EEB249377F69EF2361590B62ECCCAF31
11CE6CECCD9C5B8F7CD1DD62D7CD401706D0C36AA68763AA30E2C6DBC974EE2E
6E28A5153635BEFA4B67077DCE7C9D890ECA8C416FE990A5BB6B773975E61ECC
5C982EAEBCE59C0B8B3284614DEF5D70A626D6893B032AC02FCE8DABBDA37030
BE922606BAC5B0FB6BB4C6D688166CEDA2E96EF8970FD35E452D18672E630AB6
C087E4B1161E71CB8010043F438E0CC94AED64A7B43234662AF98AAEEC5F691E
42BB663AD4AE79586936EC67375552791EF27424DAA6F043A5F024E3AFF2D5A4
16AACD5E9A6CF78648484ED308277FEC2D6E97DE6C866977E07AE9DEB88B0726
96BB05B8F7EEE2F6CEC17A20D605AC0F282B60EE62A11C0F5B2680A3928C24FA
75B4528D23EB9D055694291A5242AA270C4EBCE0E02A3E573A75113586A6CA77
1C5D7C3A4D1028D61D4738FEA4C859EC74AAF04978AF33D7BC1DB482CDC9319A
E00337D4BACDB772A0AF41A37B7487D18EAF3B1D7814AA6AC6C380CFA54AF3C4
A719AF376101A29048FB9A1C13C4C3B8D698E0B95010E45979CC0C5FEC1E2C5A
0D649616522163EBB7F252C42F8ABFFDDD4BC08B01CFCC803315604A54EE4B04
40210C8199E468EA98D9CEE1CD1BED2052DB5BECE703C3BCE59E69B43C9EA7CA
83FECBB00F481DF8D781375733E7AB213CACB1C5D89D1199BE25EE125BA14468
3739A0D49CA097F4A4312F813D16AE711ED93674E7C17406F7CECC5BBAC869A6
B6E96AC1E1EA3B1B825BE7B01AD795045EB21D616843268367D36A25AD31AE36
EFF746CC8B04B159E02A64B46D7EE79E36B81BC30C9D496E9909DDDE64276D27
B332756CBC26AB2F43BD5044FE6EAB4CB6D97FB01616ACE80619670A5634DA45
2063AC31E6623EBF5E6BC94953B27E09609166FBF0716A1ED0DB7433F88DE0C5
6F058D8CF1C6F8346EF8544252F77B6EF1BF6FC0C3891BBEBAF2E34746980AC4
0E55EC3F1B2B269CE31EB21BC481455F670E3A688E51279AEAD7C473A4C7081D
3AF5D76C1FEB31829FCBAAAFFB3660821EF1B28B0731E3AFB289FD5AAA3AD0C0
6BECFE51EBC7329A0AD99A9A832D2DB5AE65C154B35E5BFF298BB5A1C7CCC759
2A37CAD6D57FD1A9B2FED786288982D79DFF01159DE029DB0F0000
}
