From 62cf87b2f16ad38e994c1678c7b4078ff91bc5e1 Mon Sep 17 00:00:00 2001 From: Luiz Rafael Culik Date: Sun, 19 Aug 2001 13:53:14 +0000 Subject: [PATCH] See changelog 2001-08-19 10:50 GMT -3 --- harbour/ChangeLog | 4 ++++ harbour/source/rdd/rddord.prg | 8 ++++++++ 2 files changed, 12 insertions(+) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index b9483c028a..ad46fd8772 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,7 @@ +2001-08-19 10:50 GMT -3 Luiz Rafael Culik + *source/rdd/rddord.prg + *Mapped functions to 10 character for ORDLISTCLE(),ORDLISTREB(),ORDSETFOCU() + 2001-08-19 10:40 GMT -3 Luiz Rafael Culik +source/rdd/dbfuncs.prg * Code for Ca-Clipper MApper DB function to 10 characters diff --git a/harbour/source/rdd/rddord.prg b/harbour/source/rdd/rddord.prg index ea54ab46e1..4bfbaa796b 100644 --- a/harbour/source/rdd/rddord.prg +++ b/harbour/source/rdd/rddord.prg @@ -91,3 +91,11 @@ FUNCTION IndexKey( nOrder ) RETURN "" +FUNCTION ORDLISTCLE() + RETURN ORDLISTCLEAR() + +FUNCTION ORDLISTREB() + RETURN ORDLISTREBUILD() + +FUNCTION ORDSETFOCU(xOrder,cFile) + RETURN ORDSETFOCUS(xOrder,cFile)