diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index b934deaadd..3e9d5135dc 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,10 @@
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2003-01-28 22:20 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
+  * source/rdd/dbcmd.c
+    ! Fixed a bug with APPEND FROM ..., COPY TO..., when there was a memo field
+
 2003-01-28 13:05 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
   * source/vm/hvm.c
     ! Little fix to the previous change
diff --git a/harbour/source/rdd/dbcmd.c b/harbour/source/rdd/dbcmd.c
index 0a4e7dfd48..0233608229 100644
--- a/harbour/source/rdd/dbcmd.c
+++ b/harbour/source/rdd/dbcmd.c
@@ -3552,6 +3552,7 @@ static LPAREANODE GetTheOtherArea( char *szDriver, char * szFileName, BOOL creat
   USHORT     uiRddID;
   PHB_FNAME  pFileName;
   DBOPENINFO pInfo;
+  char * szDbfName;
 
   pRDDNode = hb_rddFindNode( szDriver, &uiRddID );  // find the RDD
 
@@ -3564,7 +3565,8 @@ static LPAREANODE GetTheOtherArea( char *szDriver, char * szFileName, BOOL creat
 /* Fill pInfo structure */
   memset( &pInfo, 0, sizeof(DBOPENINFO) );
   pInfo.uiArea = uiRddID;
-  pInfo.abName = ( BYTE * )  hb_xgrab( _POSIX_PATH_MAX + 1 );
+  szDbfName = ( BYTE * )  hb_xgrab( _POSIX_PATH_MAX + 1 );
+  pInfo.abName = szDbfName;
   strcpy( ( char * ) pInfo.abName, szFileName );
   pInfo.atomAlias = ( BYTE * ) "__TMPAREA";
   pInfo.fShared = FALSE;
@@ -3674,7 +3676,7 @@ static LPAREANODE GetTheOtherArea( char *szDriver, char * szFileName, BOOL creat
     hb_errRT_DBCMD( EG_OPEN, 0, NULL, "DBAPP" ); // Could not open it
     return NULL;
   }
-  hb_xfree( pInfo.abName );
+  hb_xfree( szDbfName );
   return pAreaNode;
 }