Przemyslaw just fixed it, in't this guy just great?! Thanks Przemyslaw. 2009-05-14 00:23 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/contrib/rddads/ads1.c ! added workaround for ACE bug: character fields longer then 23 bytes are increased by one byte when read by AdsGetField().
fmancera wrote: > > Hello Abe, > >> with the following test.prgProc MAIN() >> >> >> ---------- >> REQUEST ADS >> AdsSetServerType( 1 ) >> >> dbCreate( "test.DBF", {; >> { "ITEMID", "C", 8, 0 }, ; >> { "ITEM", "C", 12, 0 }, ; >> { "CLASS", "C", 8, 0 }, ; >> { "SUB", "C", 8, 0 }, ; >> { "CQTY", "N", 7, 2 }, ; >> { "R_PAK_BULK", "C", 1, 0 }, ; >> { "C_PAK_BULK", "C", 1, 0 }, ; >> { "LDESC", "C", 30, 0 }, ; >> { "MAN", "C", 15, 0 }, ; >> { "BRAND", "C", 15, 0 }, ; >> { "SHELF", "C", 6, 0 }, ; >> { "DESC", "C", 40, 0 }, ; >> { "MINS", "N", 8, 2 }, ; >> { "ONHAND", "N", 15, 2 }, ; >> { "PRICE", "N", 6, 2 }, ; >> { "PRICE2", "N", 6, 2 }} ) >> >> >> USE test VIA "ADS" SHARED >> for lop := 1 to 100 >> append blank >> NEXT >> >> BROWSE() >> ------------ >> and make command >> >> hbmk2 test -lrddads -lace32 >> >> now look at field DESC it's being expended to lenght 41 with a garbage >> character at the end. > > I had that problem. I solved using the latest ADS 9.10 SDK. > > Regards, > > Fernando Mancera > www.viaopen.com > _______________________________________________ > Harbour mailing list > Harbour@harbour-project.org > http://lists.harbour-project.org/mailman/listinfo/harbour > > -- View this message in context: http://n2.nabble.com/Bug-in-ADS-tp2886000p2887030.html Sent from the harbour-devel mailing list archive at Nabble.com. _______________________________________________ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour