diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 8ced2e6acd..0dfceb183d 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,10 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2011-02-15 17:31 UTC+0200 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt)
+  * harbour/contrib/rddads/ads.ch
+    * deleted ADS specific commands with general names
+
 2011-02-15 13:39 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/src/compiler/gencc.c
     * added workaround for C compilers which cannot compile very long
diff --git a/harbour/contrib/rddads/ads.ch b/harbour/contrib/rddads/ads.ch
index 6cae975c7b..d9e6f6e336 100644
--- a/harbour/contrib/rddads/ads.ch
+++ b/harbour/contrib/rddads/ads.ch
@@ -274,51 +274,3 @@
 #define ADS_DD_DFV_UNKNOWN                1
 #define ADS_DD_DFV_NONE                   2
 #define ADS_DD_DFV_VALUES_STORED          3
-
-/* Commands */
-
-#command SET FILETYPE TO <x:NTX,CDX,ADT,VFP>                              ;
-      => AdsSetFileType( iif( Upper( <(x)> ) == "NTX", ADS_NTX,           ;
-                         iif( Upper( <(x)> ) == "CDX", ADS_CDX,           ;
-                         iif( Upper( <(x)> ) == "VFP", ADS_VFP, ADS_ADT ) ) ) )
-
-#command SET SERVER LOCAL   => AdsSetServerType( ADS_LOCAL_SERVER )
-#command SET SERVER REMOTE  => AdsSetServerType( ADS_REMOTE_SERVER )
-
-#command SET AXS LOCKING <x:ON,OFF>                                   ;
-      => AdsLocking( Upper( <(x)> ) == "ON" )
-
-#command SET RIGHTS CHECKING <x:ON,OFF>                               ;
-      => AdsRightsCheck( Upper( <(x)> ) == "ON" )
-
-#command SET CHARTYPE TO <x:ANSI,OEM>                                 ;
-      => AdsSetCharType( iif( Upper( <(x)> ) == "OEM", ADS_OEM, ADS_ANSI ) )
-
-#command COMMIT                 => AdsWriteAllRecords()
-#command BEGIN TRANSACTION      => AdsBeginTransaction()
-#command COMMIT TRANSACTION     => AdsCommitTransaction()
-#command ROLLBACK TRANSACTION   => AdsRollback()
-
-#command AUTOUSE <(db)> VIA <rdd> ALTERNATE <altrdd>                       ;
-         [ALIAS <a>]                                                       ;
-         [<new: NEW>]                                                      ;
-         [<ex: EXCLUSIVE>]                                                 ;
-         [<sh: SHARED>]                                                    ;
-         [<ro: READONLY>]                                                  ;
-         [INDEX <(index1)> [, <(indexn)>]]                                 ;
-                                                                           ;
-      => IF AdsIsServerLoaded( <(db)> ) > 0                                ;
-       ;    dbUseArea(                                                     ;
-                      <.new.>, <rdd>, <(db)>, <(a)>,                       ;
-                      iif( <.sh.> .OR. <.ex.>, !<.ex.>, NIL ), <.ro.>      ;
-                     )                                                     ;
-            [; dbSetIndex( <(index1)> )]                                   ;
-            [; dbSetIndex( <(indexn)> )]                                   ;
-       ; ELSE                                                              ;
-       ;    dbUseArea(                                                     ;
-                      <.new.>, <altrdd>, <(db)>, <(a)>,                    ;
-                      iif( <.sh.> .OR. <.ex.>, !<.ex.>, NIL ), <.ro.>      ;
-                     )                                                     ;
-            [; dbSetIndex( <(index1)> )]                                   ;
-            [; dbSetIndex( <(indexn)> )]                                   ;
-       ; ENDIF