fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2004-04-19 11:43 UTC+0300 Chen Kedem <niki@actcom.co.il>

Browse Source
This commit is contained in:
Chen Kedem
2004-04-19 08:44:06 +00:00
parent abe158c8d0
commit 1144986ffa
3 changed files with 13 additions and 330 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
harbour/ChangeLog
View File

@@ -8,6 +8,15 @@
2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2004-04-19 11:43 UTC+0300 Chen Kedem <niki@actcom.co.il>
* doc/en/rdd.txt
- Remove docs for: RDDLIST(), RDDNAME(), RDDSETDEFAULT(), __RDDSETDEFAULT()
because of copyright violation! (the file is now EMPTY)
* doc/en/rdddb.txt
- Remove docs for: __DBCONTINUE(), __DBZAP()
because of copyright violation!
2004-04-17 12:30 UTC+0100 Ryszard Glab <rglab@imid.med.pl>
* include/hbapi.h
* source/rtl/empty.c

217
harbour/doc/en/rdd.txt
View File

@@ -6,222 +6,11 @@
* The following parts are Copyright of the individual authors.
* www - http://www.harbour-project.org
*
* Copyright 1999 Luiz Rafael Culik <culik@sl.conex.net>
* DB*() documentation
* ORD*() documentation
* RDD*() documentation
*
* See doc/license.txt for licensing terms.
*
*/
/* $DOC$
* $FUNCNAME$
* RDDLIST()
* $CATEGORY$
* Database
* $ONELINER$
* Return an array of the available Replaceable Database Drivers
* $SYNTAX$
* RDDLIST([<nRDDType>]) --> aRDDList
* $ARGUMENTS$
* <nRDDType> is an integer that represents the type of the RDD you
* wish to list. The constants RDT_FULL and RDT_TRANSFER represent the two
* types of RDDs currently available.
*
* RDDType Summary
* ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
* Constant Value Meaning
* ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
* RDT_FULL 1 Full RDD implementation
* RDT_TRANSFER 2 Import/Export only driver
* ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
*
* RDT_FULL identifies full-featured RDDs that have all the capabilities
* associated with an RDD.
*
* RDT_TRANSFER identifies RDDs of limited capability. They can only
* transfer records between files. You cannot use these limited RDD
* drivers to open a file in a work area. The SDF and DELIM drivers are
* examples of this type of RDD. They are only used in the implementation
* of APPEND FROM and COPY TO with SDF or DELIMITED files.
* $RETURNS$
* RDDLIST() returns a one-dimensional array of the RDD names registered
* with the application as <nRDDType>.
* $DESCRIPTION$
* RDDLIST() is an RDD function that returns a one-dimensional array that
* lists the available RDDs.
*
* If you do not supply <nRDDType>, all available RDDs, regardless of type,
* are returned.
* $EXAMPLES$
* In this example RDDLIST() returns an array containing the
* character strings, "DBF", "SDF", "DELIM", "DBFCDX", and "DBFNTX":
*
* REQUEST DBFCDX
*
* .
* . < statements >
* .
*
* aRDDs := RDDLIST()
*
* // Returns {"DBF", SDF", "DELIM", "DBFCDX", "DBFNTX" }
*
* In this example, RDDLIST() returns an array containing the
* character strings, "SDF" and "DELIM":
*
* #include "rddsys.ch"
* .
* . < statements >
* .
* aImpExp := RDDLIST( RDT TRANSFER )
*
* $TESTS$
*
* $STATUS$
* R
* $COMPLIANCE$
*
* $SEEALSO$
*
* $INCLUDE$
* RDDSYS.CH
* $END$
/*
NOTE: I deleted all the information in this file due to copyright
vilolation! 2004-4-19 [ckedem].
*/
/* $DOC$
* $FUNCNAME$
* RDDNAME()
* $CATEGORY$
* Database
* $ONELINER$
* Return the name of the currently active RDD
* $SYNTAX$
* RDDNAME() --> cRDDName
* $ARGUMENTS$
*
* $RETURNS$
* Returns a character string, cRDDName, the registered name of the active
* RDD in the current or specified work area.
* $DESCRIPTION$
* RDDNAME() is an RDD function that returns a character string, cRDDName,
* the name of the active RDD in the current or specified work area.
*
* You can specify a work area other than the currently active work area by
* aliasing the function.
* $EXAMPLES$
* USE Customer VIA "DBFNTX" NEW
* USE Sales VIA "DBFCDX" NEW
*
* ? RDDNAME() // Returns: DBFCDX
* ? Customer->( RDDNAME() ) // Returns: DBFNTX
* ? Sales->( RDDNAME() ) // Returns: DBFCDX
* $TESTS$
*
* $STATUS$
* R
* $COMPLIANCE$
*
* $SEEALSO$
* RDDLIST()
* $INCLUDE$
*
* $END$
*/
/* $DOC$
* $FUNCNAME$
* RDDSETDEFAULT()
* $CATEGORY$
* Database
* $ONELINER$
* Set or return the default RDD for the application
* $SYNTAX$
* RDDSETDEFAULT([<cNewDefaultRDD>])
* --> cPreviousDefaultRDD
*
* $ARGUMENTS$
* <cNewDefaultRDD> is a character string, the name of the RDD that is
* to be made the new default RDD in the application.
* $RETURNS$
* RDDSETDEFAULT() returns a character string, cPreviousDefaultRDD, the
* name of the previous default driver. The default driver is the driver
* that HARBOUR uses if you do not explicitly specify an RDD with the
* VIA clause of the USE command.
* $DESCRIPTION$
* RDDSETDEFAULT() is an RDD function that sets or returns the name of the
* previous default RDD driver and, optionally, sets the current driver to
* the new RDD driver specified by cNewDefaultRDD. If <cNewDefaultDriver>
* is not specified, the current default driver name is returned and
* continues to be the current default driver.
*
* This function replaces the DBSETDRIVER() function.
* $EXAMPLES$
* // If the default driver is not DBFNTX, make it the default
*
* IF ( RDDSETDEFAULT() != "DBFNTX" )
* cOldRdd := RDDSETDEFAULT( "DBFNTX" )
* ENDIF
* $TESTS$
*
* $STATUS$
* R
* $COMPLIANCE$
*
* $SEEALSO$
* DBSETDRIVER()
* $INCLUDE$
*
* $END$
*/
/* $DOC$
* $FUNCNAME$
* __RDDSETDEFAULT()
* $CATEGORY$
* Database
* $ONELINER$
* Set or return the default RDD for the application
* $SYNTAX$
* __RDDSETDEFAULT([<cNewDefaultRDD>])
* --> cPreviousDefaultRDD
*
* $ARGUMENTS$
* <cNewDefaultRDD> is a character string, the name of the RDD that is
* to be made the new default RDD in the application.
* $RETURNS$
* __RDDSETDEFAULT() returns a character string, cPreviousDefaultRDD, the
* name of the previous default driver. The default driver is the driver
* that HARBOUR uses if you do not explicitly specify an RDD with the
* VIA clause of the USE command.
* $DESCRIPTION$
* RDDSETDEFAULT() is an RDD function that sets or returns the name of the
* previous default RDD driver and, optionally, sets the current driver to
* the new RDD driver specified by cNewDefaultRDD. If <cNewDefaultDriver>
* is not specified, the current default driver name is returned and
* continues to be the current default driver.
*
* This function replaces the DBSETDRIVER() function.
* $EXAMPLES$
* // If the default driver is not DBFNTX, make it the default
*
* IF ( __RDDSETDEFAULT() != "DBFNTX" )
* cOldRdd := __RDDSETDEFAULT( "DBFNTX" )
* ENDIF
* $TESTS$
*
* $STATUS$
* R
* $COMPLIANCE$
*
* $SEEALSO$
* DBSETDRIVER()
* $INCLUDE$
*
* $END$
*/

117
harbour/doc/en/rdddb.txt
View File

@@ -369,76 +369,6 @@
* $END$
*/
/* $DOC$
* $FUNCNAME$
* __DBCONTINUE()
* $CATEGORY$
* Database
* $ONELINER$
* Resume a pending LOCATE
* $SYNTAX$
* __DbCONTINUE() --> NIL
* $RETURNS$
* __DbCONTINUE() Always return NIL
* $DESCRIPTION$
* __DBCONTINUE is a database command that searches from the current record
* position for the next record meeting the most recent LOCATE condition
* executed in the current work area. It terminates when a match is found
* or end of file is encountered. If __DBCONTINUE is successful, the matching
* record becomes the current record and FOUND() returns true (.T.); if
* unsuccessful, FOUND() returns false (.F.).
*
* Each work area may have an active LOCATE condition. In CA-Clipper, a
* LOCATE condition remains pending until a new LOCATE condition is
* specified. No other commands release the condition.
*
* Notes
*
* Scope and WHILE condition: Note that the scope and WHILE
* condition of the initial LOCATE are ignored; only the FOR condition
* is used with CONTINUE. If you are using a LOCATE with a WHILE
* condition and want to continue the search for a matching record, use
* SKIP and then repeat the original LOCATE statement adding REST as the
* scope.
*
* $EXAMPLES$
* This example scans records in Sales.dbf for a particular
* salesman and displays a running total sales amounts:
*
* LOCAL nRunTotal := 0
* USE Sales NEW
* LOCATE FOR Sales->Salesman = "1002"
* DO WHILE FOUND()
* ? Sales->Salesname, nRunTotal += Sales->Amount
* __DBCONTINUE()
* ENDDO
*
* This example demonstrates how to continue if the pending
* LOCATE scope contains a WHILE condition:
*
* LOCAL nRunTotal := 0
* USE Sales INDEX Salesman NEW
* SEEK "1002"
* LOCATE REST WHILE Sales->Salesman = "1002";
* FOR Sales->Amount > 5000
* DO WHILE FOUND()
* ? Sales->Salesname, nRunTotal += Sales->Amount
* SKIP
* LOCATE REST WHILE Sales->Salesman = "1002";
* FOR Sales->Amount > 5000
* ENDDO
*
* $STATUS$
* R
* $COMPLIANCE$
* This function is CA-Clipper compliant.
* $FILES$
* Library is rdd
* $SEEALSO$
* EOF(),FOUND()
* $END$
*/
/* $DOC$
* $FUNCNAME$
* DBCREATE()
@@ -695,7 +625,7 @@
* $CATEGORY$
* Database
* $ONELINER$
* Moves the record pointer to the bottom of the database.
* Moves the record pointer to the top of the database.
* $SYNTAX$
* DBGOTOP() --> NIL
* $RETURNS$
@@ -1288,48 +1218,3 @@
* $END$
*/
/* $DOC$
* $FUNCNAME$
* __DBZAP()
* $CATEGORY$
* Database
* $ONELINER$
* Remove all records from the current database file
* $SYNTAX$
* __DbZap() --> NIL
* $RETURNS$
* __DbZap() will always return NIL
* $DESCRIPTION$
* __DbZap() is a database command that permanently removes all records
* from files open in the current work area. This includes the current
* database file, index files, and associated memo file. Disk space
* previously occupied by the ZAPped files is released to the operating
* system.
*
* __DbZap() performs the same operation as DELETE ALL followed by PACK
* but is almost instantaneous.
*
* To ZAP in a network environment, the current database file must be
* USEd EXCLUSIVEly.
*
* $EXAMPLES$
* This example demonstrates a typical ZAP operation in a network
* environment:
*
* USE Sales EXCLUSIVE NEW
* IF !NETERR()
* SET INDEX TO Sales, Branch, Salesman
* __dbZAP()
* CLOSE Sales
* ELSE
* ? "Zap operation failed"
* BREAK
* ENDIF
* $STATUS$
* R
* $COMPLIANCE$
* This function is CA Clipper compliant
* $FILES$
* Library is rdd
* $END$
*/