From 517406d788bf6882b257ae1d699f5ed72f6bee12 Mon Sep 17 00:00:00 2001
From: Luiz Rafael Culik <culik@sl.conex.net>
Date: Mon, 8 Jul 2002 13:14:59 +0000
Subject: [PATCH] See changelog 2002-07-08 10:15 UTC-0300

---
 harbour/contrib/rdd_ads/ads1.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/harbour/contrib/rdd_ads/ads1.c b/harbour/contrib/rdd_ads/ads1.c
index c1cc3b1ff1..72210240ee 100644
--- a/harbour/contrib/rdd_ads/ads1.c
+++ b/harbour/contrib/rdd_ads/ads1.c
@@ -1068,7 +1068,7 @@ static ERRCODE adsGetValue( ADSAREAP pArea, USHORT uiIndex, PHB_ITEM pItem )
                              ( int ) pField->uiLen - ( ( int ) pField->uiDec + 1 ),
                              ( int ) pField->uiDec );
          else
-            hb_itemPutNLLen( pItem, atol( (char *) pBuffer ), ( int ) pField->uiLen );
+            hb_itemPutNDLen( pItem, atol( (char *) pBuffer ), ( int ) pField->uiLen );
          break;
 
       case HB_IT_DATE: