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: