Added function HB_AdoRddGetRecordSet( [<nWorkArea>] ) --> oAdoRecordset

2007-05-09 08:55:02 +00:00
parent a1f1ed01a2
commit 9e5dc9cc23
1 changed files with 7 additions and 1 deletions
--- a/harbour/contrib/adordd/adordd.prg
+++ b/harbour/contrib/adordd/adordd.prg
@@ -847,4 +847,10 @@ function HB_AdoRddGetCatalog( nWA )

   DEFAULT nWA TO Select()
   
-return s_aCatalogs[ nWA ]   
+return s_aCatalogs[ nWA ]   
+
+function HB_AdoRddGetRecordSet( nWA )
+
+   DEFAULT nWA TO Select()
+   
+return USRRDD_AREADATA( nWA )[ 1 ]