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

Merge https://github.com/harbour/core

Browse Source
This commit is contained in:
Viktor Szakats
2013-03-25 16:16:58 +01:00
parent 28af20f1f0 263d25222e
commit 777df7c782
99 changed files with 1280 additions and 1382 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
.travis.yml
View File

@@ -2,4 +2,20 @@ language: c
compiler: gcc
script: make
before_install:
- sudo apt-get install -qq libncurses-dev
- sudo apt-get install -qq libslang2-dev
- sudo apt-get install -qq libgpm-dev
- sudo apt-get install -qq liballegro4.2-dev
- sudo apt-get install -qq libcairo2-dev
- sudo apt-get install -qq libcups2-dev
- sudo apt-get install -qq libcurl4-openssl-dev
- sudo apt-get install -qq firebird2.1-dev
- sudo apt-get install -qq libfreeimage-dev
- sudo apt-get install -qq libgd2-xpm-dev
- sudo apt-get install -qq libgs-dev
- sudo apt-get install -qq libmagic-dev
- sudo apt-get install -qq libmysqlclient15-dev
- sudo apt-get install -qq unixodbc-dev
- sudo apt-get install -qq libpq-dev
notifications:
email: false

117
ChangeLog.txt
View File

@@ -10,6 +10,123 @@
* Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
*/
2013-03-25 16:14 UTC+0100 Viktor Szakats (harbour syenar.net)
* extras/template/tests/hbmk.hbm
* reverted to not refer to hbtest.hbc
* README.txt
* sections renumbered
+ updated the way to submit patches to use Git facilities
+ it's now an UTF-8 file
2013-03-25 01:21 UTC+0100 Viktor Szakats (harbour syenar.net)
* contrib/hbct/doc/en/ctstr.txt
* deleted values of constants from docs
2013-03-24 23:49 UTC+0100 Viktor Szakats (harbour syenar.net)
* extras/hbdoc/hbdoc.prg
+ handle unknown compliance strings gracefully
2013-03-24 23:47 UTC+0100 Viktor Szakats (harbour syenar.net)
- contrib/hbmisc/doc/en/ht_doc.txt
* contrib/hbmisc/doc/en/ht_conv.txt
* doc cleanups
2013-03-24 23:38 UTC+0100 Viktor Szakats (harbour syenar.net)
* extras/hbdoc/_tmplates.prg
* extras/hbdoc/hbdoc.prg
+ several NF docs validation errors are now considered warnings only.
This way contrib docs are now included.
2013-03-24 23:37 UTC+0100 Viktor Szakats (harbour syenar.net)
* contrib/rddads/doc/en/readme.txt
! added missing category
2013-03-24 22:39 UTC+0100 Viktor Szakats (harbour syenar.net)
* doc/en/subcodes.txt
* extras/hbdoc/_tmplates.prg
* extras/hbdoc/hbdoc.prg
* extras/httpsrv/uhttpd.prg
* tests/fixcase.hb
* cleanups
2013-03-24 21:39 UTC+0100 Viktor Szakats (harbour syenar.net)
* doc/en/browse.txt
* doc/en/diskspac.txt
* doc/en/file.txt
* doc/en/objfunc.txt
* doc/en/rdddb.txt
* cleanups
2013-03-24 21:25 UTC+0100 Viktor Szakats (harbour syenar.net)
* doc/en/datetime.txt
* cleanups
2013-03-24 20:22 UTC+0100 Viktor Szakats (harbour syenar.net)
* contrib/hbct/doc/en/*.txt
* contrib/hbgt/doc/en/hbgt.txt
* contrib/hbmisc/doc/en/*.txt
* contrib/hbziparc/doc/en/hbziparc.txt
* contrib/rddads/doc/en/adsfuncs.txt
* doc/en/*.txt
! space after comma
! unicode fix
! minor corrections
* extras/template/tests/hbmk.hbm
* cleaned recently added comment
2013-03-23 18:01 UTC+0100 Viktor Szakats (harbour syenar.net)
* extras/httpsrv/home/xsl/based.xsl
! missing EOL @ EOF
2013-03-23 17:51 UTC+0100 Viktor Szakats (harbour syenar.net)
* contrib/hbhttpd/tests/files/main.css
* extras/httpsrv/home/css/base.css
* extras/httpsrv/home/index.html
* extras/httpsrv/home/js/ajax.js
* extras/httpsrv/home/postsample.html
* extras/httpsrv/home/testajax.html
* extras/httpsrv/home/testxmldb.html
* extras/httpsrv/home/xsl/based.xsl
* extras/httpsrv/home/xsl/basep.xsl
! EOL fixes to avoid Git warning
2013-03-23 17:33 UTC+0100 Viktor Szakats (harbour syenar.net)
* extras/template/tests/hbmk.hbm
+ comment
+ link with hbtest automatically
2013-03-23 17:29 UTC+0100 Viktor Szakats (harbour syenar.net)
* extras/httpsrv/home/counter.html
! EOL fix
2013-03-23 17:26 UTC+0100 Viktor Szakats (harbour syenar.net)
* utils/hbmk2/hbmk2.prg
+ added new note about processing of target type options
2013-03-23 13:19 UTC+0100 Viktor Szakats (harbour syenar.net)
* contrib/hbnetio/utils/hbnetio/hbnetio.hbp
* contrib/hbnetio/utils/hbnetio/hbnetio.prg
* extras/guestbk/guestbk.hbp
* extras/guestbk/guestbk.prg
* extras/hbdoc/hbdoc.hbp
* extras/hbdoc/hbdoc.prg
* extras/httpsrv/uhttpd.hbp
* extras/httpsrv/uhttpd.prg
! partially reverted to pick sources from .hbp and
only use SET PROCEDURE in script mode. Ugly, but
SET PROCEDURE can only find sources in cwd.
2013-03-23 12:53 UTC+0100 Viktor Szakats (harbour syenar.net)
* contrib/hbnetio/utils/hbnetio/hbnetio.hbp
* README.txt
! corrections to prevs
2013-03-22 19:05 UTC+0100 Viktor Szakats (harbour syenar.net)
* contrib/xhb/hbdll.ch
+ removed unnecessary win platform guard. (In Harbour
dynlib calls work on every OS)
2013-03-22 11:12 UTC+0100 Viktor Szakats (harbour syenar.net)
* README.txt
+ added link to automated build service page

85
README.txt
View File

@@ -9,30 +9,30 @@ WELCOME TO HARBOUR
UI and database backends, its own make system and a large
collection of libraries and interfaces to many popular APIs.
http://harbour-project.org/
<http://harbour-project.org/>
TABLE OF CONTENT
================
0. GUARANTEES AND LIABILITY
1. HOW TO BUILD AND INSTALL HARBOUR FROM SOURCE
2. HOW TO DO A PARTIAL [RE]BUILD
3. HOW TO CREATE DISTRIBUTABLE PACKAGES
4. HOW TO ENABLE OPTIONAL COMPONENTS BEFORE BUILD
5. SUPPORTED PLATFORMS AND C COMPILERS
6. OPTIONS AVAILABLE WHEN BUILDING HARBOUR
7. DEBUGGING OPTIONS
8. EXAMPLES
9. HOW TO GET HARBOUR
10. TROUBLESHOOTING
11. QUICK START TO BUILD YOUR OWN HARBOUR APPLICATIONS
12. BUILD HOST-PLATFORM/SHELL - TARGET-PLATFORM/COMPILER COMPATIBILITY MATRIX
13. LINKS TO EXTERNAL COMPONENTS
14. HOW TO PARTICIPATE
15. FOR MORE INFORMATION
1. GUARANTEES AND LIABILITY
2. HOW TO BUILD AND INSTALL HARBOUR FROM SOURCE
3. HOW TO DO A PARTIAL [RE]BUILD
4. HOW TO CREATE DISTRIBUTABLE PACKAGES
5. HOW TO ENABLE OPTIONAL COMPONENTS BEFORE BUILD
6. SUPPORTED PLATFORMS AND C COMPILERS
7. OPTIONS AVAILABLE WHEN BUILDING HARBOUR
8. DEBUGGING OPTIONS
9. EXAMPLES
10. HOW TO GET HARBOUR
11. TROUBLESHOOTING
12. QUICK START TO BUILD YOUR OWN HARBOUR APPLICATIONS
13. BUILD HOST-PLATFORM/SHELL - TARGET-PLATFORM/COMPILER COMPATIBILITY MATRIX
14. LINKS TO EXTERNAL COMPONENTS
15. HOW TO PARTICIPATE
16. FOR MORE INFORMATION
0. GUARANTEES AND LIABILITY
1. GUARANTEES AND LIABILITY
===========================
This document and all other parts of Harbour are distributed in the
@@ -49,7 +49,7 @@ TABLE OF CONTENT
of the project.
1. HOW TO BUILD AND INSTALL HARBOUR FROM SOURCE
2. HOW TO BUILD AND INSTALL HARBOUR FROM SOURCE
===============================================
==========================================================================
@@ -245,7 +245,7 @@ TABLE OF CONTENT
your $PATH.
2. HOW TO DO A PARTIAL [RE]BUILD
3. HOW TO DO A PARTIAL [RE]BUILD
================================
If you want to [re]build only a specific part of Harbour, like
@@ -264,7 +264,7 @@ TABLE OF CONTENT
../../bin/<plat>/<comp>/hbmk2 ../make.hb [clean] [custom hbmk2 options]
3. HOW TO CREATE DISTRIBUTABLE PACKAGES
4. HOW TO CREATE DISTRIBUTABLE PACKAGES
=======================================
Source .tgz on *nixes
@@ -345,7 +345,7 @@ TABLE OF CONTENT
steps before calling the script.
4. HOW TO ENABLE OPTIONAL COMPONENTS BEFORE BUILD
5. HOW TO ENABLE OPTIONAL COMPONENTS BEFORE BUILD
=================================================
Certain Harbour parts (typically contrib packages) depend on 3rd
@@ -487,6 +487,7 @@ TABLE OF CONTENT
for zlib support: $ sudo apt-get install zlib1g-dev
for pcre (regex) support: $ sudo apt-get install libpcre3-dev
for contrib/hbsqlit3 lib: $ sudo apt-get install libsqlite3-dev
for contrib/hbexpat lib: $ sudo apt-get install libexpat1-dev
Linux (.rpm based distros: openSUSE, Fedora, CentOS, Mandriva)
--------------------------------------------------------------
@@ -546,7 +547,7 @@ TABLE OF CONTENT
$ make clean
5. SUPPORTED PLATFORMS AND C COMPILERS
6. SUPPORTED PLATFORMS AND C COMPILERS
======================================
You can override target platform autodetection with these HB_PLATFORM values:
@@ -676,7 +677,7 @@ TABLE OF CONTENT
watcom - Open Watcom C/C++
6. OPTIONS AVAILABLE WHEN BUILDING HARBOUR
7. OPTIONS AVAILABLE WHEN BUILDING HARBOUR
==========================================
You can fine-tune Harbour builds with below listed
@@ -821,7 +822,7 @@ TABLE OF CONTENT
executables are required for a cross-build process to succeed.
7. DEBUGGING OPTIONS
8. DEBUGGING OPTIONS
====================
Tracing
@@ -856,7 +857,7 @@ TABLE OF CONTENT
HB_USER_LIBS=cg32
8. EXAMPLES
9. EXAMPLES
===========
for Windows (x86, 32-bit) hosts
@@ -1229,7 +1230,7 @@ TABLE OF CONTENT
---
for Darwin (OS X) hosts
---------------------------
-----------------------
--- To create "Universal" binaries, compatible with pre-Snow Leopard PowerPC and Intel systems
export HB_USER_LDFLAGS="-arch i386 -arch ppc"
@@ -1253,8 +1254,8 @@ TABLE OF CONTENT
gmake OR make HB_PLATFORM=wce
---
9. HOW TO GET HARBOUR
=====================
10. HOW TO GET HARBOUR
======================
Stable versions
---------------
@@ -1314,7 +1315,7 @@ TABLE OF CONTENT
https://travis-ci.org/harbour/core
10. TROUBLESHOOTING
11. TROUBLESHOOTING
===================
Always evaluate these points before reporting an issue on the developers'
@@ -1408,7 +1409,7 @@ TABLE OF CONTENT
functions against CT3 library, etc.)
11. QUICK START TO BUILD YOUR OWN HARBOUR APPLICATIONS
12. QUICK START TO BUILD YOUR OWN HARBOUR APPLICATIONS
======================================================
For all platforms you'll need two things:
@@ -1435,7 +1436,7 @@ TABLE OF CONTENT
https://github.com/harbour/core/blob/master/utils/hbmk2/hbmk2.md
12. BUILD HOST-PLATFORM/SHELL - TARGET-PLATFORM/COMPILER COMPATIBILITY MATRIX
13. BUILD HOST-PLATFORM/SHELL - TARGET-PLATFORM/COMPILER COMPATIBILITY MATRIX
=============================================================================
&nbsp;| host<br />plat | target<br />plat/comp | target<br />cpu
@@ -1552,7 +1553,7 @@ TABLE OF CONTENT
*nix / POSIX shell
13. LINKS TO EXTERNAL COMPONENTS
14. LINKS TO EXTERNAL COMPONENTS
================================
C/C++ Compilers/Shells:
@@ -1754,18 +1755,20 @@ TABLE OF CONTENT
http://git.or.cz/course/svn.html
14. HOW TO PARTICIPATE
15. HOW TO PARTICIPATE
======================
There are several ways to help making Harbour better:
- You can give feedback/suggestions to developers on available
channels.
- You can submit patches or source code on above channels.
Patches are accepted in 'git diff' (or 'diff -u') format,
created from root directory of the repository sandbox.
Zip your patch file before attaching it. Use the extension '.zip'.
Always use the same coding/formatting style as you find in
- Submit a change:
1. Fork Harbour
2. Create a branch (git checkout -b my_mod)
3. Commit your changes (git commit -am "Added my feature")
4. Push to the branch (git push origin my_mod)
5. Open a Pull Request
- Always use the same coding/formatting style as you find in
the files you're patching. The easiest way to achieve this
is to use these commands to format your sources:
$ uncrustify -c <harbour_dir>/bin/harbour.ucf <file.c|.h>
@@ -1787,7 +1790,7 @@ TABLE OF CONTENT
various environments, etc.
15. FOR MORE INFORMATION
16. FOR MORE INFORMATION
========================
Homepage:
@@ -1824,7 +1827,7 @@ TABLE OF CONTENT
https://en.wikipedia.org/wiki/Harbour_compiler
[ Copyright (c) 2009-2013 Viktor Szakats (harbour syenar.net)
[ Copyright (c) 2009-2013 Viktor Szakáts (harbour syenar.net)
Licensed under Creative Commons Attribution-ShareAlike 3.0:
http://creativecommons.org/licenses/by-sa/3.0/
See COPYING.txt. ]

2
contrib/hbct/doc/en/atadjust.txt
View File

@@ -37,6 +37,6 @@
$FILES$
Library is hbct.
$SEEALSO$
SetAtLike(),CSetAtMupa()
SetAtLike(), CSetAtMupa()
$END$
*/

2
contrib/hbct/doc/en/atnum.txt
View File

@@ -47,7 +47,7 @@
$FILES$
Library is hbct.
$SEEALSO$
AtNum(),BeforAtNum(),CSetAtMupa(),SetAtLike()
AtNum(), BeforAtNum(), CSetAtMupa(), SetAtLike()
$END$
*/

4
contrib/hbct/doc/en/charlihb.txt
View File

@@ -30,7 +30,7 @@
$FILES$
Library is hbct.
$SEEALSO$
CharNoList(),CharList(),CharHist()
CharNoList(), CharList(), CharHist()
$END$
*/
@@ -66,6 +66,6 @@
$FILES$
Library is hbct.
$SEEALSO$
CharList(),CharNoList(),CharSList()
CharList(), CharNoList(), CharSList()
$END$
*/

4
contrib/hbct/doc/en/charlist.txt
View File

@@ -30,7 +30,7 @@
$FILES$
Library is hbct.
$SEEALSO$
CharNoList(),CharSList(),CharHist()
CharNoList(), CharSList(), CharHist()
$END$
*/
@@ -65,6 +65,6 @@
$FILES$
Library is hbct.
$SEEALSO$
CharList(),CharSList(),CharHist()
CharList(), CharSList(), CharHist()
$END$
*/

4
contrib/hbct/doc/en/charswap.txt
View File

@@ -30,7 +30,7 @@
$FILES$
Library is hbct.
$SEEALSO$
WordSwap(),CSetRef()
WordSwap(), CSetRef()
$END$
*/
@@ -71,6 +71,6 @@
$FILES$
Library is hbct.
$SEEALSO$
CharSwap(),CSetRef()
CharSwap(), CSetRef()
$END$
*/

6
contrib/hbct/doc/en/color.txt
View File

@@ -139,7 +139,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Standard(),Unselected()
Standard(), Unselected()
$END$
*/
@@ -169,7 +169,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Enhanced(),Unselected()
Enhanced(), Unselected()
$END$
*/
@@ -199,6 +199,6 @@
$FILES$
Library is hbct.
$SEEALSO$
Enhanced(),Standard()
Enhanced(), Standard()
$END$
*/

4
contrib/hbct/doc/en/ctc.txt
View File

@@ -67,7 +67,7 @@
$FILES$
Library is hbct.
$SEEALSO$
ctinit(),ctexit()
ctinit(), ctexit()
$END$
*/
@@ -98,6 +98,6 @@
$FILES$
Library is hbct.
$SEEALSO$
ctinit(),ctexit()
ctinit(), ctexit()
$END$
*/

8
contrib/hbct/doc/en/ctstr.txt
View File

@@ -137,12 +137,10 @@
is set (e.g. "?"), then "?" matches every other character.
<nMode> can be one of the following values that are defined
in ct.ch
in ct.ch:
Definition | Value
----------------------|------
CT_SETATLIKE_EXACT | 0
CT_SETATLIKE_WILDCARD | 1
CT_SETATLIKE_EXACT
CT_SETATLIKE_WILDCARD
$EXAMPLES$

12
contrib/hbct/doc/en/datetime.txt
View File

@@ -25,7 +25,7 @@
$FILES$
Library is hbct.
$SEEALSO$
EoM(),BoQ(),EoQ(),BoY(),EoY()
EoM(), BoQ(), EoQ(), BoY(), EoY()
$END$
*/
@@ -55,7 +55,7 @@
$FILES$
Library is hbct.
$SEEALSO$
BoM(),BoQ(),EoQ(),BoY(),EoY()
BoM(), BoQ(), EoQ(), BoY(), EoY()
$END$
*/
@@ -85,7 +85,7 @@
$FILES$
Library is hbct.
$SEEALSO$
BoM(),EoM(),EoQ(),BoY(),EoY()
BoM(), EoM(), EoQ(), BoY(), EoY()
$END$
*/
@@ -115,7 +115,7 @@
$FILES$
Library is hbct.
$SEEALSO$
BoM(),EoM(),BoQ(),BoY(),EoY()
BoM(), EoM(), BoQ(), BoY(), EoY()
$END$
*/
@@ -145,7 +145,7 @@
$FILES$
Library is hbct.
$SEEALSO$
BoM(),EoM(),BoQ(),EoQ(),EoY()
BoM(), EoM(), BoQ(), EoQ(), EoY()
$END$
*/
@@ -175,6 +175,6 @@
$FILES$
Library is hbct.
$SEEALSO$
BoM(),EoM(),BoQ(),EoQ(),BoY()
BoM(), EoM(), BoQ(), EoQ(), BoY()
$END$
*/

2
contrib/hbct/doc/en/dattime3.txt
View File

@@ -155,7 +155,7 @@
$FILES$
Library is hbct.
$SEEALSO$
SetDate(),TimeValid()
SetDate(), TimeValid()
$END$
*/

10
contrib/hbct/doc/en/finan.txt
View File

@@ -44,7 +44,7 @@
$FILES$
Library is hbct.
$SEEALSO$
PV(),Payment(),Periods(),Rate()
PV(), Payment(), Periods(), Rate()
$END$
*/
@@ -92,7 +92,7 @@
$FILES$
Library is hbct.
$SEEALSO$
FV(),Payment(),Periods(),Rate()
FV(), Payment(), Periods(), Rate()
$END$
*/
@@ -138,7 +138,7 @@
$FILES$
Library is hbct.
$SEEALSO$
PV(),FV(),Periods(),Rate()
PV(), FV(), Periods(), Rate()
$END$
*/
@@ -189,7 +189,7 @@
$FILES$
Library is hbct.
$SEEALSO$
PV(),FV(),Payment(),Rate()
PV(), FV(), Payment(), Rate()
$END$
*/
@@ -232,6 +232,6 @@
$FILES$
Library is hbct.
$SEEALSO$
PV(),FV(),Payment(),Periods()
PV(), FV(), Payment(), Periods()
$END$
*/

2
contrib/hbct/doc/en/numat.txt
View File

@@ -25,6 +25,6 @@
$FILES$
Library is hbct.
$SEEALSO$
CSetAtMupa(),SetAtLike()
CSetAtMupa(), SetAtLike()
$END$
*/

6
contrib/hbct/doc/en/numconv.txt
View File

@@ -7,7 +7,7 @@
$ONELINER$
$SYNTAX$
NToC( <xNumber>[, <nBase>][,<nLength>][,<cPadChar>] ) -> <cNumber>
NToC( <xNumber>[, <nBase>][, <nLength>][, <cPadChar>] ) -> <cNumber>
$ARGUMENTS$
$RETURNS$
@@ -37,7 +37,7 @@
$ONELINER$
$SYNTAX$
CToN( <xNumber>[, <nBase>][,<lMode>] ) -> <nNumber>
CToN( <xNumber>[, <nBase>][, <lMode>] ) -> <nNumber>
$ARGUMENTS$
$RETURNS$
@@ -67,7 +67,7 @@
$ONELINER$
$SYNTAX$
BitToC( <nInteger>, <cBitPattern>[,<lMode>] ) -> <cBitString>
BitToC( <nInteger>, <cBitPattern>[, <lMode>] ) -> <cBitString>
$ARGUMENTS$
$RETURNS$

8
contrib/hbct/doc/en/pos1.txt
View File

@@ -25,7 +25,7 @@
$FILES$
Library is hbct.
$SEEALSO$
PosLower(),PosUpper(),PosRange()
PosLower(), PosUpper(), PosRange()
$END$
*/
@@ -55,7 +55,7 @@
$FILES$
Library is hbct.
$SEEALSO$
PosAlpha(),PosUpper(),PosRange()
PosAlpha(), PosUpper(), PosRange()
$END$
*/
@@ -86,7 +86,7 @@
$FILES$
Library is hbct.
$SEEALSO$
PosAlpha(),PosLower(),PosUpper()
PosAlpha(), PosLower(), PosUpper()
$END$
*/
@@ -116,6 +116,6 @@
$FILES$
Library is hbct.
$SEEALSO$
PosAlpha(),PosLower(),PosRange()
PosAlpha(), PosLower(), PosRange()
$END$
*/

8
contrib/hbct/doc/en/pos2.txt
View File

@@ -25,7 +25,7 @@
$FILES$
Library is hbct.
$SEEALSO$
PosDel(),PosIns(),PosRepl(),CSetRef()
PosDel(), PosIns(), PosRepl(), CSetRef()
$END$
*/
@@ -55,7 +55,7 @@
$FILES$
Library is hbct.
$SEEALSO$
PosChar(),PosIns(),PosRepl()
PosChar(), PosIns(), PosRepl()
$END$
*/
@@ -85,7 +85,7 @@
$FILES$
Library is hbct.
$SEEALSO$
POSCHAR,PosDel(),PosRepl()
POSCHAR, PosDel(), PosRepl()
$END$
*/
@@ -115,6 +115,6 @@
$FILES$
Library is hbct.
$SEEALSO$
PosChar(),PosDel(),PosIns(),CSetRef()
PosChar(), PosDel(), PosIns(), CSetRef()
$END$
*/

2
contrib/hbct/doc/en/relation.txt
View File

@@ -58,6 +58,6 @@
$FILES$
Library is hbct.
$SEEALSO$
CharRelA(),CSetRef()
CharRelA(), CSetRef()
$END$
*/

6
contrib/hbct/doc/en/remove.txt
View File

@@ -25,7 +25,7 @@
$FILES$
Library is hbct.
$SEEALSO$
RemLeft(),RemRight()
RemLeft(), RemRight()
$END$
*/
@@ -55,7 +55,7 @@
$FILES$
Library is hbct.
$SEEALSO$
RemAll(),RemRight()
RemAll(), RemRight()
$END$
*/
@@ -85,6 +85,6 @@
$FILES$
Library is hbct.
$SEEALSO$
RemAll(),RemLeft()
RemAll(), RemLeft()
$END$
*/

6
contrib/hbct/doc/en/replace.txt
View File

@@ -25,7 +25,7 @@
$FILES$
Library is hbct.
$SEEALSO$
ReplLeft(),ReplRight()
ReplLeft(), ReplRight()
$END$
*/
@@ -55,7 +55,7 @@
$FILES$
Library is hbct.
$SEEALSO$
ReplAll(),ReplRight()
ReplAll(), ReplRight()
$END$
*/
@@ -85,6 +85,6 @@
$FILES$
Library is hbct.
$SEEALSO$
ReplAll(),ReplLeft()
ReplAll(), ReplLeft()
$END$
*/

2
contrib/hbct/doc/en/screen1.txt
View File

@@ -7,7 +7,7 @@
$ONELINER$
$SYNTAX$
ScreenAttr( [<nRow>],[<nColumn>] ) -> <nAttr>
ScreenAttr( [<nRow>], [<nColumn>] ) -> <nAttr>
$ARGUMENTS$
<nRow> Designates the line from which to determine the attribute.
The default is the cursor line.

4
contrib/hbct/doc/en/strdiff.txt
View File

@@ -31,9 +31,9 @@
work on most systems. If this simple check fails, -1 is returned.
Also, be aware that there can be an overflow when the penalty points are summed up: Assuming that the
number of transformation operations is in the order of Max(Len(cString1),Len(cString2)), the penalty point
number of transformation operations is in the order of Max(Len(cString1), Len(cString2)), the penalty point
sum, that is internally stored in an "int" variable, is in the order of
(Max(Len(cString1),Len(cString2))*Max(nReplacementPenalty,nDeletionPenalty,nInsertionPentaly).
(Max(Len(cString1), Len(cString2))*Max(nReplacementPenalty, nDeletionPenalty, nInsertionPentaly).
The StrDiff() does not do an overflow check due to time performance reasons. Future versions of StrDiff()
could use a type different to "int" to store the penalty point sum to save memory or to avoid overflows.

12
contrib/hbct/doc/en/token1.txt
View File

@@ -51,7 +51,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Token(),NumToken(),TokenLower(),TokenUpper(),TokenSep()
Token(), NumToken(), TokenLower(), TokenUpper(), TokenSep()
$END$
*/
@@ -114,7 +114,7 @@
$FILES$
Library is hbct.
$SEEALSO$
NumToken(),AtToken(),TokenLower(),TokenUpper(),TokenSep()
NumToken(), AtToken(), TokenLower(), TokenUpper(), TokenSep()
$END$
*/
@@ -144,7 +144,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Token(),AtToken(),TokenLower(),TokenUpper(),TokenSep()
Token(), AtToken(), TokenLower(), TokenUpper(), TokenSep()
$END$
*/
@@ -200,7 +200,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Token(),NumToken(),AtToken(),TokenUpper(),TokenSep(),CSetRef()
Token(), NumToken(), AtToken(), TokenUpper(), TokenSep(), CSetRef()
$END$
*/
@@ -256,7 +256,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Token(),NumToken(),AtToken(),TokenLower(),TokenSep(),CSetRef()
Token(), NumToken(), AtToken(), TokenLower(), TokenSep(), CSetRef()
$END$
*/
@@ -295,6 +295,6 @@
$FILES$
Library is hbct.
$SEEALSO$
Token(),NumToken(),AtToken(),TokenLower(),TokenUpper()
Token(), NumToken(), AtToken(), TokenLower(), TokenUpper()
$END$
*/

18
contrib/hbct/doc/en/token2.txt
View File

@@ -77,7 +77,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Token(),TokenExit(),TokenNext(),TokenNum(),TokenAt(),SaveToken(),RestToken(),TokenEnd()
Token(), TokenExit(), TokenNext(), TokenNum(), TokenAt(), SaveToken(), RestToken(), TokenEnd()
$END$
*/
@@ -113,7 +113,7 @@
Note that <cString> does not have to be the same used in TokenInit(),
so that one can do a "correlational tokenization", i.e. tokenize a string
as if it was another! E.G. using TokenInit() with the string
"AA,BBB" but calling TokenNext() with "CCCEE" would
"AA, BBB" but calling TokenNext() with "CCCEE" would
give first "CC" and then "EE" (because "CCCEE" is not long enough).
$EXAMPLES$
// default behavhiour
@@ -134,7 +134,7 @@
$FILES$
Library is hbct.
$SEEALSO$
TokenInit(),TokenExit(),TokenNum(),TokenAt(),SaveToken(),RestToken(),TokenEnd()
TokenInit(), TokenExit(), TokenNum(), TokenAt(), SaveToken(), RestToken(), TokenEnd()
$END$
*/
@@ -169,7 +169,7 @@
$FILES$
Library is hbct.
$SEEALSO$
TokenInit(),TokenExit(),TokenNext(),TokenAt(),SaveToken(),RestToken(),TokenEnd()
TokenInit(), TokenExit(), TokenNext(), TokenAt(), SaveToken(), RestToken(), TokenEnd()
$END$
*/
@@ -211,7 +211,7 @@
$FILES$
Library is hbct.
$SEEALSO$
TokenInit(),TokenExit(),TokenNext(),TokenNum(),TokenAt(),SaveToken(),RestToken()
TokenInit(), TokenExit(), TokenNext(), TokenNum(), TokenAt(), SaveToken(), RestToken()
$END$
*/
@@ -249,7 +249,7 @@
$FILES$
Library is hbct.
$SEEALSO$
TokenInit(),TokenNext(),TokenNum(),TokenAt(),SaveToken(),RestToken(),TokenEnd()
TokenInit(), TokenNext(), TokenNum(), TokenAt(), SaveToken(), RestToken(), TokenEnd()
$END$
*/
@@ -304,7 +304,7 @@
$FILES$
Library is hbct.
$SEEALSO$
TokenInit(),TokenExit(),TokenNext(),TokenNum(),SaveToken(),RestToken(),TokenEnd()
TokenInit(), TokenExit(), TokenNext(), TokenNum(), SaveToken(), RestToken(), TokenEnd()
$END$
*/
@@ -337,7 +337,7 @@
$FILES$
Library is hbct.
$SEEALSO$
TokenInit(),TokenExit(),TokenNext(),TokenNum(),TokenAt(),RestToken(),TokenEnd()
TokenInit(), TokenExit(), TokenNext(), TokenNum(), TokenAt(), RestToken(), TokenEnd()
$END$
*/
@@ -370,6 +370,6 @@
$FILES$
Library is hbct.
$SEEALSO$
TokenInit(),TokenExit(),TokenNext(),TokenNum(),TokenAt(),SaveToken(),TokenEnd()
TokenInit(), TokenExit(), TokenNext(), TokenNum(), TokenAt(), SaveToken(), TokenEnd()
$END$
*/

28
contrib/hbct/doc/en/trig.txt
View File

@@ -30,7 +30,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Asin(),Acos(),Atan(),Atn2(),Sinh(),Cosh(),Tanh(),RToD(),DToR()
Sin(), Cos(), Tan(), Cot(), Asin(), Acos(), Atan(), Atn2(), Sinh(), Cosh(), Tanh(), RToD(), DToR()
$END$
*/
@@ -65,7 +65,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Cos(),Tan(),Cot(),Asin(),Acos(),Atan(),Atn2(),Sinh(),Cosh(),Tanh(),RToD(),DToR(),Pi()
Cos(), Tan(), Cot(), Asin(), Acos(), Atan(), Atn2(), Sinh(), Cosh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -100,7 +100,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Tan(),Cot(),Asin(),Acos(),Atan(),Atn2(),Sinh(),Cosh(),Tanh(),RToD(),DToR(),Pi()
Sin(), Tan(), Cot(), Asin(), Acos(), Atan(), Atn2(), Sinh(), Cosh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -136,7 +136,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Cot(),Asin(),Acos(),Atan(),Atn2(),Sinh(),Cosh(),Tanh(),RToD(),DToR(),Pi()
Sin(), Cos(), Cot(), Asin(), Acos(), Atan(), Atn2(), Sinh(), Cosh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -171,7 +171,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Asin(),Acos(),Atan(),Atn2(),Sinh(),Cosh(),Tanh(),RToD(),DToR(),Pi()
Sin(), Cos(), Tan(), Asin(), Acos(), Atan(), Atn2(), Sinh(), Cosh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -207,7 +207,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Acos(),Atan(),Atn2(),Sinh(),Cosh(),Tanh(),RToD(),DToR(),Pi()
Sin(), Cos(), Tan(), Cot(), Acos(), Atan(), Atn2(), Sinh(), Cosh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -243,7 +243,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Asin(),Atan(),Atn2(),Sinh(),Cosh(),Tanh(),RToD(),DToR(),Pi()
Sin(), Cos(), Tan(), Cot(), Asin(), Atan(), Atn2(), Sinh(), Cosh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -277,7 +277,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Asin(),Acos(),Atan(),Sinh(),Cosh(),Tanh(),RToD(),DToR(),Pi()
Sin(), Cos(), Tan(), Cot(), Asin(), Acos(), Atan(), Sinh(), Cosh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -318,7 +318,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Asin(),Acos(),Atan(),Sinh(),Cosh(),Tanh(),RToD(),DToR(),Pi()
Sin(), Cos(), Tan(), Cot(), Asin(), Acos(), Atan(), Sinh(), Cosh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -354,7 +354,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Asin(),Acos(),Atan(),Atn2(),Cosh(),Tanh(),RToD(),DToR(),Pi()
Sin(), Cos(), Tan(), Cot(), Asin(), Acos(), Atan(), Atn2(), Cosh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -390,7 +390,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Asin(),Acos(),Atan(),Atn2(),Sinh(),Tanh(),RToD(),DToR(),Pi()
Sin(), Cos(), Tan(), Cot(), Asin(), Acos(), Atan(), Atn2(), Sinh(), Tanh(), RToD(), DToR(), Pi()
$END$
*/
@@ -422,7 +422,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Asin(),Acos(),Atan(),Atn2(),Sinh(),Cosh(),RToD(),DToR(),Pi()
Sin(), Cos(), Tan(), Cot(), Asin(), Acos(), Atan(), Atn2(), Sinh(), Cosh(), RToD(), DToR(), Pi()
$END$
*/
@@ -455,7 +455,7 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Asin(),Acos(),Atan(),Atn2(),Sinh(),Cosh(),Tanh(),DToR(),Pi()
Sin(), Cos(), Tan(), Cot(), Asin(), Acos(), Atan(), Atn2(), Sinh(), Cosh(), Tanh(), DToR(), Pi()
$END$
*/
@@ -487,6 +487,6 @@
$FILES$
Library is hbct.
$SEEALSO$
Sin(),Cos(),Tan(),Cot(),Asin(),Acos(),Atan(),Atn2(),Sinh(),Cosh(),Tanh(),RToD(),Pi()
Sin(), Cos(), Tan(), Cot(), Asin(), Acos(), Atan(), Atn2(), Sinh(), Cosh(), Tanh(), RToD(), Pi()
$END$
*/

2
contrib/hbct/doc/en/wordrepl.txt
View File

@@ -53,6 +53,6 @@
$FILES$
Library is hbct.
$SEEALSO$
CharRepl(),RangeRepl(),PosRepl(),CSetRef(),CSetAtMupa()
CharRepl(), RangeRepl(), PosRepl(), CSetRef(), CSetAtMupa()
$END$
*/

2
contrib/hbct/doc/en/wordtoch.txt
View File

@@ -26,6 +26,6 @@
$FILES$
Library is hbct.
$SEEALSO$
CSetAtMupa(),CharRepl(),WordRepl()
CSetAtMupa(), CharRepl(), WordRepl()
$END$
*/

44
contrib/hbgt/doc/en/hbgt.txt
View File

@@ -7,12 +7,12 @@
$ONELINER$
Return the ascii value of a specified character in a string
$SYNTAX$
gt_AscPos(<cStr>, <nPos>) --> nAscVal
gt_AscPos( <cStr>, <nPos> ) --> nAscVal
$ARGUMENTS$
<cStr> - The string
<nPos> - The position in <cStr>
$RETURNS$
<nAscVal> - The ascii value of SubStr(<cStr>, <nPos>, 1)
<nAscVal> - The ascii value of SubStr( <cStr>, <nPos>, 1 )
$DESCRIPTION$
Return the ascii value of a specified character in a string
Equivalent (but much faster) to
@@ -20,7 +20,7 @@
NOTE:
invalid parameters will return -1
nPos > Len(cStr) will return -2
nPos > Len( cStr ) will return -2
This last behaviour is different to the Funcky function of the
same name. I changed the behaviour because some of the strings
@@ -46,7 +46,7 @@
$ONELINER$
Sum the ascii values in a string.
$SYNTAX$
gt_AsciiSum(<cStr>) --> nSum
gt_AsciiSum( <cStr> ) --> nSum
$ARGUMENTS$
<cStr> - The string to sum
$RETURNS$
@@ -75,7 +75,7 @@
$ONELINER$
Return the position where two strings begin to differ
$SYNTAX$
gt_AtDiff(<cStr1>, <cStr2>) --> nPos
gt_AtDiff( <cStr1>, <cStr2> ) --> nPos
$ARGUMENTS$
<cStr1> - A character string to compare
<cStr2> - The string to compare with
@@ -111,7 +111,7 @@
$ONELINER$
Return a string of all the characters in even positions
$SYNTAX$
gt_CharEven(<cStr>) --> cRet
gt_CharEven( <cStr> ) --> cRet
$ARGUMENTS$
<cStr> - A character string to extract chars from
$RETURNS$
@@ -143,7 +143,7 @@
$ONELINER$
Amalgamate two strings to form the return value
$SYNTAX$
gt_CharMix(<cStr1>, <cStr2>) --> cRet
gt_CharMix( <cStr1>, <cStr2> ) --> cRet
$ARGUMENTS$
<cStr1> - A character string to mix
<cStr2> - A character string to mix with
@@ -179,7 +179,7 @@
$ONELINER$
Return a string of all the characters in odd positions
$SYNTAX$
gt_CharOdd(<cStr>) --> cRet
gt_CharOdd( <cStr> ) --> cRet
$ARGUMENTS$
<cStr> - A character string to extract chars from
$RETURNS$
@@ -211,7 +211,7 @@
$ONELINER$
Count the number of times a character appears in a string
$SYNTAX$
gt_ChrCount(<cChr>, <cStr>) --> nFreq
gt_ChrCount( <cChr>, <cStr> ) --> nFreq
$ARGUMENTS$
<cChr> - The character to find the frequence of
<cStr> - The string in which to find the character
@@ -244,7 +244,7 @@
$ONELINER$
Find which character occurs first in a string
$SYNTAX$
gt_ChrFirst(<cChars>, <cStr>) --> nAsc
gt_ChrFirst( <cChars>, <cStr> ) --> nAsc
$ARGUMENTS$
<cChars> - The set of characters to find
<cStr> - The input string
@@ -276,7 +276,7 @@
$ONELINER$
Find number of times a set of characters appears in a string
$SYNTAX$
gt_ChrTotal(<cChrs>, <cStr>) --> nTotOcc
gt_ChrTotal( <cChrs>, <cStr> ) --> nTotOcc
$ARGUMENTS$
<cChrs> - The set of characters
<cStr> - The string to search
@@ -314,7 +314,7 @@
$ONELINER$
Count the number of times a substring appears in a string
$SYNTAX$
gt_StrCount(<cChrs>, <cStr>) --> nFreq
gt_StrCount( <cChrs>, <cStr> ) --> nFreq
$ARGUMENTS$
<cChrs> - The substring to find the frequence of
<cStr> - The string in which to find the character
@@ -351,7 +351,7 @@
$ONELINER$
Return length of prefix in string of chars NOT in set.
$SYNTAX$
gt_StrCSPN(<cString>, <cSet>) --> nLength
gt_StrCSPN( <cString>, <cSet> ) --> nLength
$ARGUMENTS$
<cString> - The string to find the prefix in
<cSet> - The set of characters
@@ -382,7 +382,7 @@
$ONELINER$
Return a string where it begins to differ from another
$SYNTAX$
gt_StrDiff(<cStr1>, <cStr2>) --> cRet
gt_StrDiff( <cStr1>, <cStr2> ) --> cRet
$ARGUMENTS$
<cStr1> - A character string to compare
<cStr2> - The string to compare with
@@ -419,7 +419,7 @@
$ONELINER$
Insert fillers between characters in a passed string
$SYNTAX$
gt_StrExpand(<cStr>, [<nNum>], [<cChar>]) --> cRet
gt_StrExpand( <cStr>, [<nNum>], [<cChar>] ) --> cRet
$ARGUMENTS$
<cStr1> - A character string to insert chars into
<nNum> - The number of fill characters to insert (default 1)
@@ -455,7 +455,7 @@
$ONELINER$
Find length of prefix of a string
$SYNTAX$
gt_StrLeft(<cStr>, <cChars>) --> nLen
gt_StrLeft( <cStr>, <cChars> ) --> nLen
$ARGUMENTS$
<cStr> - The input string
<cChars> - The set of characters to find
@@ -491,7 +491,7 @@
$ONELINER$
Return string after 1st char from a set
$SYNTAX$
gt_StrPBRK(<cStr>, <cSet>) --> cString
gt_StrPBRK( <cStr>, <cSet> ) --> cString
$ARGUMENTS$
<cStr> - The input string
<cSet> - The set of characters to find
@@ -523,7 +523,7 @@
$ONELINER$
Find length of a suffix of a string
$SYNTAX$
gt_StrRight(<cStr>, <cChars>) --> nLen
gt_StrRight( <cStr>, <cChars> ) --> nLen
$ARGUMENTS$
<cStr> - The input string
<cChars> - The set of characters to find
@@ -559,7 +559,7 @@
$ONELINER$
Create a new bit flag string.
$SYNTAX$
gt_NewFlag(<nFlagCount>) --> cFlagString
gt_NewFlag( <nFlagCount> ) --> cFlagString
$ARGUMENTS$
<nFlagCount> is the number of flags you wish to store.
$RETURNS$
@@ -588,7 +588,7 @@
$ONELINER$
Set a number of flags to TRUE in a bit flag string.
$SYNTAX$
gt_SetFlag(<cFlagString>,[<nStart>],[<nEnd>]) --> cFlagString
gt_SetFlag( <cFlagString>, [<nStart>], [<nEnd>] ) --> cFlagString
$ARGUMENTS$
<cFlagString> is a bit flag string created with gt_NewFlag()
@@ -629,7 +629,7 @@
$ONELINER$
Set a number of flags to FALSE in a bit flag string.
$SYNTAX$
gt_ClrFlag(<cFlagString>,[<nStart>],[<nEnd>]) --> cFlagString
gt_ClrFlag( <cFlagString>, [<nStart>], [<nEnd>] ) --> cFlagString
$ARGUMENTS$
<cFlagString> is a bit flag string created with gt_NewFlag()
@@ -674,7 +674,7 @@
$ONELINER$
Test the setting of a flag in a bit flag string.
$SYNTAX$
gt_IsFlag(<cFlagString>,[<nFlag>]) --> lSetting
gt_IsFlag( <cFlagString>, [<nFlag>] ) --> lSetting
$ARGUMENTS$
<cFlagString> is a bit flag string created with gt_NewFlag()

1
contrib/hbhttpd/tests/files/main.css
View File

@@ -33,4 +33,3 @@ ulnk {
text-decoration:underline;
text-color:blue;
}

4
contrib/hbmisc/doc/en/dates2.txt
View File

@@ -156,7 +156,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
BoM(),WoM()
BoM(), WoM()
$END$
*/
@@ -188,7 +188,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
EoM(),WoM()
EoM(), WoM()
$END$
*/

42
contrib/hbmisc/doc/en/ht_conv.txt
View File

@@ -7,17 +7,17 @@
$ONELINER$
Check if the value is a Binary Number
$SYNTAX$
IsBin(<cN>) -><cNr>
IsBin( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> STRING TO BE CHECKED
$RETURNS$
<cNr> .T. IF THE STRING IS BYNARY,otherwise .F.
<cNr> .T. IF THE STRING IS BYNARY, otherwise .F.
$DESCRIPTION$
check if the passed string is a bynary number or not
$FILES$
Library is hbmisc
$SEEALSO$
IsOctal(),IsDec(),IsHexa()
IsOctal(), IsDec(), IsHexa()
$END$
*/
@@ -29,7 +29,7 @@
$ONELINER$
Check if the value is a Octal Number
$SYNTAX$
IsOctal(<cN>) -><cNr>
IsOctal( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> STRING TO BE CHECKED
$RETURNS$
@@ -39,7 +39,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
IsBin(),IsDec(),IsHexa()
IsBin(), IsDec(), IsHexa()
$END$
*/
@@ -51,7 +51,7 @@
$ONELINER$
Check if the value is a Decimal Number
$SYNTAX$
IsDec(<cN>) -><cNr>
IsDec( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> STRING TO BE CHECKED
$RETURNS$
@@ -61,7 +61,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
IsOctal(),IsBin(),IsHexa()
IsOctal(), IsBin(), IsHexa()
$END$
*/
@@ -73,7 +73,7 @@
$ONELINER$
Check if the value is a Hexal Number
$SYNTAX$
IsHexa(<cN>) -><cNr>
IsHexa( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> STRING TO BE CHECKED
$RETURNS$
@@ -83,7 +83,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
IsOctal(),IsDec(),IsBin()
IsOctal(), IsDec(), IsBin()
$END$
*/
@@ -95,7 +95,7 @@
$ONELINER$
Converts a Decimal Value to Binary
$SYNTAX$
DecToBin(<cN>) -><cNr>
DecToBin( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> NUMBER TO BE CONVERTED
$RETURNS$
@@ -106,7 +106,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
DecToHexa(),DecToOctal()
DecToHexa(), DecToOctal()
$END$
*/
@@ -118,7 +118,7 @@
$ONELINER$
Converts a Decimal Value to Octal
$SYNTAX$
DecToOctal(<cN>) -><cNr>
DecToOctal( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> NUMBER TO BE CONVERTED
$RETURNS$
@@ -129,7 +129,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
DecToHexa(),DecToBin()
DecToHexa(), DecToBin()
$END$
*/
@@ -141,7 +141,7 @@
$ONELINER$
Converts a Decimal Value to Hexa
$SYNTAX$
DecToHexa(<cN>) -><cNr>
DecToHexa( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> NUMBER TO BE CONVERTED
$RETURNS$
@@ -152,7 +152,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
DecToBin(),DecToOctal()
DecToBin(), DecToOctal()
$END$
*/
@@ -164,7 +164,7 @@
$ONELINER$
Converts a Binary Value to Decimal
$SYNTAX$
BinToDec(<cN>) -><cNr>
BinToDec( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> NUMBER TO BE CONVERTED
$RETURNS$
@@ -175,7 +175,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
OctalToDec(),HexaToDec()
OctalToDec(), HexaToDec()
$END$
*/
@@ -187,7 +187,7 @@
$ONELINER$
Converts a Octal Value to Decimal
$SYNTAX$
OctalToDec(<cN>) -><cNr>
OctalToDec( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> NUMBER TO BE CONVERTED
$RETURNS$
@@ -198,7 +198,7 @@
$FILES$
Library is hbmisc
$SEEALSO$
BinToDec(),HexaToDec()
BinToDec(), HexaToDec()
$END$
*/
@@ -210,7 +210,7 @@
$ONELINER$
Converts a Hexa Value to Decimal
$SYNTAX$
HexaToDec(<cN>) -><cNr>
HexaToDec( <cN> ) --> <cNr>
$ARGUMENTS$
<cN> NUMBER TO BE CONVERTED
$RETURNS$
@@ -221,6 +221,6 @@
$FILES$
Library is hbmisc
$SEEALSO$
OctalToDec(),BinToDec()
OctalToDec(), BinToDec()
$END$
*/

247
contrib/hbmisc/doc/en/ht_doc.txt
View File

@@ -1,247 +0,0 @@
/* $DOC$
$NAME$
THtml()
$CATEGORY$
Harbour Tools
$ONELINER$
Html Class
$SYNTAX$
oHtml:=THtml():New(<cFile>) --> oHtm
$ARGUMENTS$
<cFile> Name of the Html file to create </par>
$RETURNS$
<oHtm> An instance of the THtml Class </par>
$DESCRIPTION$
THtml() is a class that creates an .html file of the same
name you pass to the constructor. </par>
The class methods are as follows: </par>
New(<cFile>) Create a new instance of the THtml class </par>
Close() Close the created file </par>
WriteTitle(<cTitle>) Write the file title </par>
WritePar(<cPar>) Writes a paragraph </par>
WriteParBold(<cPar>) Same as WritePar(), but the text is bold </par>
WriteLink(<cLink>,<cName>) Write a link to another topic </par>
WriteText(<cText>) Write any text </par>
$EXAMPLES$
PROCEDURE Main()
LOCAL oHtm
oHtm := THtml():New( "www\harbour.html" )
oHtm:WriteTitle( "Harbour Reference Guide" )
oHtm:WritePar( "HARBOUR" )
oHtm:WriteLink( "OverView" )
oHtm:WriteLink( "License" )
oHtm:WriteLink( "http://www.gnu.org/copyleft/gpl" )
oHtm:WritePar( "See the Links Above" )
oHtm:Close()
RETURN
$STATUS$
R
$COMPLIANCE$
This is a new Harbour Tools class </par>
$PLATFORMS$
ALL </par>
$SEEALSO$
TCLASS()
$END$
*/
/* $DOC$
$NAME$
TOs2()
$CATEGORY$
Harbour Tools
$ONELINER$
OS/2 Documentation Class
$SYNTAX$
oNg:=TOs2():New(<cFile>) --> oOs2
$ARGUMENTS$
<cFile> Name of the IPF Source file to create </par>
$RETURNS$
<oOs2> An instance of the TOs2 Class </par>
$DESCRIPTION$
TOs2() is a class that creates the OS/2 IPF Source
of the same name you pass to the constructor. </par>
The class methods are as follows: </par>
New(<cFile>) Create a new instance of the TOs2 class </par>
Close() Close the created file </par>
WriteTitle(<cTopic>,<cTitle>) Write the file title </par>
WritePar(<cPar>) Write a paragraph </par>
WriteParBold(<cPar>) Same as WritePar(), but the text is bold </par>
WriteLink(<cLink>) Write a link to another topic </par>
ScanLink(<clink>) Scan the aLinkRef array for a valid topic </par>
DosToOs2Text(<cText>) Convert a Dos string to a OS/2 String </par>
$EXAMPLES$
PROCEDURE Main()
LOCAL oNg
oNg := TOs2():New( "ngi\harbour.ngi" )
oNg:WriteTitle( "Harbour Reference Guide" )
oNg:WritePar( "HARBOUR" )
oNg:WriteLink( "OverView" )
oNg:WriteLink( "License" )
oNg:WritePar( "See the Links Above" )
oNg:Close()
RETURN
$STATUS$
R
$COMPLIANCE$
This is a new Harbour Tools class </par>
$PLATFORMS$
ALL </par>
$SEEALSO$
TNortonGuide()
$END$
*/
/* $DOC$
$NAME$
TNortonGuide()
$CATEGORY$
Harbour Tools
$ONELINER$
Norton Guide Class
$SYNTAX$
oNg:=TNortonGuide():New(<cFile>) --> oNg
$ARGUMENTS$
<cFile> Name of the Ng Source file to create </par>
$RETURNS$
<oNg> An instance of the TNortonGuide Class </par>
$DESCRIPTION$
TNortonGuide() is a class that creates the Norton Guide Source
Code of the same name you pass to the constructor. </par>
The class methods are as follows: </par>
New(<cFile>) Create an instance of the TNortonGuide class </par>
Close() Close the created file </par>
WriteTitle(<cTopic>,<cTitle>) Write the file title </par>
WritePar(<cPar>) Write a paragraph </par>
WriteParBold(<cPar>) Same as WritePar(), but the text is bold </par>
WriteLink(<cLink>) Write a link to another topic </par>
$EXAMPLES$
PROCEDURE Main()
LOCAL oNg
oNg := TNortonGuide():New( "ngi\harbour.ngi" )
oNg:WriteTitle( "Harbour Reference Guide" )
oNg:WritePar( "HARBOUR" )
oNg:WriteLink( "OverView" )
oNg:WriteLink( "License" )
oNg:WritePar( "See the Links Above" )
oNg:Close()
RETURN
$STATUS$
R
$COMPLIANCE$
This is a new Harbour Tools class </par>
$PLATFORMS$
ALL </par>
$SEEALSO$
TTroff(),TRtf(),THtml(),TOs2()
$END$
*/
/* $DOC$
$NAME$
TRtf()
$CATEGORY$
Harbour Tools
$ONELINER$
Rtf Class
$SYNTAX$
oNg:=TRtf():New(<cFile>) --> oRtf
$ARGUMENTS$
<cFile> Name of the RTF file to create </par>
$RETURNS$
<oRtf> An instance of the TRtf Class </par>
$DESCRIPTION$
TRtf() is a class that creates the RTF Documentation Source
Code of the same name you pass to the constructor. </par>
The class methods are as follows: </par>
New(<cFile>) Create a new instance of the TRtf class </par>
Close() Close the create file </par>
WriteTitle(<cTopic>,<cTitle>) Write the file title </par>
WritePar(<cPar>) Write a paragraph </par>
WriteParBold(<cPar>) Same as WritePar(), but the text is bold </par>
WriteLink(<cLink>) Write a link to another topic </par>
WriteHeader() Write the RTF header </par>
EndPar() Write the end paragraph delimiter </par>
$EXAMPLES$
PROCEDURE Main()
LOCAL oRtf
oRtf := TRtf():New( "rtf\harbour.rtf" )
oRtf:WriteHeader()
oRtf:WriteTitle( "Harbour Reference Guide" )
oRtf:WritePar( "HARBOUR" ):Endpar()
oRtf:WriteLink( "OverView" )
oRtf:WriteLink( "License" )
oRtf:WritePar( "See the Links Above" ):EndPar()
oRtf:Close()
RETURN
$STATUS$
R
$COMPLIANCE$
This is a new Harbour Tools class </par>
$PLATFORMS$
ALL </par>
$SEEALSO$
TNortonGuide()
$END$
*/
/* $DOC$
$NAME$
TTroff()
$CATEGORY$
Harbour Tools
$ONELINER$
Troff Class
$SYNTAX$
oTroff:=TTrof():New(<cFile>) --> oTrf
$ARGUMENTS$
<cFile> Name of the Troff file to create </par>
$RETURNS$
<oTrf> instance of the TTroff Class </par>
$DESCRIPTION$
TTroff() is a class that creates the TROFF Documentation Source
Code of the same name you pass to the constructor. </par>
The class methods are as follows: </par>
New(<cFile>) Create a new instance of the THtml class
Close() Close the created file </par>
WriteTitle(<cTopic>,<cTitle>) Write the file title </par>
WritePar(<cPar>) Write a paragraph </par>
WriteParBold(<cPar>) Same as WritePar(), but the text is bold </par>
WriteLink(<cLink>) Write a link to another topic </par>
WriteText() Writes text without formating </par>
$EXAMPLES$
PROCEDURE Main()
LOCAL oTroff
oTroff := TTroff():New( "tr\harbour.ngi" )
oTroff:WriteTitle( "Harbour Reference Guide" )
oTroff:WritePar( "HARBOUR" )
oTroff:WriteLink( "OverView" )
oTroff:WriteLink( "License" )
oTroff:WritePar( "See the Links Above" )
oTroff:Close()
RETURN
$STATUS$
R
$COMPLIANCE$
This is a new Harbour Tools class </par>
$PLATFORMS$
ALL </par>
$SEEALSO$
TNortonGuide()
$END$
*/

6
contrib/hbmisc/doc/en/ht_file.txt
View File

@@ -23,7 +23,7 @@
$FILES$
Header is fileio.ch
$SEEALSO$
MD(),RD()
MD(), RD()
$END$
*/
@@ -51,7 +51,7 @@
$FILES$
Header is fileio.ch
$SEEALSO$
CD(),MD()
CD(), MD()
$END$
*/
@@ -79,6 +79,6 @@
$FILES$
Header is fileio.ch
$SEEALSO$
CD(),MD()
CD(), MD()
$END$
*/

4
contrib/hbnetio/utils/hbnetio/hbnetio.hbp
View File

@@ -7,8 +7,10 @@ hbnetio.hbc
-o${hb_name}
hbnetio.prg
_console.prg
netiomgm.hb
netiosvc.prg{win}
_winsvc.prg{win}
-main=WinMain{win}
hbwin.hbc{win}

2
contrib/hbnetio/utils/hbnetio/hbnetio.prg
View File

@@ -887,5 +887,7 @@ STATIC PROCEDURE HB_Usage()
RETURN
#if defined( __HBSCRIPT__HBSHELL )
SET PROCEDURE TO "_console.prg"
SET PROCEDURE TO "netiomgm.hb"
#endif

4
contrib/hbziparc/doc/en/hbziparc.txt
View File

@@ -180,7 +180,7 @@
$ONELINER$
Create a zip file
$SYNTAX$
hb_ZipFileByTDSpan( <cFile> ,<cFileToCompress> | <aFiles>, <nLevel>,
hb_ZipFileByTDSpan( <cFile>, <cFileToCompress> | <aFiles>, <nLevel>,
<bBlock>, <lOverWrite>, <cPassword>, <iSize>, <lWithPath>, <lWithDrive>,
<pFileProgress>) --> lCompress
$ARGUMENTS$
@@ -418,7 +418,7 @@
will evaluate bBlock. Parameters of bBlock are cFile and nPos.
If <lOverWrite> is used, it toggles to overwrite or not the existing
file. Default is to overwrite the file,otherwise if <lOverWrite> is false
file. Default is to overwrite the file, otherwise if <lOverWrite> is false
the new files are added to the <cFile>.
If <cPassword> is used, all files that are added to the archive are encrypted

54
contrib/rddads/doc/en/adsfuncs.txt
View File

@@ -7,7 +7,7 @@
$ONELINER$
Write a Binary (memo) field's contents to a file
$SYNTAX$
AdsBlob2File(cFileName, cFieldName) --> lSuccess
AdsBlob2File( cFileName, cFieldName ) --> lSuccess
$ARGUMENTS$
<cFileName> File to create. If it already exists, it will be
overwritten on success and destroyed on error.
@@ -43,7 +43,7 @@
$ONELINER$
Save a Binary file to a field
$SYNTAX$
AdsFile2Blob(cFileName, cFieldName, <nBinaryType>) --> lSuccess
AdsFile2Blob( cFileName, cFieldName, <nBinaryType> ) --> lSuccess
$ARGUMENTS$
<cFileName> File to read. Can be in UNC format. A common example is an image file.
@@ -102,7 +102,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsCustomizeAOF(),AdsEvalAOF(),AdsGetAOF(),AdsGetAOFOptLevel(),AdsIsRecordInAOF(),AdsRefreshAOF()
AdsCustomizeAOF(), AdsEvalAOF(), AdsGetAOF(), AdsGetAOFOptLevel(), AdsIsRecordInAOF(), AdsRefreshAOF()
$END$
*/
@@ -140,7 +140,7 @@
from the server.
The maximum number of records that can be customized in a single call is
16,383, so <aRecNos> must not be longer than this.
16, 383, so <aRecNos> must not be longer than this.
Calls to AdsCustomizeAOF must be made after an application has created a
filter with a call to AdsSetAOF. To create a completely empty record set
@@ -171,7 +171,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsClearAOF(),AdsEvalAOF(),AdsGetAOF(),AdsGetAOFOptLevel(),AdsIsRecordInAOF(),AdsRefreshAOF()
AdsClearAOF(), AdsEvalAOF(), AdsGetAOF(), AdsGetAOFOptLevel(), AdsIsRecordInAOF(), AdsRefreshAOF()
$END$
*/
@@ -183,7 +183,7 @@
$ONELINER$
Evaluate a filter expression to determine its optimization level
$SYNTAX$
AdsEvalAOF(<cFilter>) --> nOptimizationLevel
AdsEvalAOF( <cFilter> ) --> nOptimizationLevel
$ARGUMENTS$
<cFilter> Expression to test.
$RETURNS$
@@ -206,7 +206,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsClearAOF(),AdsGetAOF(),AdsGetAOFOptLevel(),AdsIsRecordInAOF(),AdsRefreshAOF()
AdsClearAOF(), AdsGetAOF(), AdsGetAOFOptLevel(), AdsIsRecordInAOF(), AdsRefreshAOF()
$END$
*/
@@ -239,7 +239,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsClearAOF(),AdsGetAOF(),AdsIsRecordInAOF(),AdsRefreshAOF()
AdsClearAOF(), AdsGetAOF(), AdsIsRecordInAOF(), AdsRefreshAOF()
$END$
*/
@@ -270,7 +270,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsClearAOF(),AdsGetAOFOptLevel(),AdsIsRecordInAOF(),AdsRefreshAOF()
AdsClearAOF(), AdsGetAOFOptLevel(), AdsIsRecordInAOF(), AdsRefreshAOF()
$END$
*/
@@ -302,7 +302,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsClearAOF(),AdsIsRecordInAOF(),AdsRefreshAOF()
AdsClearAOF(), AdsIsRecordInAOF(), AdsRefreshAOF()
$END$
*/
@@ -336,7 +336,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsClearAOF(),AdsIsRecordInAOF(),AdsSetAOF()
AdsClearAOF(), AdsIsRecordInAOF(), AdsSetAOF()
$END$
*/
@@ -372,7 +372,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsClearAOF(),AdsIsRecordInAOF(),AdsRefreshAOF()
AdsClearAOF(), AdsIsRecordInAOF(), AdsRefreshAOF()
$END$
*/
@@ -403,7 +403,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsClearAOF(),AdsRefreshAOF()
AdsClearAOF(), AdsRefreshAOF()
$END$
*/
@@ -442,7 +442,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsKeyNo(),AdsKeyCount(),AdsSetRelKeyPos()
AdsKeyNo(), AdsKeyCount(), AdsSetRelKeyPos()
$END$
*/
@@ -480,7 +480,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsKeyNo(),AdsKeyCount(),AdsGetRelKeyPos()
AdsKeyNo(), AdsKeyCount(), AdsGetRelKeyPos()
$END$
*/
@@ -492,7 +492,7 @@
$ONELINER$
Retrieve the number of keys in a specified index
$SYNTAX$
AdsKeyCount([<xTag>], <cIgnoredIndexFile>, [<nFilterOption>]) --> nKeyCount
AdsKeyCount( [<xTag>], <cIgnoredIndexFile>, [<nFilterOption>] ) --> nKeyCount
$ARGUMENTS$
<xTag> Numeric order number OR index tag name. Default is current index.
@@ -529,7 +529,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsKeyNo(),AdsGetRelKeyPos()
AdsKeyNo(), AdsGetRelKeyPos()
$END$
*/
@@ -541,7 +541,7 @@
$ONELINER$
Get the logical key number of the current record in the given index
$SYNTAX$
AdsKeyNo([<xTag>], <cIgnoredIndexFile>, [<nFilterOption>]) --> nKeyNo
AdsKeyNo( [<xTag>], <cIgnoredIndexFile>, [<nFilterOption>] ) --> nKeyNo
$ARGUMENTS$
<xTag> Numeric order number OR index tag name. Default is current index.
@@ -579,7 +579,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsKeyCount(),AdsGetRelKeyPos()
AdsKeyCount(), AdsGetRelKeyPos()
$END$
*/
@@ -942,7 +942,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsRightsCheck(),AdsLocking(), AdsSetFileType()
AdsRightsCheck(), AdsLocking(), AdsSetFileType()
$END$
*/
@@ -960,7 +960,7 @@
$RETURNS$
<lActiveIndex>
$DESCRIPTION$
Equivalent to <b>Empty(ordSetFocus())<\b>, but faster.
Equivalent to <b>Empty( ordSetFocus() )<\b>, but faster.
$EXAMPLES$
$STATUS$
@@ -1142,7 +1142,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsGetTableConType(),AdsConnect(),AdsConnect60()
AdsGetTableConType(), AdsConnect(), AdsConnect60()
$END$
*/
@@ -1179,7 +1179,7 @@
Library is rddads
Header is ads.ch
$SEEALSO$
AdsGetConnectionType(),AdsConnect(),AdsConnect60()
AdsGetConnectionType(), AdsConnect(), AdsConnect60()
$END$
*/
@@ -1230,7 +1230,7 @@
$ONELINER$
Connect to a local/remote/internet server
$SYNTAX$
AdsConnect60(<cFilePath>, <nServertype>, [<cUserName>], [<cUserPass>], [<nOptions>]) -> lSuccess
AdsConnect60( <cFilePath>, <nServertype>, [<cUserName>], [<cUserPass>], [<nOptions>] ) -> lSuccess
$ARGUMENTS$
<cFilePath> Name of data dictionary to connect to.
<nServertype> The server type to connect (LOCAL, REMOTE, AIS or all together)
@@ -1270,7 +1270,7 @@
$ONELINER$
Provides caching of open tables
$SYNTAX$
AdsCacheOpenTables(<nOpen>) -> nRetVal
AdsCacheOpenTables( <nOpen> ) -> nRetVal
$ARGUMENTS$
<nOpen> Number of tables to cache.
@@ -1308,7 +1308,7 @@
$ONELINER$
Provides caching of open cursors
$SYNTAX$
AdsCacheOpenCursors(<nOpen>) -> nRetVal
AdsCacheOpenCursors( <nOpen> ) -> nRetVal
$ARGUMENTS$
<nOpen> Number of cursors to cache.
@@ -1347,7 +1347,7 @@
$ONELINER$
Close all cached tables on the given connection
$SYNTAX$
AdsCloseCachedTables([<hConnection>]) -> nRetVal
AdsCloseCachedTables( [<hConnection>] ) -> nRetVal
$ARGUMENTS$
<hConnection> A connection handle retrieved via AdsConnect()
or AdsConnect60(). If omitted, the RDD's current connection

2
contrib/rddads/doc/en/readme.txt
View File

@@ -1,5 +1,7 @@
/* $DOC$
$TEMPLATE$
Document
$NAME$
ADS Overview
$CATEGORY$

4
contrib/xhb/hbdll.ch
View File

@@ -57,9 +57,6 @@
#define DC_RETVAL_MATH4 0x0100 // Return value in ST
#define DC_RETVAL_MATH8 0x0200 // Return value in ST
// Avoid xHarbour code when included by dllcall.c
#if defined( __PLATFORM__WINDOWS )
#include "cstruct.ch"
#include "wintypes.ch"
@@ -140,4 +137,3 @@
RETURN DllExecuteCall( t_cTemplate [, <ArgName>] [, <ArgNameN>] )
#endif
#endif

30
doc/en/array.txt
View File

@@ -57,7 +57,7 @@
$FILES$
Library is core
$SEEALSO$
AAdd(),ADel(),AFill(),AIns()
AAdd(), ADel(), AFill(), AIns()
$END$
*/
@@ -103,7 +103,7 @@
$FILES$
Library is core
$SEEALSO$
AIns(),ASize()
AIns(), ASize()
$END$
*/
@@ -146,7 +146,7 @@
$FILES$
Library is core
$SEEALSO$
AAdd(),ADel(),AFill(),AIns()
AAdd(), ADel(), AFill(), AIns()
$END$
*/
@@ -181,7 +181,7 @@
$FILES$
Library is core
$SEEALSO$
Len(),Array(),ASize(),AAdd()
Len(), Array(), ASize(), AAdd()
$END$
*/
@@ -225,7 +225,7 @@
$FILES$
Library is core
$SEEALSO$
AAdd(),ACopy(),ADel(),AEval(),AFill(),ASize()
AAdd(), ACopy(), ADel(), AEval(), AFill(), ASize()
$END$
*/
@@ -254,7 +254,7 @@
given subscript position <nPos> will move up one position in the
array. In other words, what was formerly the sixth subscript position
will become the fifth subscript position. The length of the array
<aArray> will remain unchanged,as the last element in the array will
<aArray> will remain unchanged, as the last element in the array will
become a NIL data type.
$EXAMPLES$
LOCAL aArray := { "Harbour", "is", "Power" }
@@ -266,7 +266,7 @@
$FILES$
Library is core
$SEEALSO$
ACopy(),AIns(),AFill()
ACopy(), AIns(), AFill()
$END$
*/
@@ -316,7 +316,7 @@
$FILES$
Library is core
$SEEALSO$
AAdd(),AEval(),dbStruct(),Directory()
AAdd(), AEval(), dbStruct(), Directory()
$END$
*/
@@ -422,7 +422,7 @@
$FILES$
Library is core
$SEEALSO$
Eval(),dbEval()
Eval(), dbEval()
$END$
*/
@@ -461,7 +461,7 @@
<nCount> is the number of elements to be copied from <aSource>;
the default is the entire array.
<nTargetPos> is the subscript number in the target array,<aTarget>,
<nTargetPos> is the subscript number in the target array, <aTarget>,
to which array elements are to be copied; the default is 1
This function will copy all data types in <aSource> to <aTarget>.
@@ -489,7 +489,7 @@
$FILES$
Library is core
$SEEALSO$
AClone(),ADel(),AEval(),AFill(),AIns(),ASort()
AClone(), ADel(), AEval(), AFill(), AIns(), ASort()
$END$
*/
@@ -519,11 +519,11 @@
$EXAMPLES$
LOCAL aOne, aTwo
aOne := { "Harbour", " is ", "POWER" }
aTwo := AClone( aOne ) // Result: aTwo is {"Harbour"," is ","POWER"}
aTwo := AClone( aOne ) // Result: aTwo is { "Harbour", " is ", "POWER" }
aOne[ 1 ] := "The Harbour Compiler"
// Result:
// aOne is { "The Harbour Compiler", " is ", "POWER" }
// aTwo is { "Harbour"," is ","POWER" }
// aTwo is { "Harbour", " is ", "POWER" }
$STATUS$
R
$COMPLIANCE$
@@ -531,7 +531,7 @@
$FILES$
Library is core
$SEEALSO$
ACopy(),ADel(),AIns(),ASize()
ACopy(), ADel(), AIns(), ASize()
$END$
*/
@@ -597,6 +597,6 @@
$FILES$
Library is core
$SEEALSO$
AScan(),Eval(),SORT
AScan(), Eval(), SORT
$END$
*/

16
doc/en/binnum.txt
View File

@@ -65,7 +65,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2I(),Bin2L(),Bin2U(),I2Bin(),L2Bin(),W2Bin(),Word(),U2Bin(),FRead()
Bin2I(), Bin2L(), Bin2U(), I2Bin(), L2Bin(), W2Bin(), Word(), U2Bin(), FRead()
$END$
*/
@@ -127,7 +127,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2L(),Bin2U(),Bin2W(),I2Bin(),L2Bin(),W2Bin(),Word(),U2Bin(),FRead()
Bin2L(), Bin2U(), Bin2W(), I2Bin(), L2Bin(), W2Bin(), Word(), U2Bin(), FRead()
$END$
*/
@@ -186,7 +186,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2I(),Bin2U(),Bin2W(),I2Bin(),L2Bin(),W2Bin(),Word(),U2Bin(),FRead()
Bin2I(), Bin2U(), Bin2W(), I2Bin(), L2Bin(), W2Bin(), Word(), U2Bin(), FRead()
$END$
*/
@@ -245,7 +245,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2I(),Bin2L(),Bin2W(),I2Bin(),L2Bin(),W2Bin(),Word(),U2Bin(),FRead()
Bin2I(), Bin2L(), Bin2W(), I2Bin(), L2Bin(), W2Bin(), Word(), U2Bin(), FRead()
$END$
*/
@@ -313,7 +313,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2I(),Bin2L(),Bin2U(),Bin2W(),L2Bin(),W2Bin(),Word(),U2Bin(),FWrite()
Bin2I(), Bin2L(), Bin2U(), Bin2W(), L2Bin(), W2Bin(), Word(), U2Bin(), FWrite()
$END$
*/
@@ -356,7 +356,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2I(),Bin2L(),Bin2U(),Bin2W(),I2Bin(),L2Bin(),Word(),U2Bin(),FWrite()
Bin2I(), Bin2L(), Bin2U(), Bin2W(), I2Bin(), L2Bin(), Word(), U2Bin(), FWrite()
$END$
*/
@@ -399,7 +399,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2I(),Bin2L(),Bin2U(),Bin2W(),I2Bin(),W2Bin(),Word(),U2Bin(),FWrite()
Bin2I(), Bin2L(), Bin2U(), Bin2W(), I2Bin(), W2Bin(), Word(), U2Bin(), FWrite()
$END$
*/
@@ -442,7 +442,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2I(),Bin2L(),Bin2U(),Bin2W(),I2Bin(),L2Bin(),W2Bin(),Word(),FWrite()
Bin2I(), Bin2L(), Bin2U(), Bin2W(), I2Bin(), L2Bin(), W2Bin(), Word(), FWrite()
$END$
*/

16
doc/en/browse.txt
View File

@@ -152,11 +152,11 @@
--------------------------- </par>
<table>
dbedit.ch Value Meaning
dbedit.ch Meaning
DE_ABORT 0 Abort dbEdit().
DE_CONT 1 Continue dbEdit() as is.
DE_REFRESH 2 Force reread/redisplay of all data rows.
DE_ABORT Abort dbEdit().
DE_CONT Continue dbEdit() as is.
DE_REFRESH Force reread/redisplay of all data rows.
</table>
The user function is called once in each of the following cases:
@@ -193,7 +193,7 @@
Header files are dbedit.ch, inkey.ch
Library is core
$SEEALSO$
@...SAY,Browse(),TBrowse class,Transform()
@...SAY, Browse(), TBrowse class, Transform()
$END$
*/
@@ -270,7 +270,7 @@
$FILES$
Library is core
$SEEALSO$
dbEdit()*,TBrowse class
dbEdit()*, TBrowse class
$END$
*/
@@ -314,7 +314,7 @@
$FILES$
Library is core
$SEEALSO$
Browse(),TBColumn class,TBrowse class,TBrowseNew()
Browse(), TBColumn class, TBrowse class, TBrowseNew()
$END$
*/
@@ -358,6 +358,6 @@
$FILES$
Library is core
$SEEALSO$
dbSkip(),SKIP
dbSkip(), SKIP
$END$
*/

22
doc/en/command.txt
View File

@@ -21,7 +21,7 @@
$ONELINER$
Define a Class for Object Oriented Programming
$SYNTAX$
[CREATE] CLASS <ClassName> [ <FROM, INHERIT> <SuperClass1> [,<SuperClassN>] ] [STATIC]
[CREATE] CLASS <ClassName> [ <FROM, INHERIT> <SuperClass1> [, <SuperClassN>] ] [STATIC]
$ARGUMENTS$
<ClassName> Name of the class to define. By tradition, Harbour
classes start with "T" to avoid collisions with user-
@@ -83,7 +83,7 @@
$PLATFORMS$
All
$SEEALSO$
HBClass(),Object Oriented Programming,VAR,METHOD
HBClass(), Object Oriented Programming, VAR, METHOD
$END$
*/
@@ -99,7 +99,7 @@
$ONELINER$
Alternate syntax for VAR: instance variable for the objects.
$SYNTAX$
VAR <DataName1> [,<DataNameN>] [ AS <type> ] [ INIT <uValue> ]
VAR <DataName1> [, <DataNameN>] [ AS <type> ] [ INIT <uValue> ]
[[EXPORTED | VISIBLE] | [PROTECTED] | [HIDDEN]] [READONLY | RO]
$ARGUMENTS$
<DataName1> Name of the VAR
@@ -164,7 +164,7 @@
$PLATFORMS$
All
$SEEALSO$
Object Oriented Programming,CLASS,METHOD,CLASS VAR,VAR
Object Oriented Programming, CLASS, METHOD, CLASS VAR, VAR
$END$
*/
@@ -180,7 +180,7 @@
$ONELINER$
Define a CLASS VAR variable for a class (NOT for an Object!)
$SYNTAX$
CLASS VAR <DataName1> [,<DataNameN>] [ AS <type> ] [ INIT <uValue> ]
CLASS VAR <DataName1> [, <DataNameN>] [ AS <type> ] [ INIT <uValue> ]
$ARGUMENTS$
<DataName1> Name of the VAR
@@ -213,7 +213,7 @@
$PLATFORMS$
All
$SEEALSO$
Object Oriented Programming,CLASS,METHOD,VAR
Object Oriented Programming, CLASS, METHOD, VAR
$END$
*/
@@ -322,7 +322,7 @@
$PLATFORMS$
All
$SEEALSO$
HBClass(),Object Oriented Programming,VAR,CLASS
HBClass(), Object Oriented Programming, VAR, CLASS
$END$
*/
@@ -378,7 +378,7 @@
$PLATFORMS$
All
$SEEALSO$
METHOD,VAR,CLASS,Object Oriented Programming
METHOD, VAR, CLASS, Object Oriented Programming
$END$
*/
@@ -413,7 +413,7 @@
$PLATFORMS$
All
$SEEALSO$
Object Oriented Programming,ON ERROR,CLASS,METHOD,VAR
Object Oriented Programming, ON ERROR, CLASS, METHOD, VAR
$END$
*/
@@ -449,7 +449,7 @@
$PLATFORMS$
All
$SEEALSO$
Object Oriented Programming,ERROR HANDLER,CLASS,METHOD,VAR
Object Oriented Programming, ERROR HANDLER, CLASS, METHOD, VAR
$END$
*/
@@ -482,6 +482,6 @@
$PLATFORMS$
All
$SEEALSO$
Object Oriented Programming,CLASS,METHOD,VAR
Object Oriented Programming, CLASS, METHOD, VAR
$END$
*/

38
doc/en/datetime.txt
View File

@@ -3,8 +3,8 @@
* www - http://harbour-project.org
*
* Copyright 2000 Luiz Rafael Culik <culik@sl.conex.net>
* Documentation for: CDoW(),CMonth(),Date(),CToD(),Day(),Days()
* DoW(),DToS(),DToC(),ElapTime(),Month(),Seconds(),Secs(),Time(),Year()
* Documentation for: CDoW(), CMonth(), Date(), CToD(), Day(), Days()
* DoW(), DToS(), DToC(), ElapTime(), Month(), Seconds(), Secs(), Time(), Year()
* See COPYING.txt for licensing terms.
*
*/
@@ -45,7 +45,7 @@
$FILES$
Library is core
$SEEALSO$
Day(),DoW(),Date(),CMonth()
Day(), DoW(), Date(), CMonth()
$END$
*/
@@ -67,7 +67,7 @@
$RETURNS$
<cMonth> The current month name
$DESCRIPTION$
This function returns the name of the month (January,February,etc.)
This function returns the name of the month (January, February, etc.)
from a date expression <dDate> passed to it.
If a NULL date is passed to the function, the value of the function
will be a NULL byte.
@@ -85,7 +85,7 @@
$FILES$
Library is core
$SEEALSO$
CDoW(),Date(),Month(),Year(),DoW(),DToC()
CDoW(), Date(), Month(), Year(), DoW(), DToC()
$END$
*/
@@ -120,7 +120,7 @@
$FILES$
Library is core
$SEEALSO$
CToD(),DToS(),DToC(),Day(),Month(),CMonth()
CToD(), DToS(), DToC(), Day(), Month(), CMonth()
$END$
*/
@@ -138,7 +138,7 @@
$SYNTAX$
CToD( <cDateString> ) --> dDate
$ARGUMENTS$
<cDateString> A character date in format 'mm/dd/yy'
<cDateString> A character date in format "mm/dd/yy"
$RETURNS$
<dDate> A date expression
$DESCRIPTION$
@@ -160,7 +160,7 @@
$FILES$
Library is core
$SEEALSO$
SET DATE,Date(),DToS()
SET DATE, Date(), DToS()
$END$
*/
@@ -196,7 +196,7 @@
$FILES$
Library is core
$SEEALSO$
CToD(),DToS(),DToC(),Date(),Month(),CMonth()
CToD(), DToS(), DToC(), Date(), Month(), CMonth()
$END$
*/
@@ -232,7 +232,7 @@
$FILES$
Library is core
$SEEALSO$
Seconds(),Secs(),ElapTime()
Seconds(), Secs(), ElapTime()
$END$
*/
@@ -268,7 +268,7 @@
$FILES$
Library is core
$SEEALSO$
DToC(),CDoW(),Date(),DToS(),Day()
DToC(), CDoW(), Date(), DToS(), Day()
$END$
*/
@@ -306,7 +306,7 @@
$FILES$
Library is core
$SEEALSO$
SET DATE,Date(),DToS()
SET DATE, Date(), DToS()
$END$
*/
@@ -342,7 +342,7 @@
$FILES$
Library is core
$SEEALSO$
DToC(),Date(),DToS()
DToC(), Date(), DToS()
$END$
*/
@@ -386,7 +386,7 @@
$FILES$
Library is core
$SEEALSO$
Secs(),Seconds(),Time(),Day()
Secs(), Seconds(), Time(), Day()
$END$
*/
@@ -410,7 +410,7 @@
0 to 12
$DESCRIPTION$
This function returns a number that represents the month of a given
date expression <dDate>. If a NULL date (CToD('')) is passed to the
date expression <dDate>. If a NULL date (CToD( "" )) is passed to the
function, the value of the function will be 0.
$EXAMPLES$
? Month( Date() )
@@ -423,7 +423,7 @@
$FILES$
Library is core
$SEEALSO$
CDoW(),DoW(),Year(),CMonth()
CDoW(), DoW(), Year(), CMonth()
$END$
*/
@@ -497,7 +497,7 @@
$FILES$
Library is core
$SEEALSO$
Seconds(),ElapTime(),Time()
Seconds(), ElapTime(), Time()
$END$
*/
@@ -532,7 +532,7 @@
$FILES$
Library is core
$SEEALSO$
Date(),Seconds()
Date(), Seconds()
$END$
*/
@@ -571,6 +571,6 @@
$FILES$
Library is core
$SEEALSO$
Day(),Month()
Day(), Month()
$END$
*/

18
doc/en/dbstrux.txt
View File

@@ -61,7 +61,7 @@
$FILES$
Library is rdd
$SEEALSO$
COPY STRUCTURE,COPY STRUCTURE EXTENDED,dbCreate(),dbStruct(),__dbCopyXStruct(),__dbCreate(),__dbStructFilter()
COPY STRUCTURE, COPY STRUCTURE EXTENDED, dbCreate(), dbStruct(), __dbCopyXStruct(), __dbCreate(), __dbStructFilter()
$END$
*/
@@ -111,7 +111,7 @@
$PLATFORMS$
All
$SEEALSO$
COPY STRUCTURE EXTENDED,dbCreate(),dbStruct(),__dbCopyStruct(),__dbCopyXStruct(),__dbCreate(),__dbStructFilter()
COPY STRUCTURE EXTENDED, dbCreate(), dbStruct(), __dbCopyStruct(), __dbCopyXStruct(), __dbCreate(), __dbStructFilter()
$END$
*/
@@ -189,7 +189,7 @@
$FILES$
Library is rdd
$SEEALSO$
COPY STRUCTURE,COPY STRUCTURE EXTENDED,CREATE,CREATE FROM,dbCreate(),dbStruct(),__dbCopyStruct(),__dbCreate()
COPY STRUCTURE, COPY STRUCTURE EXTENDED, CREATE, CREATE FROM, dbCreate(), dbStruct(), __dbCopyStruct(), __dbCreate()
$END$
*/
@@ -263,7 +263,7 @@
$PLATFORMS$
All
$SEEALSO$
COPY STRUCTURE,CREATE,CREATE FROM,dbCreate(),dbStruct(),__dbCopyStruct(),__dbCopyXStruct(),__dbCreate()
COPY STRUCTURE, CREATE, CREATE FROM, dbCreate(), dbStruct(), __dbCopyStruct(), __dbCopyXStruct(), __dbCreate()
$END$
*/
@@ -377,7 +377,7 @@
$FILES$
Library is rdd
$SEEALSO$
COPY STRUCTURE,COPY STRUCTURE EXTENDED,CREATE,CREATE FROM,dbCreate(),dbStruct(),__dbCopyStruct(),__dbCopyXStruct()
COPY STRUCTURE, COPY STRUCTURE EXTENDED, CREATE, CREATE FROM, dbCreate(), dbStruct(), __dbCopyStruct(), __dbCopyXStruct()
$END$
*/
@@ -452,7 +452,7 @@
$PLATFORMS$
All
$SEEALSO$
COPY STRUCTURE,COPY STRUCTURE EXTENDED,CREATE FROM,dbCreate(),dbStruct(),__dbCopyStruct(),__dbCopyXStruct(),__dbCreate()
COPY STRUCTURE, COPY STRUCTURE EXTENDED, CREATE FROM, dbCreate(), dbStruct(), __dbCopyStruct(), __dbCopyXStruct(), __dbCreate()
$END$
*/
@@ -520,7 +520,7 @@
$PLATFORMS$
All
$SEEALSO$
COPY STRUCTURE,COPY STRUCTURE EXTENDED,CREATE,dbCreate(),dbStruct(),__dbCopyStruct(),__dbCopyXStruct(),__dbCreate()
COPY STRUCTURE, COPY STRUCTURE EXTENDED, CREATE, dbCreate(), dbStruct(), __dbCopyStruct(), __dbCopyXStruct(), __dbCreate()
$END$
*/
@@ -615,7 +615,7 @@
Header file is dbstruct.ch
Library is rdd
$SEEALSO$
dbCreate(),dbStruct(),__dbCopyStruct(),__dbStructFilter()
dbCreate(), dbStruct(), __dbCopyStruct(), __dbStructFilter()
$END$
*/
@@ -702,6 +702,6 @@
Header file is dbstruct.ch
Library is rdd
$SEEALSO$
dbCreate(),dbStruct(),__dbCopyStruct(),__FLedit()*
dbCreate(), dbStruct(), __dbCopyStruct(), __FLedit()*
$END$
*/

6
doc/en/dir.txt
View File

@@ -62,7 +62,7 @@
$FILES$
Library is core
$SEEALSO$
ADir(),Directory(),SET DEFAULT,DIR
ADir(), Directory(), SET DEFAULT, DIR
$END$
*/
@@ -115,7 +115,7 @@
$PLATFORMS$
All(LFN)
$SEEALSO$
ADir(),Directory(),SET DEFAULT,__Dir()*
ADir(), Directory(), SET DEFAULT, __Dir()*
$END$
*/
@@ -197,6 +197,6 @@
$FILES$
Library is core
$SEEALSO$
Array(),Directory(),SET DEFAULT
Array(), Directory(), SET DEFAULT
$END$
*/

8
doc/en/diskspac.txt
View File

@@ -39,13 +39,13 @@
$EXAMPLES$
? "You can use : " + hb_ntos( DiskSpace() ) + " bytes "
Note: See tests/diskspac.prg for another example
// NOTE: See tests/diskspac.prg for another example
$STATUS$
R
$COMPLIANCE$
C
$PLATFORMS$
DOS,Win,OS2
DOS, Win, OS2
$FILES$
Library is core
Header is fileio.ch
@@ -101,13 +101,13 @@
? "You can use : " + hb_ntos( hb_DiskSpace() ) + " bytes " +;
"Out of a total of " + hb_ntos( hb_DiskSpace( "C:", HB_FS_TOTAL ) )
Note: See tests/diskspac.prg for another example
// NOTE: See tests/diskspac.prg for another example
$STATUS$
R
$COMPLIANCE$
H
$PLATFORMS$
DOS,Win,OS2,Unix
DOS, Win, OS2, Unix
$FILES$
Library is core
Header is fileio.ch

2
doc/en/errsys.txt
View File

@@ -37,6 +37,6 @@
$FILES$
Library is core
$SEEALSO$
ErrorBlock(),Error class
ErrorBlock(), Error class
$END$
*/

4
doc/en/eval.txt
View File

@@ -35,7 +35,7 @@
returns its evaluated value. If their are multiple expressions within
the code block, the last expression will be value of this function.
If the code block requires parameters to be passed to it,they are
If the code block requires parameters to be passed to it, they are
specified in the parameter list <xVal> and following. Each parameter
is separated by a comma within the expression list.
$EXAMPLES$
@@ -57,6 +57,6 @@
$FILES$
Library is core
$SEEALSO$
AEval(),dbEval()
AEval(), dbEval()
$END$
*/

90
doc/en/file.txt
View File

@@ -43,19 +43,19 @@
the default value is 0. The file open modes are as follows:
<table>
nMode fileio.ch Meaning
nMode Meaning
0 FO_READ Read only
1 FO_WRITE Write only
2 FO_READWRITE Read/write
16 FO_EXCLUSIVE Exclusive read only
32 FO_DENYWRITE Prevent others from writing
48 FO_DENYREAD Deny read only
64 FO_DENYNONE Not deny, Let to others Read / Write
64 FO_SHARED same as FO_DENYNONE
FO_READ Read only
FO_WRITE Write only
FO_READWRITE Read/write
FO_EXCLUSIVE Exclusive read only
FO_DENYWRITE Prevent others from writing
FO_DENYREAD Deny read only
FO_DENYNONE Not deny, Let to others Read / Write
FO_SHARED same as FO_DENYNONE
</table>
If there is an error in opening a file, a -1 will be returned by
If there is an error in opening a file, a F_ERROR will be returned by
the function. Files handles may be in the range of 0 to 65535. The
status of the SET DEFAULT TO and SET PATH TO commands has no effect
on this function. Directory names and paths must be specified along
@@ -74,9 +74,9 @@
C
$FILES$
Library is core
Header is fileio.ch
Header is fileio.ch
$SEEALSO$
FCreate(),FError(),FClose()
FCreate(), FError(), FClose()
$END$
*/
@@ -104,9 +104,9 @@
default value of <nAttribute> is 0 and is used to set the
attribute byte for the file being created by this function.
The return value will be a file handle that is associated
with the new file. This number will be between zero to 65,535,
with the new file. This number will be between zero to 65535,
inclusive. If an error occurs, the return value of this function
will be -1.
will be F_ERROR.
If the file <cFile> already exists, the existing file will be
truncated to a file length of 0 bytes.
@@ -116,12 +116,12 @@
this function.
<table>
<nAttribute> fileio.ch Meaning
<nAttribute> Meaning
0 FC_NORMAL Normal/Default,Read/Write
1 FC_READONLY Read-only file attribute is set
2 FC_HIDDEN Hidden,Excluded from normal DIR search
4 FC_SYSTEM Create,Excluded from normal DIR search
FC_NORMAL Normal/Default, Read/Write
FC_READONLY Read-only file attribute is set
FC_HIDDEN Hidden, Excluded from normal DIR search
FC_SYSTEM Create, Excluded from normal DIR search
</table>
$EXAMPLES$
#include "fileio.ch"
@@ -136,7 +136,7 @@
Library is core
Header is fileio.ch
$SEEALSO$
FClose(),FOpen(),FWrite(),FRead(),FError()
FClose(), FOpen(), FWrite(), FRead(), FError()
$END$
*/
@@ -201,7 +201,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2I(),Bin2L(),Bin2W(),FError(),FWrite()
Bin2I(), Bin2L(), Bin2W(), FError(), FWrite()
$END$
*/
@@ -302,7 +302,7 @@
33 Lock Violation
</table>
$DESCRIPTION$
After every low-level file function,this function will return
After every low-level file function, this function will return
a value that provides additional information on the status of
the last low-level file functions's performance. If the FError()
function returns a 0, no error was detected. Below is a table
@@ -320,7 +320,7 @@
$FILES$
Library is core
$SEEALSO$
FClose(),FErase(),FOpen(),FWrite()
FClose(), FErase(), FOpen(), FWrite()
$END$
*/
@@ -358,7 +358,7 @@
$FILES$
Library is core
$SEEALSO$
FOpen(),FCreate(),FRead(),FWrite(),FError()
FOpen(), FCreate(), FRead(), FWrite(), FError()
$END$
*/
@@ -408,7 +408,7 @@
$FILES$
Library is core
$SEEALSO$
FError(),FRename()
FError(), FRename()
$END$
*/
@@ -449,7 +449,7 @@
If the file specified in <cNewFile> exists or the file is open,
the function will be unable to rename the file. If the function
is unable to complete its operation,it will return a value of -1.
is unable to complete its operation, it will return a value of -1.
If it is able to rename the file, the return value for the function
will be 0. A call to FError() function will give additional infor-
mation about any error found.
@@ -466,7 +466,7 @@
$FILES$
Library is core
$SEEALSO$
ERASE,FErase(),FError(),File(),RENAME
ERASE, FErase(), FError(), File(), RENAME
$END$
*/
@@ -509,11 +509,11 @@
file pointer should he moved, as shown in the following table:
<table>
<nOrigin> fileio.ch File position
<nOrigin> File position
0 FS_SET Beginning of file
1 FS_RELATIVE Current file pointer position
2 FS_END End of file
FS_SET Beginning of file
FS_RELATIVE Current file pointer position
FS_END End of file
</table>
If a value is not provided for <nOrigin>, it defaults to 0 and
@@ -525,16 +525,16 @@
// cB = a string buffer passed-by-reference to hold the result
// nMaxLine = maximum number of bytes to read
FUNCTION FREADln( nH, cB, nMaxLine )
FUNCTION FReadLn( nH, cB, nMaxLine )
LOCAL cLine, nSavePos, nEol, nNumRead
cLine := Space( nMaxLine )
cB := ""
nSavePos := FSeek( nH, 0, FS_RELATIVE )
nNumRead := FRead( nH, @cLine, nMaxLine )
IF ( nEol := At( hb_eol(), SubStr( cLine, 1, nNumRead ) ) ) == 0
IF ( nEol := hb_BAt( hb_eol(), hb_BSubStr( cLine, 1, nNumRead ) ) ) == 0
cB := cLine
ELSE
cB := SubStr( cLine, 1, nEol - 1 )
cB := hb_BSubStr( cLine, 1, nEol - 1 )
FSeek( nH, nSavePos + nEol + 1, FS_SET )
ENDIF
RETURN nNumRead != 0
@@ -546,7 +546,7 @@
Library is core
Header is fileio.ch
$SEEALSO$
FCreate(),FError(),FOpen(),FRead(),FReadStr(),FWrite()
FCreate(), FError(), FOpen(), FRead(), FReadStr(), FWrite()
$END$
*/
@@ -589,7 +589,7 @@
$FILES$
Library is core
$SEEALSO$
SET DEFAULT,SET PATH,Set()
SET DEFAULT, SET PATH, Set()
$END$
*/
@@ -646,7 +646,7 @@
$FILES$
Library is core
$SEEALSO$
Bin2I(),Bin2L(),Bin2W(),FError(),FRead(),FSeek()
Bin2I(), Bin2L(), Bin2W(), FError(), FRead(), FSeek()
$END$
*/
@@ -685,7 +685,7 @@
$FILES$
Library is core
$SEEALSO$
CurDir(),ERASE,File(),FErase(),FRename()
CurDir(), ERASE, File(), FErase(), FRename()
$END$
*/
@@ -705,7 +705,7 @@
$ARGUMENTS$
<xcFile> Name of file to remove
$DESCRIPTION$
This command removes a file from the disk. The use of a drive,directo-
This command removes a file from the disk. The use of a drive, directo-
ry, and wild-card skeleton operator is allowed for the root of the
filename. The file extension is required. The SET DEFAULT and SET PATH
commands do not affect this command.
@@ -739,8 +739,8 @@
$ARGUMENTS$
<xcFile> Name of file to remove
$DESCRIPTION$
This command removes a file from the disk. The use of a drive,directo-
ry,and wild-card skeleton operator is allowed for the root of the
This command removes a file from the disk. The use of a drive, directo-
ry, and wild-card skeleton operator is allowed for the root of the
filename. The file extension is required. The SET DEFAULT and SET PATH
commands do not affect this command.
@@ -814,7 +814,7 @@
$FILES$
Library is core
$SEEALSO$
COPY FILE,SET DEFAULT,SET PATH,SET PRINTER,TYPE
COPY FILE, SET DEFAULT, SET PATH, SET PRINTER, TYPE
$END$
*/
@@ -881,7 +881,7 @@
$COMPLIANCE$
C
$SEEALSO$
COPY FILE,SET DEFAULT,SET PATH,SET PRINTER,__TypeFile()
COPY FILE, SET DEFAULT, SET PATH, SET PRINTER, __TypeFile()
$END$
*/
@@ -959,7 +959,7 @@
$COMPLIANCE$
C
$SEEALSO$
ERASE,RENAME,FRename(),FErase()
ERASE, RENAME, FRename(), FErase()
$END$
*/
@@ -985,7 +985,7 @@
If the file handle is missing, not numeric, or not open, then this
function returns .T. and sets the value returned by FError() to -1
(FS_ERROR) or a C-compiler dependent errno value (EBADF or EINVAL).
(F_ERROR) or a C-compiler dependent errno value (EBADF or EINVAL).
$EXAMPLES$
nH := FOpen( "test.txt" )
? FReadStr( nH, 80 )

6
doc/en/garbage.txt
View File

@@ -92,7 +92,7 @@
See hb_gcAll() for explanation of how to call this function from your
harbour code.
$SEEALSO$
hb_gcAlloc(),hb_gcFree(),hb_gcCollectAll(),hb_gcItemRef(),hb_gcAll(),hb_idleState()
hb_gcAlloc(), hb_gcFree(), hb_gcCollectAll(), hb_gcItemRef(), hb_gcAll(), hb_idleState()
$END$
*/
@@ -204,7 +204,7 @@
$PLATFORMS$
All
$SEEALSO$
hb_gcAlloc(),hb_gcFree()
hb_gcAlloc(), hb_gcFree()
$END$
*/
@@ -246,7 +246,7 @@
$PLATFORMS$
All
$SEEALSO$
hb_gcAlloc(),hb_gcFree()
hb_gcAlloc(), hb_gcFree()
$END$
*/

4
doc/en/hbflock.txt
View File

@@ -54,7 +54,7 @@
$FILES$
Library is core
$SEEALSO$
hb_FUnlock(),FOpen(),FCreate(),FError(),FClose()
hb_FUnlock(), FOpen(), FCreate(), FError(), FClose()
$END$
*/
@@ -103,6 +103,6 @@
$FILES$
Library is core
$SEEALSO$
hb_FLock(),FOpen(),FCreate(),FError(),FClose()
hb_FLock(), FOpen(), FCreate(), FError(), FClose()
$END$
*/

10
doc/en/hvm.txt
View File

@@ -3,7 +3,7 @@
* www - http://harbour-project.org
*
* Copyright 1999 Jose Lanin <dezac@corevia.com>
* Documentation for: ProcLine(),ProcFile(),ProcName()
* Documentation for: ProcLine(), ProcFile(), ProcName()
*
* Copyright 1999 Eddie Ruina
* Documentation for: __dbgVMVarLGet()
@@ -55,7 +55,7 @@
$FILES$
Library is core
$SEEALSO$
ProcLine(),ProcFile()
ProcLine(), ProcFile()
$END$
*/
@@ -93,7 +93,7 @@
$FILES$
Library is core
$SEEALSO$
ProcName(),ProcFile()
ProcName(), ProcFile()
$END$
*/
@@ -130,7 +130,7 @@
$FILES$
Library is core
$SEEALSO$
ProcName(),ProcLine()
ProcName(), ProcLine()
$END$
*/
@@ -306,7 +306,7 @@
$FILES$
Library is core
$SEEALSO$
__XHelp(),SET KEY,SetKey()
__XHelp(), SET KEY, SetKey()
$END$
*/

10
doc/en/idle.txt
View File

@@ -28,7 +28,7 @@
For signaling the idle state from C code see the hb_idleState()
API function.
$SEEALSO$
hb_idleAdd(),hb_idleDel()
hb_idleAdd(), hb_idleDel()
$END$
*/
@@ -65,7 +65,7 @@
$PLATFORMS$
All
$SEEALSO$
hb_idleDel(),hb_idleState()
hb_idleDel(), hb_idleState()
$END$
*/
@@ -106,7 +106,7 @@
$PLATFORMS$
All
$SEEALSO$
hb_idleAdd(),hb_idleState()
hb_idleAdd(), hb_idleState()
$END$
*/
@@ -151,7 +151,7 @@
$PLATFORMS$
All
$SEEALSO$
hb_idleAdd(),hb_idleDel()
hb_idleAdd(), hb_idleDel()
$END$
*/
@@ -191,6 +191,6 @@
$PLATFORMS$
All
$SEEALSO$
hb_idleAdd(),hb_idleDel(),hb_idleState()
hb_idleAdd(), hb_idleDel(), hb_idleState()
$END$
*/

14
doc/en/input.txt
View File

@@ -149,7 +149,7 @@
$FILES$
Library is core
$SEEALSO$
CLEAR TYPEAHEAD,KEYBOARD
CLEAR TYPEAHEAD, KEYBOARD
$END$
*/
@@ -188,7 +188,7 @@
$FILES$
Library is core
$SEEALSO$
KEYBOARD,CLEAR TYPEAHEAD,Inkey()
KEYBOARD, CLEAR TYPEAHEAD, Inkey()
$END$
*/
@@ -240,7 +240,7 @@
$FILES$
Library is core
$SEEALSO$
Inkey(),LastKey()
Inkey(), LastKey()
$END$
*/
@@ -285,7 +285,7 @@
$FILES$
Library is core
$SEEALSO$
Inkey(),LastKey()
Inkey(), LastKey()
$END$
*/
@@ -310,7 +310,7 @@
The number of characters that can be stuffed into the keyboard
buffer is controlled by the SET TYPEAHEAD command and may range
from 0 to 32,622, with each character being in the ASCII
from 0 to 32622, with each character being in the ASCII
range of 0 to 255.
None of the extended keys may be stuffed into the keyboard buffer.
@@ -329,7 +329,7 @@
$COMPLIANCE$
KEYBOARD is compliant with CA-Cl*pper 5.3
$SEEALSO$
CLEAR TYPEAHEAD,__Keyboard()
CLEAR TYPEAHEAD, __Keyboard()
$END$
*/
@@ -384,7 +384,7 @@
$FILES$
Library is core
$SEEALSO$
@...GET,Inkey(),LastKey(),READ,ReadExit(),Updated()
@...GET, Inkey(), LastKey(), READ, ReadExit(), Updated()
$END$
*/

14
doc/en/lang.txt
View File

@@ -6,7 +6,7 @@
* Documentation for: hb_langName(), hb_langSelect()
*
* Copyright 2004 Chen Kedem <niki@actcom.co.il>
* Documentation for: hb_langErrMsg(),hb_langMessage(),hb_cdpSelect(),
* Documentation for: hb_langErrMsg(), hb_langMessage(), hb_cdpSelect(),
* hb_Translate()
*
* See COPYING.txt for licensing terms.
@@ -54,7 +54,7 @@
$FILES$
Header is error.ch
$SEEALSO$
hb_langSelect(),NationMsg()
hb_langSelect(), NationMsg()
$END$
*/
@@ -103,7 +103,7 @@
$FILES$
Header is hblang.ch
$SEEALSO$
hb_langSelect(),NationMsg(),REQUEST
hb_langSelect(), NationMsg(), REQUEST
$END$
*/
@@ -156,7 +156,7 @@
All
$FILES$
$SEEALSO$
hb_langSelect(),NationMsg()
hb_langSelect(), NationMsg()
$END$
*/
@@ -252,7 +252,7 @@
All
$FILES$
$SEEALSO$
hb_langName(),hb_cdpSelect(),NationMsg(),REQUEST
hb_langName(), hb_cdpSelect(), NationMsg(), REQUEST
$END$
*/
@@ -363,7 +363,7 @@
All
$FILES$
$SEEALSO$
hb_langName(),hb_langSelect(),hb_Translate(),NationMsg(),REQUEST
hb_langName(), hb_langSelect(), hb_Translate(), NationMsg(), REQUEST
$END$
*/
@@ -421,6 +421,6 @@
All
$FILES$
$SEEALSO$
hb_langSelect(),hb_cdpSelect(),NationMsg(),REQUEST
hb_langSelect(), hb_cdpSelect(), NationMsg(), REQUEST
$END$
*/

10
doc/en/math.txt
View File

@@ -3,8 +3,8 @@
* www - http://harbour-project.org
*
* Copyright 2000 Luiz Rafael Culik <culik@sl.conex.net>
* Documentation for: Abs(),Exp(),Log(),Int(),Max()
* Min(),Sqrt(),Round()
* Documentation for: Abs(), Exp(), Log(), Int(), Max()
* Min(), Sqrt(), Round()
* Copyright 2001 IntTec GmbH, Neunlindenstr 32, 79106 Freiburg, Germany
* Author: Martin Vogel <vogel@inttec.de>
* Documentation for API
@@ -128,7 +128,7 @@
$FILES$
Library is core
$SEEALSO$
Round(),StrZero()
Round(), StrZero()
$END$
*/
@@ -340,7 +340,7 @@
$ONELINER$
Rounds off a numeric expression.
$SYNTAX$
Round( <nNumber>,<nPlace> ) --> <nResult>
Round( <nNumber>, <nPlace> ) --> <nResult>
$ARGUMENTS$
<nNumber> Any numeric value.
@@ -365,7 +365,7 @@
$FILES$
Library is core
$SEEALSO$
Int(),Str(),Val(),SET FIXED
Int(), Str(), Val(), SET FIXED
$END$
*/

12
doc/en/memo.txt
View File

@@ -51,7 +51,7 @@
$FILES$
Library is core
$SEEALSO$
HardCR(),StrTran()
HardCR(), StrTran()
$END$
*/
@@ -84,7 +84,7 @@
$FILES$
Library is core
$SEEALSO$
MemoTran(),StrTran()
MemoTran(), StrTran()
$END$
*/
@@ -150,7 +150,7 @@
$FILES$
Library is core
$SEEALSO$
MemoEdit(),MemoWrit(),REPLACE,hb_MemoRead()
MemoEdit(), MemoWrit(), REPLACE, hb_MemoRead()
$END$
*/
@@ -220,7 +220,7 @@
$FILES$
Library is core
$SEEALSO$
MemoEdit(),hb_MemoWrit(),REPLACE,MemoRead()
MemoEdit(), hb_MemoWrit(), REPLACE, MemoRead()
$END$
*/
@@ -281,7 +281,7 @@
$FILES$
Library is core
$SEEALSO$
MemoEdit(),MemoRead(),hb_MemoWrit()
MemoEdit(), MemoRead(), hb_MemoWrit()
$END$
*/
@@ -355,6 +355,6 @@
$FILES$
Library is core
$SEEALSO$
MemoEdit(),MemoRead(),hb_MemoWrit()
MemoEdit(), MemoRead(), hb_MemoWrit()
$END$
*/

14
doc/en/memvar.txt
View File

@@ -11,7 +11,7 @@
$ONELINER$
Declares a list of database field names.
$SYNTAX$
FIELD <xField> [,<xFieldn...> [in <cDatabase>]
FIELD <xField> [, <xFieldn...> [IN <cDatabase>]
$ARGUMENTS$
<xField> A valid field name
@@ -46,7 +46,7 @@
$FILES$
None.
$SEEALSO$
MEMVAR,PRIVATE,PUBLIC,STATIC
MEMVAR, PRIVATE, PUBLIC, STATIC
$END$
*/
@@ -70,8 +70,8 @@
$DESCRIPTION$
This command created a LOCAL memory variable or array. The name
of either is specified in <xVar>. If more then one variable is being
initialized with the LOCAL command,separate each entry with a comma.
If a variable or an array is to be assingned a start-up value,that
initialized with the LOCAL command, separate each entry with a comma.
If a variable or an array is to be assingned a start-up value, that
expression may be specified in <xInit> and folling. Is Strong type
compile mode is used, the Compiler will check if the value recived
matchs the type specified in <xType>.
@@ -110,7 +110,7 @@
$FILES$
None
$SEEALSO$
FIELD,PRIVATE,PUBLIC,STATIC,MEMVAR
FIELD, PRIVATE, PUBLIC, STATIC, MEMVAR
$END$
*/
@@ -138,7 +138,7 @@
expansions are not affected by this command.
The MEMVAR declaration must apear before any executable commands;it
is similat to the LOCAL,STATIC,FIELD,PARAMETERS,FUNCTION, and
is similat to the LOCAL, STATIC, FIELD, PARAMETERS, FUNCTION, and
PROCEDURE commands statements.
$EXAMPLES$
MEMVAR y AS NUMERIC
@@ -165,6 +165,6 @@
$FILES$
None.
$SEEALSO$
LOCAL,STATIC,FIELD,PRIVATE,PUBLIC
LOCAL, STATIC, FIELD, PRIVATE, PUBLIC
$END$
*/

8
doc/en/menu.txt
View File

@@ -153,7 +153,7 @@
$FILES$
Library is core
$SEEALSO$
AChoice(),MENU TO,SET MESSAGE,SET INTENSITY,SET WRAP,__MenuTo()
AChoice(), MENU TO, SET MESSAGE, SET INTENSITY, SET WRAP, __MenuTo()
$END$
*/
@@ -214,7 +214,7 @@
$COMPLIANCE$
C(menu)
$SEEALSO$
AChoice(),MENU TO,SET MESSAGE,SET INTENSITY,SET WRAP,__MenuTo()
AChoice(), MENU TO, SET MESSAGE, SET INTENSITY, SET WRAP, __MenuTo()
$END$
*/
@@ -305,7 +305,7 @@
$FILES$
Library is core
$SEEALSO$
@...PROMPT,AChoice(),SET MESSAGE,SET INTENSITY,SET WRAP,__AtPrompt()
@...PROMPT, AChoice(), SET MESSAGE, SET INTENSITY, SET WRAP, __AtPrompt()
$END$
*/
@@ -389,6 +389,6 @@
$COMPLIANCE$
C
$SEEALSO$
@...PROMPT,AChoice(),SET MESSAGE,SET INTENSITY,SET WRAP,__AtPrompt()
@...PROMPT, AChoice(), SET MESSAGE, SET INTENSITY, SET WRAP, __AtPrompt()
$END$
*/

2
doc/en/misc.txt
View File

@@ -292,7 +292,7 @@
$FILES$
Library is core
$SEEALSO$
Chr(),SET BELL
Chr(), SET BELL
$END$
*/

6
doc/en/nation.txt
View File

@@ -44,7 +44,7 @@
$FILES$
Library is core
$SEEALSO$
IsNegative(),NationMsg()
IsNegative(), NationMsg()
$END$
*/
@@ -81,7 +81,7 @@
$FILES$
Library is core
$SEEALSO$
IsAffirm(),NationMsg()
IsAffirm(), NationMsg()
$END$
*/
@@ -119,6 +119,6 @@
$FILES$
Library is core
$SEEALSO$
IsAffirm(),IsNegative()
IsAffirm(), IsNegative()
$END$
*/

62
doc/en/objfunc.txt
View File

@@ -49,7 +49,7 @@
$FILES$
Library is core
$SEEALSO$
__objGetMethodList(),__objGetMsgList(),__objHasMethod()
__objGetMethodList(), __objGetMsgList(), __objHasMethod()
$END$
*/
@@ -88,7 +88,7 @@
$FILES$
Library is core
$SEEALSO$
__objGetMethodList(),__objGetMsgList(),__objHasData()
__objGetMethodList(), __objGetMsgList(), __objHasData()
$END$
*/
@@ -129,11 +129,11 @@
that allow you to distinguish between VAR and CLASS VAR:
table>
hboo.ch Value Meaning
hboo.ch Meaning
HB_MSGLISTALL 0 All types
HB_MSGLISTCLASS 1 CLASS VAR only
HB_MSGLISTPURE 2 VAR only
HB_MSGLISTALL All types
HB_MSGLISTCLASS CLASS VAR only
HB_MSGLISTPURE VAR only
/table>
VAR are instance variable usable within each object from a class,
@@ -165,7 +165,7 @@
Header file is hboo.ch
Library is core
$SEEALSO$
__objGetMethodList(),__objGetValueList(),__objHasData(),__objHasMethod()
__objGetMethodList(), __objGetValueList(), __objHasData(), __objHasMethod()
$END$
*/
@@ -206,7 +206,7 @@
$FILES$
Library is core
$SEEALSO$
__objGetMsgList(),__objGetValueList(),__objHasData(),__objHasMethod()
__objGetMsgList(), __objGetValueList(), __objHasData(), __objHasMethod()
$END$
*/
@@ -254,7 +254,7 @@
Header file is hboo.ch
Library is core
$SEEALSO$
__objGetMethodList(),__objGetMsgList(),__objHasData(),__objHasMethod(),__objSetValueList()
__objGetMethodList(), __objGetMsgList(), __objHasData(), __objHasMethod(), __objSetValueList()
$END$
*/
@@ -350,16 +350,14 @@
? oHappy:Smile( 3 ) // *SMILE*
STATIC FUNCTION MySmile( nType )
LOCAL cSmile
DO CASE
CASE nType == 1
cSmile := ":)"
CASE nType == 2
cSmile := ";)"
CASE nType == 3
cSmile := "*SMILE*"
ENDCASE
RETURN cSmile
IF HB_ISNUMERIC( nType )
SWITCH nType
CASE 1 ; RETURN ":)"
CASE 2 ; RETURN ";)"
CASE 3 ; RETURN "*SMILE*"
ENDSWITCH
ENDIF
RETURN NIL
$STATUS$
R
$COMPLIANCE$
@@ -367,7 +365,7 @@
$FILES$
Library is core
$SEEALSO$
__objAddInline(),__objAddData(),__objDelMethod(),__objGetMethodList(),__objGetMsgList(),__objHasMethod(),__objModMethod()
__objAddInline(), __objAddData(), __objDelMethod(), __objGetMethodList(), __objGetMsgList(), __objHasMethod(), __objModMethod()
$END$
*/
@@ -398,7 +396,7 @@
with the name <cInlineName> already exist in <oObject>.
$EXAMPLES$
// create a new THappy class and add a Smile INLINE method
oHappy := HBClass():New( "THappy" )
oHappy := HBClass():New( "THappy" )
bInline := {| nType | { ":)", ";)", "*SMILE*" }[ nType ] }
__objAddInline( oHappy, "Smile", bInline )
? oHappy:Smile( 1 ) // :)
@@ -411,7 +409,7 @@
$FILES$
Library is core
$SEEALSO$
__objAddData(),__objAddMethod(),__objDelInline(),__objGetMethodList(),__objGetMsgList(),__objHasMethod() ,__objModInline()
__objAddData(), __objAddMethod(), __objDelInline(), __objGetMethodList(), __objGetMsgList(), __objHasMethod() , __objModInline()
$END$
*/
@@ -440,7 +438,7 @@
<cDataName> already exist in <oObject>.
$EXAMPLES$
// create a new THappy class and add a lHappy VAR
oHappy := HBClass():New( "THappy" )
oHappy := HBClass():New( "THappy" )
__objAddData( oHappy, "lHappy" )
oHappy:lHappy := .T.
IF oHappy:lHappy
@@ -455,7 +453,7 @@
$FILES$
Library is core
$SEEALSO$
__objAddInline(),__objAddMethod(),__objDelData(),__objGetMsgList(),__objGetValueList(),__objHasData(),__objSetValueList()
__objAddInline(), __objAddMethod(), __objDelData(), __objGetMsgList(), __objGetValueList(), __objHasData(), __objSetValueList()
$END$
*/
@@ -526,7 +524,7 @@
$FILES$
Library is core
$SEEALSO$
__objAddMethod(),__objDelMethod(),__objGetMethodList(),__objGetMsgList(),__objHasMethod()
__objAddMethod(), __objDelMethod(), __objGetMethodList(), __objGetMsgList(), __objHasMethod()
$END$
*/
@@ -559,7 +557,7 @@
mechanism.
$EXAMPLES$
// create a new THappy class and add a Smile INLINE method
oHappy := HBClass():New( "THappy" )
oHappy := HBClass():New( "THappy" )
bMyInline := {| nType | { ":)", ";)" }[ nType ] }
bYourInline := {| nType | { "*SMILE*", "*WINK*" }[ nType ] }
__objAddInline( oHappy, "Smile", bMyInline )
@@ -576,7 +574,7 @@
$FILES$
Library is core
$SEEALSO$
__objAddInline(),__objDelInline(),__objGetMethodList(),__objGetMsgList(),__objHasMethod()
__objAddInline(), __objDelInline(), __objGetMethodList(), __objGetMsgList(), __objHasMethod()
$END$
*/
@@ -632,7 +630,7 @@
$FILES$
Library is core
$SEEALSO$
__objAddInline(),__objAddMethod(),__objGetMethodList(),__objGetMsgList(),__objHasMethod(),__objModInline(),__objModMethod()
__objAddInline(), __objAddMethod(), __objGetMethodList(), __objGetMsgList(), __objHasMethod(), __objModInline(), __objModMethod()
$END$
*/
@@ -686,7 +684,7 @@
$FILES$
Library is core
$SEEALSO$
__objAddInline(),__objAddMethod(),__objGetMethodList(),__objGetMsgList(),__objHasMethod(),__objModInline(),__objModMethod()
__objAddInline(), __objAddMethod(), __objGetMethodList(), __objGetMsgList(), __objHasMethod(), __objModInline(), __objModMethod()
$END$
*/
@@ -716,7 +714,7 @@
with the name <cDataName> does not exist in <oObject>.
$EXAMPLES$
// create a new THappy class and add a lHappy VAR
oHappy := HBClass():New( "THappy" )
oHappy := HBClass():New( "THappy" )
__objAddData( oHappy, "lHappy" )
? __objHasData( oHappy, "lHappy" ) // .T.
// remove lHappy VAR
@@ -729,7 +727,7 @@
$FILES$
Library is core
$SEEALSO$
__objAddData(),__objGetMsgList(),__objGetValueList(),__objHasData(),__objSetValueList()
__objAddData(), __objGetMsgList(), __objGetValueList(), __objHasData(), __objSetValueList()
$END$
*/
@@ -792,6 +790,6 @@
$FILES$
Library is core
$SEEALSO$
__objHasData(),__objHasMethod()
__objHasData(), __objHasMethod()
$END$
*/

68
doc/en/rdddb.txt
View File

@@ -128,7 +128,7 @@
This function add a new record to the end of the database
in the selected or aliased work area. All fields in that
database will be given empty data values - character fields
will be filled with blank spaces,date fields with CToD('//'),
will be filled with blank spaces, date fields with CToD('//'),
numeric fields with 0, logical fields with .F., and memo fields
with NULL bytes. The header of the database is not updated until
the record is flushed from the buffer and the contents are
@@ -160,7 +160,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbUnlock(),dbUnlockAll()
dbUnlock(), dbUnlockAll()
$END$
*/
@@ -197,7 +197,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbSetFilter(),dbFilter()
dbSetFilter(), dbFilter()
$END$
*/
@@ -236,7 +236,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbUseArea(),dbCloseArea()
dbUseArea(), dbCloseArea()
$END$
*/
@@ -270,7 +270,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbUseArea(),dbCloseAll()
dbUseArea(), dbCloseAll()
$END$
*/
@@ -288,7 +288,7 @@
$SYNTAX$
dbCommit()
$DESCRIPTION$
This function updates all of the information for a give,selected,
This function updates all of the information for a give, selected,
or active workarea. This operation includes all database and index
buffers for that work area only. This function does not update all
open work areas.
@@ -316,7 +316,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbCloseAll(),dbCommitAll(),dbUnlock()
dbCloseAll(), dbCommitAll(), dbUnlock()
$END$
*/
@@ -335,7 +335,7 @@
dbCommit()
$DESCRIPTION$
This function performs a hard-disk write for all work areas.
Before the disk write is performed,all buffers are flushed.
Before the disk write is performed, all buffers are flushed.
open work areas.
$EXAMPLES$
PROCEDURE Main()
@@ -366,7 +366,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbCloseAll(),dbCommit(),dbUnlock()
dbCloseAll(), dbCommit(), dbUnlock()
$END$
*/
@@ -421,7 +421,7 @@
The dbCreate( ) function does not use the decimal field to
calculate the length of a character held longer than 256. Values
up to the maximum length of a character field (which is 65,519 bytes)
up to the maximum length of a character field (which is 65519 bytes)
are stored directly in the database in the length attribute if that
database was created via this function. However, a file containing
fields longer than 256 bytes is not compatible with any interpreter.
@@ -459,9 +459,9 @@
This function is not CA-Cl*pper compliant
$FILES$
Library is rdd
Header is dbstruct.ch
Header is dbstruct.ch
$SEEALSO$
AFields()*,dbStruct()
AFields()*, dbStruct()
$END$
*/
@@ -541,7 +541,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbRelation(),dbRSelect()
dbRelation(), dbRSelect()
$END$
*/
@@ -578,7 +578,7 @@
$FILES$
Library is rdd
$SEEALSO$
Bof(),Eof(),dbSkip(),dbSeek(),dbGoTop()
Bof(), Eof(), dbSkip(), dbSeek(), dbGoTop()
$END$
*/
@@ -605,7 +605,7 @@
The parameter <xRecordNumber> may be something other than a record
number. In some data formats, for example, the value of <xRecordNumber>
is a unique primary key while in other formats,<xRecordNumber> could
is a unique primary key while in other formats, <xRecordNumber> could
be an array offset if the data set was an array.
Issuing a dbGoto(RecNo()) call in a network enviroment will refresh
@@ -628,7 +628,7 @@
$FILES$
Library is rdd
$SEEALSO$
Bof(),Eof(),dbGoTop(),dbGoBottom(),dbSeek(),dbSkip()
Bof(), Eof(), dbGoTop(), dbGoBottom(), dbSeek(), dbSkip()
$END$
*/
@@ -665,7 +665,7 @@
$FILES$
Library is rdd
$SEEALSO$
Bof(),Eof(),dbSkip(),dbSeek(),dbGoBottom()
Bof(), Eof(), dbSkip(), dbSeek(), dbGoBottom()
$END$
*/
@@ -750,7 +750,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbUnlock(),dbUnlockAll(),FLock(),RLock()
dbUnlock(), dbUnlockAll(), FLock(), RLock()
$END$
*/
@@ -796,7 +796,7 @@
$FILES$
Library is rdd
$SEEALSO$
RLock(),dbRLock(),dbRUnlock()
RLock(), dbRLock(), dbRUnlock()
$END$
*/
@@ -837,7 +837,7 @@
$FILES$
Library is rdd
$SEEALSO$
RLock(),dbRLock(),dbRLockList()
RLock(), dbRLock(), dbRLockList()
$END$
*/
@@ -880,7 +880,7 @@
false if there is an item in the index key with a greater value than
the key expression <expKey>; at this point the record pointer will
position itself on that record. However, if there is no greater key
in the index,Eof() will return a logical true (.T.) value. If
in the index, Eof() will return a logical true (.T.) value. If
<lSoftSeek> is not passed, the function will look to the internal
status of SOFTSEEK before performing the operation. The default of
<lSoftSeek> is a logical false (.F.)
@@ -911,7 +911,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbGoBottom(),dbGoTop(),dbSkip(),Eof(),Bof(),Found()
dbGoBottom(), dbGoTop(), dbSkip(), Eof(), Bof(), Found()
$END$
*/
@@ -933,7 +933,7 @@
$DESCRIPTION$
This function moves the Harbour internal primary focus to the work
area designated by <xArea>. If <xArea> is numeric, then it will
select the numeric work area; if <xArea> is character,then it will
select the numeric work area; if <xArea> is character, then it will
select the work area with the alias name.
dbSelectArea(0) will select the next avaliable and unused work area.
@@ -960,7 +960,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbUseArea(),Select()
dbUseArea(), Select()
$END$
*/
@@ -986,7 +986,7 @@
selected work area. The default will be "DBFNTX". If specified,
<cDriver> contains the name of the database driver that should be
used to activate and manage the work area. If the specified driver is
not avaliable,this function will have no effect.
not avaliable, this function will have no effect.
$EXAMPLES$
dbSetDriver( "ADS" )
$STATUS$
@@ -1038,7 +1038,7 @@
$FILES$
Library is rdd
$SEEALSO$
Bof(),dbGoBottom(),dbGoTop(),dbSeek(),Eof()
Bof(), dbGoBottom(), dbGoTop(), dbSeek(), Eof()
$END$
*/
@@ -1063,9 +1063,9 @@
This function masks a database so that only those records that meet
the condition prescribed by the expression in the code block
<bCondition> and literally expressed as <cCondition> are visible.
If <cCondition> is not passed to this function,then the dbFilter()
If <cCondition> is not passed to this function, then the dbFilter()
function will return an empty string showing no filter in that work
area which in fact,would be not correct.
area which in fact, would be not correct.
$EXAMPLES$
PROCEDURE Main()
USE tests NEW
@@ -1078,7 +1078,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbFilter(),dbClearFilter()
dbFilter(), dbClearFilter()
$END$
*/
@@ -1099,7 +1099,7 @@
dbStruct() returns an array pointer to database structure
$DESCRIPTION$
This function returns a multidimensional array. This array has array
pointers to other arrays,each of which contains the characteristic
pointers to other arrays, each of which contains the characteristic
of a field in the active work area. The lenght of this array is based
in the number of fields in that particular work area. In other words,
Len(dbStruct()) is equal to the value obtained from FCount().
@@ -1121,7 +1121,7 @@
C
$FILES$
Library is rdd
Header is dbstruct.ch
Header is dbstruct.ch
$SEEALSO$
AFields()*
$END$
@@ -1162,7 +1162,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbUnlockAll(),FLock(),RLock()
dbUnlockAll(), FLock(), RLock()
$END$
*/
@@ -1202,7 +1202,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbUnlock(),FLock(),RLock()
dbUnlock(), FLock(), RLock()
$END$
*/
@@ -1264,6 +1264,6 @@
$FILES$
Library is rdd
$SEEALSO$
dbCloseArea(),dbSetDriver(),Select(),Set()
dbCloseArea(), dbSetDriver(), Select(), Set()
$END$
*/

24
doc/en/rddmisc.txt
View File

@@ -172,7 +172,7 @@
$FILES$
Library is rdd
$SEEALSO$
Eof(),Found(),LastRec()
Eof(), Found(), LastRec()
$END$
*/
@@ -207,7 +207,7 @@
$COMPLIANCE$
C
$SEEALSO$
DELETE,PACK,USE
DELETE, PACK, USE
$END$
*/
@@ -292,7 +292,7 @@
$FILES$
Library is rdd
$SEEALSO$
Bof(),Found(),LastRec()
Bof(), Found(), LastRec()
$END$
*/
@@ -328,7 +328,7 @@
$FILES$
Library is rdd
$SEEALSO$
FieldName(),Type()
FieldName(), Type()
$END$
*/
@@ -409,7 +409,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbStruct(),FCount(),Len(),ValType()
dbStruct(), FCount(), Len(), ValType()
$END$
*/
@@ -448,7 +448,7 @@
$FILES$
Library is rdd
$SEEALSO$
FieldGet(),FieldPut()
FieldGet(), FieldPut()
$END$
*/
@@ -603,7 +603,7 @@
$FILES$
Library is rdd
$SEEALSO$
DiskSpace(),LastRec(),RecSize()
DiskSpace(), LastRec(), RecSize()
$END$
*/
@@ -680,7 +680,7 @@
$FILES$
Library is rdd
$SEEALSO$
FieldName(),LastRec(),RecSize()
FieldName(), LastRec(), RecSize()
$END$
*/
@@ -729,7 +729,7 @@
$FILES$
Library is rdd
$SEEALSO$
FLock(),RLock()
FLock(), RLock()
$END$
*/
@@ -769,7 +769,7 @@
$FILES$
Library is rdd
$SEEALSO$
Eof(),LastRec(),RecNo(),dbGoBottom()
Eof(), LastRec(), RecNo(), dbGoBottom()
$END$
*/
@@ -809,7 +809,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbGoto(),dbGoTop(),dbGoBottom(),LastRec(),Eof(),Bof()
dbGoto(), dbGoTop(), dbGoBottom(), LastRec(), Eof(), Bof()
$END$
*/
@@ -848,7 +848,7 @@
$FILES$
Library is rdd
$SEEALSO$
DiskSpace(),FieldName(),Header(),LastRec()
DiskSpace(), FieldName(), Header(), LastRec()
$END$
*/

20
doc/en/rddord.txt
View File

@@ -50,7 +50,7 @@
$FILES$
Library is rdd
$SEEALSO$
IndexExt(),ordBagName()
IndexExt(), ordBagName()
$END$
*/
@@ -98,7 +98,7 @@
$FILES$
Library is rdd
$SEEALSO$
IndexOrd(),ordBagExt(),Alias()
IndexOrd(), ordBagExt(), Alias()
$END$
*/
@@ -220,7 +220,7 @@
$FILES$
Library is rdd
$SEEALSO$
dbCreateIndex(),ordName(),ordSetFocus()
dbCreateIndex(), ordName(), ordSetFocus()
$END$
*/
@@ -284,7 +284,7 @@
$SYNTAX$
ordFor( <xOrder>[, <cOrderBagName>] ) --> cForExp
$ARGUMENTS$
<xOrder> It the name of the target order,or the numeric position
<xOrder> It the name of the target order, or the numeric position
of the order.
<cOrderBagName> Name of the order bag.
@@ -294,7 +294,7 @@
$DESCRIPTION$
This function returns a character string that is the expression for
the FOR condition for the specified order. The order may be specified
if <xOrder> is the name of the order.However,<xOrder> may be an
if <xOrder> is the name of the order.However, <xOrder> may be an
numeric which represent the position in the order list of the desired
Order.
$EXAMPLES$
@@ -315,7 +315,7 @@
$FILES$
Library is rdd
$SEEALSO$
ordKey(),ordCreate(),ordName(),ordNumber()
ordKey(), ordCreate(), ordName(), ordNumber()
$END$
*/
@@ -333,7 +333,7 @@
$SYNTAX$
ordKey( <cOrderName> | <nOrder> [, <cOrderBagName>] ) --> cExpKey
$ARGUMENTS$
<xOrder> It the name of the target order,or the numeric position
<xOrder> It the name of the target order, or the numeric position
of the order.
<cOrderBagName> Name of the order bag.
@@ -362,7 +362,7 @@
$FILES$
Library is rdd
$SEEALSO$
ordFor(),ordName(),ordNumber(),ordKey()
ordFor(), ordName(), ordNumber(), ordKey()
$END$
*/
@@ -401,7 +401,7 @@
$FILES$
Library is rdd
$SEEALSO$
IndexKey(),IndexOrd()
IndexKey(), IndexOrd()
$END$
*/
@@ -468,7 +468,7 @@
The IndexOrd() function returns the numeric position of the current
controlling index in the selected or designated work area.
A returned value of 0 indicated that no active index is controlling
the database,which therefore is in the natural order.
the database, which therefore is in the natural order.
$EXAMPLES$
USE tests NEW INDEX test1
IF IndexOrd() > 0

18
doc/en/sayget.txt
View File

@@ -11,9 +11,9 @@
$ONELINER$
Creates a GET object and displays it to the screen
$SYNTAX$
@ <nRow>,<nCol> [SAY <cSay> [PICTURE <cSayPict>] COLOR <cSayColor> ]
@ <nRow>, <nCol> [SAY <cSay> [PICTURE <cSayPict>] COLOR <cSayColor> ]
GET <xVar> [PICTURE <cGetPict>] [WHEN <lWhen>] [COLOR <cGetColor>]
[VALID <lValid> / RANGE <xStart>,<xEnd>]
[VALID <lValid> / RANGE <xStart>, <xEnd>]
$ARGUMENTS$
<nRow> The row coordinate.
@@ -45,7 +45,7 @@
at row, column coordinate <nRow>, <nCol>.
If the SAY clause is used <cSay> will be displayed starting at
<nRow>,<nCol>, with the field variable <xVar> displayed at Row(),
<nRow>, <nCol>, with the field variable <xVar> displayed at Row(),
Col()+ 1. If <cSayPicr>, the picture template for the SAY expression
<cSay>, is used, all formatting rules contained will apply See the
TRANSFORM I function for further information.
@@ -54,11 +54,11 @@
used for the GET object and all formatting rules will apply. See
the table below for GET formatting rules.
If the WHEN clause is specified,when <lWhen> evaluates to a logical
If the WHEN clause is specified, when <lWhen> evaluates to a logical
true (.T.) condition, the GET object will he activated otherwise the
GET object will be skipped and no information will be obtained via
the screen. The name of a user-defined function returning a logical
true (.T.) or false ( F.) or a code block may be ,specified in <lWhen>
true (.T.) or false ( F.) or a code block may be, specified in <lWhen>
This clause not activated until a READ command or ReadModal()
function call is issued.
@@ -74,7 +74,7 @@
If the RANGE clause is specified instead of the VALID clause, the
two inclusive range values for <xVar> must be specified in <xStart>
and <xEnd>. Id <xVar> is a date data type,<xStart> and <xEnd> must
and <xEnd>. Id <xVar> is a date data type, <xStart> and <xEnd> must
also be date data types; if <xVar> is a numeric data type <xStart>
and <xEnd> must also be numeric data types. If a value fails the
RANGE test ,a message of OUT OF RANGE will appear in the SCOREBOARD
@@ -143,7 +143,7 @@
$PLATFORMS$
All
$SEEALSO$
@...SAY,READ,Transform()
@...SAY, READ, Transform()
$END$
*/
@@ -159,7 +159,7 @@
$ONELINER$
Displays data at specified coordinates of the current device.
$SYNTAX$
@ <nRow>,<nCol> SAY <xValue> [ PICTURE <cPict> ] [COLOR <cColor>]
@ <nRow>, <nCol> SAY <xValue> [ PICTURE <cPict> ] [COLOR <cColor>]
$ARGUMENTS$
<nRow> Row coordinate
@@ -195,6 +195,6 @@
$FILES$
$SEEALSO$
@...GET,SET DEVICE,Transform()
@...GET, SET DEVICE, Transform()
$END$
*/

56
doc/en/set.txt
View File

@@ -17,10 +17,10 @@
* Documentation for: __XHelp()
*
* Copyright 2000 Luiz Rafael Culik <Culik@sl.conex.net>
* Documentation for: SET WRAP,SET DEFAULT,SET MESSAGE
* Documentation for: SET PATH,SET INTENSITY,SET ALTERNATE
* Documentation for: SET CENTURY,SET DATE,SET CONSOLE
* Documentation for: SET EPOCH,SET PRINTER,SET FIXED
* Documentation for: SET WRAP, SET DEFAULT, SET MESSAGE
* Documentation for: SET PATH, SET INTENSITY, SET ALTERNATE
* Documentation for: SET CENTURY, SET DATE, SET CONSOLE
* Documentation for: SET EPOCH, SET PRINTER, SET FIXED
* Documentation for: SET BELL
* See COPYING.txt for licensing terms.
*
@@ -121,7 +121,7 @@
_SET_COLOR <cColorSet>
Sets the current color scheme, using color pairs in the
sequence "<standard>,<enhanced>,<border>,<background>,
sequence "<standard>, <enhanced>, <border>, <background>,
<unselected>". Each color pair uses the format
"<foreground>/<background>". The color codes are space
or "N" for black, "B" for blue, "G" for green, "BG" for
@@ -490,7 +490,7 @@
$FILES$
Library is core
$SEEALSO$
Inkey(),SetKey(),__Keyboard(),SET KEY
Inkey(), SetKey(), __Keyboard(), SET KEY
$END$
*/
@@ -547,7 +547,7 @@
$PLATFORMS$
All
$SEEALSO$
Inkey(),SetKey(),__Keyboard()
Inkey(), SetKey(), __Keyboard()
$END$
*/
@@ -640,7 +640,7 @@
$FILES$
Library is core
$SEEALSO$
SetKey(),hb_SetKeySave(),hb_SetKeyCheck()
SetKey(), hb_SetKeySave(), hb_SetKeyCheck()
$END$
*/
@@ -731,7 +731,7 @@
$FILES$
Library is core
$SEEALSO$
SetKey(),hb_SetKeySave()
SetKey(), hb_SetKeySave()
$END$
*/
@@ -816,7 +816,7 @@
$FILES$
Library is core
$SEEALSO$
__Accept(),__Input()
__Accept(), __Input()
$END$
*/
@@ -868,7 +868,7 @@
<cPath> Drive and/or path.
$DESCRIPTION$
This command changes the drive and directory used for reading and
writing database,index,memory, and alternate files. Specifying no
writing database, index, memory, and alternate files. Specifying no
parameters with this command will default the operation to the
current logged drive and directory.
$EXAMPLES$
@@ -878,7 +878,7 @@
$COMPLIANCE$
C
$SEEALSO$
SET PATH,CurDir(),Set()
SET PATH, CurDir(), Set()
$END$
*/
@@ -901,7 +901,7 @@
This command toggles the highlighted bars in a @...PROMPT command
to wrap around in a bottom-to-top and top-to-bottom manner. If the
value of the logical expression <lWrap> is a logical false (.F.),
the wrapping mode is set OFF; otherwise,it is set ON.
the wrapping mode is set OFF; otherwise, it is set ON.
$EXAMPLES$
See tests/menuto.prg
$STATUS$
@@ -909,7 +909,7 @@
$COMPLIANCE$
C
$SEEALSO$
@...PROMPT,MENU TO
@...PROMPT, MENU TO
$END$
*/
@@ -952,7 +952,7 @@
$COMPLIANCE$
C
$SEEALSO$
Set(),SET WRAP,@...PROMPT,MENU TO
Set(), SET WRAP, @...PROMPT, MENU TO
$END$
*/
@@ -985,7 +985,7 @@
$COMPLIANCE$
C
$SEEALSO$
SET DEFAULT,CurDir(),Set()
SET DEFAULT, CurDir(), Set()
$END$
*/
@@ -1015,7 +1015,7 @@
$COMPLIANCE$
C
$SEEALSO$
@...GET,@...PROMPT,@...SAY,Set()
@...GET,@...PROMPT,@...SAY, Set()
$END$
*/
@@ -1065,7 +1065,7 @@
$COMPLIANCE$
C
$SEEALSO$
CLOSE,SET PRINTER,SET CONSOLE,Set()
CLOSE, SET PRINTER, SET CONSOLE, Set()
$END$
*/
@@ -1099,7 +1099,7 @@
$COMPLIANCE$
C
$SEEALSO$
SET DATE,SET EPOCH,CToD(),Date(),DToC(),Set()
SET DATE, SET EPOCH, CToD(), Date(), DToC(), Set()
$END$
*/
@@ -1149,7 +1149,7 @@
$COMPLIANCE$
C
$SEEALSO$
SET DATE,SET EPOCH,CToD(),Date(),DToC(),Set()
SET DATE, SET EPOCH, CToD(), Date(), DToC(), Set()
$END$
*/
@@ -1179,7 +1179,7 @@
$COMPLIANCE$
C
$SEEALSO$
SET DATE,SET CENTURY,CToD(),Date(),DToC(),Set()
SET DATE, SET CENTURY, CToD(), Date(), DToC(), Set()
$END$
*/
@@ -1227,7 +1227,7 @@
$COMPLIANCE$
C
$SEEALSO$
SET DECIMALS,Exp(),Log(),Sqrt(),Val(),Set()
SET DECIMALS, Exp(), Log(), Sqrt(), Val(), Set()
$END$
*/
@@ -1253,7 +1253,7 @@
$DESCRIPTION$
This command can direct all output that is not controlled by the
@...SAY command and the DevPos() and DevOut() functions to the
printer. If specified,the condition <lPrinter> toggles the printer
printer. If specified, the condition <lPrinter> toggles the printer
ON if a logical true (.T.) and OFF if a logical false (.F.). If no
argument is specified in the command, the alternate file (if one
is open) is closed, or the device is reselected and the PRINTER
@@ -1308,7 +1308,7 @@
screens display other then direct output via the @...SAY commands
or the <-> DevOut() function.
If <lConsole> is a logical true (.T.),the console will be turned
If <lConsole> is a logical true (.T.), the console will be turned
ON; otherwise, the console will be turned off.
$EXAMPLES$
SET CONSOLE ON
@@ -1320,7 +1320,7 @@
$COMPLIANCE$
C
$SEEALSO$
SET DEVICE,Set()
SET DEVICE, Set()
$END$
*/
@@ -1355,7 +1355,7 @@
$COMPLIANCE$
C
$SEEALSO$
SET FIXED,Set()
SET FIXED, Set()
$END$
*/
@@ -1379,7 +1379,7 @@
and the DevPos() and DevOut() function will be displayed on the
printer.
When the device is set to the PRINTER,the SET MARGIN value adjusts
When the device is set to the PRINTER, the SET MARGIN value adjusts
the position of the column values accordingly. Also, an automatic
page eject will be issued when the current printhead position is
less than the last printed row. Finally, if used in conjunction with
@@ -1397,7 +1397,7 @@
$COMPLIANCE$
C
$SEEALSO$
@...SAY,SET PRINTER,SetPRC(),Set()
@...SAY, SET PRINTER, SetPRC(), Set()
$END$
*/

4
doc/en/setmode.txt
View File

@@ -71,8 +71,8 @@
$COMPLIANCE$
Some of these modes are not availables in CA-Cl*pper
$PLATFORMS$
DOS,Win
DOS, Win
$SEEALSO$
MaxCol(),MaxRow()
MaxCol(), MaxRow()
$END$
*/

54
doc/en/string.txt
View File

@@ -7,7 +7,7 @@
*
* Copyright 2000 Luiz Rafael Culik <culik@sl.conex.net>
* Documentation for: IsAlpha(), IsDigit(), IsUpper(), IsLower(), LTrim(),
* At(), hb_At(),RAt(), hb_RAt(), Left(), Right(),
* At(), hb_At(), RAt(), hb_RAt(), Left(), Right(),
* SubStr(), Upper(), Lower(), Asc(), Chr(), PadC(),
* PadL(), PadR(), AllTrim(), Trim(), RTrim(), Space(),
* Replicate(), Val(), Transform(), StrTran()
@@ -49,7 +49,7 @@
$FILES$
Library is core
$SEEALSO$
IsDigit(),IsLower(),IsUpper(),Lower(),Upper()
IsDigit(), IsLower(), IsUpper(), Lower(), Upper()
$END$
*/
@@ -87,7 +87,7 @@
$FILES$
Library is core
$SEEALSO$
IsAlpha(),IsLower(),IsUpper(),Lower(),Upper()
IsAlpha(), IsLower(), IsUpper(), Lower(), Upper()
$END$
*/
@@ -125,7 +125,7 @@
$FILES$
Library is core
$SEEALSO$
IsAlpha(),IsLower(),IsDigit(),Lower(),Upper()
IsAlpha(), IsLower(), IsDigit(), Lower(), Upper()
$END$
*/
@@ -163,7 +163,7 @@
$FILES$
Library is core
$SEEALSO$
IsAlpha(),IsDigit(),IsUpper(),Lower(),Upper()
IsAlpha(), IsDigit(), IsUpper(), Lower(), Upper()
$END$
*/
@@ -198,7 +198,7 @@
$FILES$
Library is core
$SEEALSO$
Trim(),RTrim(),AllTrim()
Trim(), RTrim(), AllTrim()
$END$
*/
@@ -433,7 +433,7 @@
$FILES$
Library is core
$SEEALSO$
SubStr(),Right(),At(),RAt()
SubStr(), Right(), At(), RAt()
$END$
*/
@@ -474,7 +474,7 @@
$FILES$
Library is core
$SEEALSO$
SubStr(),Left(),At(),RAt()
SubStr(), Left(), At(), RAt()
$END$
*/
@@ -523,7 +523,7 @@
$FILES$
Library is core
$SEEALSO$
Left(),At(),Right()
Left(), At(), Right()
$END$
*/
@@ -597,7 +597,7 @@
$FILES$
Library is core
$SEEALSO$
StrZero(),Transform(),Val()
StrZero(), Transform(), Val()
$END$
*/
@@ -760,7 +760,7 @@
$FILES$
Library is core
$SEEALSO$
Empty(),RTrim(),LTrim(),AAdd(),ASize()
Empty(), RTrim(), LTrim(), AAdd(), ASize()
$END$
*/
@@ -875,7 +875,7 @@
$FILES$
Library is core
$SEEALSO$
Upper(),IsLower(),IsUpper()
Upper(), IsLower(), IsUpper()
$END$
*/
@@ -911,7 +911,7 @@
$FILES$
Library is core
$SEEALSO$
Lower(),IsUpper(),IsLower()
Lower(), IsUpper(), IsLower()
$END$
*/
@@ -1036,7 +1036,7 @@
$FILES$
Library is core
$SEEALSO$
AllTrim(),PadL(),PadR()
AllTrim(), PadL(), PadR()
$END$
*/
@@ -1054,7 +1054,7 @@
$SYNTAX$
PadL( <xVal>, <nWidth>, <cFill> ) --> cString
$ARGUMENTS$
<xVal> An number,Character or date to pad
<xVal> An number, Character or date to pad
<nWidth> Width of output string
@@ -1062,7 +1062,7 @@
$RETURNS$
<cString> The left-justifies string of <xVal>
$DESCRIPTION$
This function takes an date,number,or character expression <xVal>
This function takes an date, number, or character expression <xVal>
and attempt to left-justify it within a string of a given width
expressed as <nWidth>. The default character used to pad left side
of <xVal> will be an blank space; however, this character may be
@@ -1084,7 +1084,7 @@
$FILES$
Library is core
$SEEALSO$
AllTrim(),PadC(),PadR()
AllTrim(), PadC(), PadR()
$END$
*/
@@ -1110,7 +1110,7 @@
$RETURNS$
<cString> The right-justifies string of <xVal>
$DESCRIPTION$
This function takes an date,number,or character expression <xVal>
This function takes an date, number, or character expression <xVal>
and attempt to right-justify it within a string of a given width
expressed as <nWidth>. The default character used to pad right side
of <xVal> will be an blank space; however, this character may be
@@ -1132,7 +1132,7 @@
$FILES$
Library is core
$SEEALSO$
AllTrim(),PadC(),PadL()
AllTrim(), PadC(), PadL()
$END$
*/
@@ -1170,7 +1170,7 @@
$FILES$
Library is core
$SEEALSO$
LTrim(),RTrim(),Trim()
LTrim(), RTrim(), Trim()
$END$
*/
@@ -1212,7 +1212,7 @@
$FILES$
Library is core
$SEEALSO$
AllTrim(),LTrim(),Trim()
AllTrim(), LTrim(), Trim()
$END$
*/
@@ -1254,7 +1254,7 @@
$FILES$
Library is core
$SEEALSO$
RTrim(),LTrim(),AllTrim()
RTrim(), LTrim(), AllTrim()
$END$
*/
@@ -1296,7 +1296,7 @@
$FILES$
Library is core
$SEEALSO$
Space(),PadC(),PadL(),PadR()
Space(), PadC(), PadL(), PadR()
$END$
*/
@@ -1368,7 +1368,7 @@
$FILES$
Library is core
$SEEALSO$
PadC(),PadL(),PadR(),Replicate()
PadC(), PadL(), PadR(), Replicate()
$END$
*/
@@ -1405,7 +1405,7 @@
$FILES$
Library is core
$SEEALSO$
Str(),Transform()
Str(), Transform()
$END$
*/
@@ -1458,7 +1458,7 @@
$FILES$
Libraty is rtl
$SEEALSO$
SubStr(),At()
SubStr(), At()
$END$
*/
@@ -1555,6 +1555,6 @@
$FILES$
Library is core
$SEEALSO$
@...SAY,DevOutPict()
@...SAY, DevOutPict()
$END$
*/

112
doc/en/subcodes.txt
View File

@@ -329,7 +329,7 @@
$DESCRIPTION$
The specified argument is not a string.
$EXAMPLES$
RTRIM, TRIM
RTrim(), Trim()
$COMPLIANCE$
C
$SEEALSO$
@@ -349,7 +349,7 @@
$DESCRIPTION$
The specified argument is not a string.
$EXAMPLES$
LTRIM
LTrim()
$COMPLIANCE$
C
$SEEALSO$
@@ -369,7 +369,7 @@
$DESCRIPTION$
The first argument passed to a function is not a string.
$EXAMPLES$
UPPER
Upper()
$COMPLIANCE$
C
$SEEALSO$
@@ -389,7 +389,7 @@
$DESCRIPTION$
The first argument passed to a function is not a string.
$EXAMPLES$
LOWER
Lower()
$COMPLIANCE$
C
$SEEALSO$
@@ -409,7 +409,7 @@
$DESCRIPTION$
The specified argument is not a numeric value.
$EXAMPLES$
CHR
Chr()
$COMPLIANCE$
C
$SEEALSO$
@@ -429,7 +429,7 @@
$DESCRIPTION$
The arguments passed to a function are of incorrect type.
$EXAMPLES$
SPACE
Space()
$COMPLIANCE$
C
$SEEALSO$
@@ -449,7 +449,7 @@
$DESCRIPTION$
The arguments passed to a function are of incorrect type.
$EXAMPLES$
REPLICATE
Replicate()
$COMPLIANCE$
C
$SEEALSO$
@@ -469,7 +469,7 @@
$DESCRIPTION$
The specified argument is not a string.
$EXAMPLES$
ASC
Asc()
$COMPLIANCE$
C
$SEEALSO$
@@ -489,7 +489,7 @@
$DESCRIPTION$
The specified argument is not a string.
$EXAMPLES$
AT
At()
$COMPLIANCE$
C
$SEEALSO$
@@ -510,8 +510,6 @@
The arguments of '$' operator are not a strings.
$EXAMPLES$
$$
$COMPLIANCE$
C
$SEEALSO$
@@ -531,7 +529,7 @@
$DESCRIPTION$
The first argument passed to a function is not a string.
$EXAMPLES$
SUBSTR
SubStr()
$COMPLIANCE$
C
$SEEALSO$
@@ -551,7 +549,7 @@
$DESCRIPTION$
The passed argument is neither a string nor an array.
$EXAMPLES$
LEN
Len()
$COMPLIANCE$
C
$SEEALSO$
@@ -572,7 +570,7 @@
The argument (or arguments) passed to a function are of incorrect
type
$EXAMPLES$
YEAR
Year()
$COMPLIANCE$
C
$SEEALSO$
@@ -593,7 +591,7 @@
The argument (or arguments) passed to a function are of incorrect
type
$EXAMPLES$
MONTH
Month()
$COMPLIANCE$
C
$SEEALSO$
@@ -614,7 +612,7 @@
The argument (or arguments) passed to a function are of incorrect
type
$EXAMPLES$
DAY
Day()
$COMPLIANCE$
C
$SEEALSO$
@@ -635,7 +633,7 @@
The argument (or arguments) passed to a function are of incorrect
type
$EXAMPLES$
DOW
DoW()
$COMPLIANCE$
C
$SEEALSO$
@@ -656,7 +654,7 @@
The argument (or arguments) passed to a function are of incorrect
type
$EXAMPLES$
CMONTH
CMonth()
$COMPLIANCE$
C
$SEEALSO$
@@ -677,7 +675,7 @@
The argument (or arguments) passed to a function is of incorrect
type
$EXAMPLES$
CDOW
CDoW()
$COMPLIANCE$
C
$SEEALSO$
@@ -698,7 +696,7 @@
The argument (or arguments) passed to a function is of incorrect
type
$EXAMPLES$
DTOS
DToS()
$COMPLIANCE$
C
$SEEALSO$
@@ -719,7 +717,7 @@
The argument (or arguments) passed to a function is of incorrect
type
$EXAMPLES$
TRANSFORM
Transform()
$COMPLIANCE$
C
$SEEALSO$
@@ -739,7 +737,7 @@
$DESCRIPTION$
The first argument is not a string.
$EXAMPLES$
LEFT
Left()
$COMPLIANCE$
C
$SEEALSO$
@@ -759,7 +757,7 @@
$DESCRIPTION$
The first arguments passed to a function is not a string.
$EXAMPLES$
STRTRAN
StrTran()
$COMPLIANCE$
C
$SEEALSO$
@@ -837,7 +835,7 @@
The argument (or arguments) passed to a function is not an numeric
value
$EXAMPLES$
MOD
Mod()
$COMPLIANCE$
C
$SEEALSO$
@@ -858,7 +856,7 @@
The argument (or arguments) passed to a function is not an numeric
value
$EXAMPLES$
ABS
Abs()
$COMPLIANCE$
C
$SEEALSO$
@@ -879,7 +877,7 @@
The argument (or arguments) passed to a function is not an numeric
value
$EXAMPLES$
INT
INT()
$COMPLIANCE$
C
$SEEALSO$
@@ -900,7 +898,7 @@
The argument (or arguments) passed to a function is not an numeric
value
$EXAMPLES$
MIN
Min()
$COMPLIANCE$
C
$SEEALSO$
@@ -921,7 +919,7 @@
The argument (or arguments) passed to a function is not an numeric
value
$EXAMPLES$
MAX
Max()
$COMPLIANCE$
C
$SEEALSO$
@@ -942,7 +940,7 @@
The argument (or arguments) passed to a function is not an numeric
value
$EXAMPLES$
ROUND
Round()
$COMPLIANCE$
C
$SEEALSO$
@@ -963,7 +961,7 @@
The argument (or arguments) passed to a function is not an numeric
value
$EXAMPLES$
LOG
Log()
$COMPLIANCE$
C
$SEEALSO$
@@ -984,7 +982,7 @@
The argument (or arguments) passed to a function is not an numeric
value
$EXAMPLES$
EXP
Exp()
$COMPLIANCE$
C
$SEEALSO$
@@ -1005,7 +1003,7 @@
The argument (or arguments) passed to a function is not an numeric
value
$EXAMPLES$
SQRT
Sqrt()
$COMPLIANCE$
C
$SEEALSO$
@@ -1026,7 +1024,7 @@
The argument (or arguments) passed to a function is not a string
value
$EXAMPLES$
VAL
Val()
$COMPLIANCE$
C
$SEEALSO$
@@ -1047,7 +1045,7 @@
The argument (or arguments) passed to a function is not a numeric
value
$EXAMPLES$
STR
Str()
$COMPLIANCE$
C
$SEEALSO$
@@ -1067,7 +1065,7 @@
$DESCRIPTION$
Passed Run time errors was not strings with filenames to copy/
$EXAMPLES$
__COPYFILE
__CopyFile()
$COMPLIANCE$
H
$SEEALSO$
@@ -1088,7 +1086,7 @@
An error has occurred during the attempt to open, create or write
during copy operation
$EXAMPLES$
__COPYFILE
__CopyFile()
$COMPLIANCE$
C
$SEEALSO$
@@ -1109,7 +1107,7 @@
The first argument is not an array or/and the second argument
is not a code block
$EXAMPLES$
AEVAL
AEval()
$COMPLIANCE$
C
$SEEALSO$
@@ -1153,7 +1151,7 @@
The passed argument is not an object. Only data of type OBJECT
can be cloned by this function
$EXAMPLES$
OCLONE
OCLONE()
$COMPLIANCE$
H
$SEEALSO$
@@ -1174,7 +1172,7 @@
Passed argument is not a name of defined class or specified class
doesn't have a super class
$EXAMPLES$
__INSTSUPER
__INSTSUPER()
$COMPLIANCE$
H
$SEEALSO$
@@ -1194,7 +1192,7 @@
$DESCRIPTION$
Passed argument is not a name of defined class
$EXAMPLES$
__INSTSUPER
__INSTSUPER()
$COMPLIANCE$
H
$SEEALSO$
@@ -1215,7 +1213,7 @@
The attempt to modify a data member of a class was made.
Only INLINE and METHOD can be modified
$EXAMPLES$
CLASSMOD
__CLASSMOD()
$COMPLIANCE$
H
$SEEALSO$
@@ -1236,7 +1234,7 @@
Either the first argument was not an object or the second argument
wasn't a string.
$EXAMPLES$
ISMESSAGE, OSEND
ISMESSAGE(), OSEND()
$COMPLIANCE$
H
$SEEALSO$
@@ -1257,7 +1255,7 @@
The passed arguments are causing conflict in handling of the request.
There is no point in waiting forever for no input events!
$EXAMPLES$
INKEY
Inkey()
$COMPLIANCE$
H
$SEEALSO$
@@ -1278,7 +1276,7 @@
The passed argument(s) is not a string. It should be a string with
a variable name or an one-dimensional array of strings.
$EXAMPLES$
__MVPRIVATE, __MVPUBLIC
__mvPrivate(), __mvPublic()
$COMPLIANCE$
H
$SEEALSO$
@@ -1294,12 +1292,12 @@
$CATEGORY$
Run time errors
$ONELINER$
Incorrect argument passed to __MVGET function
Incorrect argument passed to __mvGet() function
$DESCRIPTION$
__MVGET function expects only one argument: a string with a name
__mvGet() function expects only one argument: a string with a name
of variable. The value of this variable will be returned.
$EXAMPLES$
__MVGET
__mvGet()
$COMPLIANCE$
H
$SEEALSO$
@@ -1315,12 +1313,12 @@
$CATEGORY$
Run time errors
$ONELINER$
Incorrect argument passed to __MVPUT function
Incorrect argument passed to __mvPut() function
$DESCRIPTION$
__MVPUT function expects at least one argument: a string with a name
__mvPut() function expects at least one argument: a string with a name
of variable. The value of this variable will be set.
$EXAMPLES$
__MVPUT
__mvPut()
$COMPLIANCE$
H
$SEEALSO$
@@ -1342,7 +1340,7 @@
The number of requested argument is greater then the number of
passed arguments.
$EXAMPLES$
PVALUE
hb_PValue()
$COMPLIANCE$
H
$SEEALSO$
@@ -1363,7 +1361,7 @@
The first argument is not a string with function/procedure name
that should be called.
$EXAMPLES$
DO
Do()
$COMPLIANCE$
H
$SEEALSO$
@@ -1383,7 +1381,7 @@
$DESCRIPTION$
One passed argument is not of the required type.
$EXAMPLES$
__OBJ*()
__obj*()
$COMPLIANCE$
H
$SEEALSO$
@@ -1405,7 +1403,7 @@
A symbol should be modified or deleted from a class, but the symbol
doesn't exist.
$EXAMPLES$
__OBJ*()
__obj*()
$COMPLIANCE$
H
$SEEALSO$
@@ -1425,7 +1423,7 @@
$DESCRIPTION$
A symbol should be added to a class, but the symbol already exists.
$EXAMPLES$
__OBJ*()
__obj*()
$COMPLIANCE$
H
$SEEALSO$
@@ -1445,7 +1443,7 @@
$DESCRIPTION$
The second arguments passed to a function is not a string.
$EXAMPLES$
ISLEAPYEAR
IsLeapYear()
$COMPLIANCE$
H
$SEEALSO$
@@ -1465,7 +1463,7 @@
$DESCRIPTION$
The specified file cannot be created due some OS error.
$EXAMPLES$
SET, SET ALTERNATE TO
Set(), SET ALTERNATE TO
$COMPLIANCE$
C
$SEEALSO$

8
doc/en/tbrowse.txt
View File

@@ -22,7 +22,7 @@
<oBrowse> An new Browse Object
$DESCRIPTION$
This function set up a browsing window at top-left coordinates of
<nTop>,<nLeft> to bottom-right coordinates of <nBottom>,<nRight>.
<nTop>, <nLeft> to bottom-right coordinates of <nBottom>, <nRight>.
To browse Database files use TBrowseDB() function insted.
$DATANOLINK$
:aColumns Array to hold all browse columns
@@ -178,7 +178,7 @@
$FILES$
Library is core
$SEEALSO$
TBrowseNew(),TBColumnNew()
TBrowseNew(), TBColumnNew()
$END$
*/
@@ -225,7 +225,7 @@
K_ESC {| oB, nKey | -1 }
</table>
The keys handlers can be queried,added and replace an removed from
The keys handlers can be queried, added and replace an removed from
the internal keyboard dictionary. See the example.
oTb:SetKey( K_TAB, {| oTb, nKey | -1 } )
@@ -267,7 +267,7 @@
Value Meaning
-1 User request for the browse lost input focus
0 Code block associated with <nkey> was evaluated
1 Unable to locate <nKey> in the dictionary,Key was not processed
1 Unable to locate <nKey> in the dictionary, Key was not processed
</table>
$DESCRIPTION$
This method evaluate an code block associated with <nkey> that is

8
doc/en/tclass.txt
View File

@@ -21,14 +21,14 @@
$ONELINER$
HBClass() is used in the creation of all classes
$SYNTAX$
oClass := HBClass():New("TMyClass")
oClass := HBClass():New( "TMyClass" )
-or-
HBClass() is usually accessed by defining a class with the commands
defined in hbclass.h:
defined in hbclass.ch:
CLASS HBGetList // Calls HBClass() to create the HBGetList class
CREATE CLASS HBGetList // Calls HBClass() to create the HBGetList class
...
ENDCLASS
$ARGUMENTS$
@@ -66,6 +66,6 @@
$FILES$
Library is core
$SEEALSO$
__objHasData(),Object Oriented Programming,CLASS
__objHasData(), Object Oriented Programming, CLASS
$END$
*/

48
doc/en/terminal.txt
View File

@@ -17,7 +17,7 @@
* Documentation for: DevOutPict()
*
* Copyright 2000 Luiz Rafael Culik <culik@sl.conex.net>
* Documentation for: EJECT,MaxRow(),MaxCol(),Row(),Col(),PRow(),PCol()
* Documentation for: EJECT, MaxRow(), MaxCol(), Row(), Col(), PRow(), PCol()
*
* See COPYING.txt for licensing terms.
*
@@ -66,7 +66,7 @@
$FILES$
Library is core
$SEEALSO$
RESTORE SCREEN,RestScreen(),SaveScreen()
RESTORE SCREEN, RestScreen(), SaveScreen()
$END$
*/
@@ -107,7 +107,7 @@
$PLATFORMS$
All(GT)
$SEEALSO$
RESTORE SCREEN,__XRestScreen(),__XSaveScreen()
RESTORE SCREEN, __XRestScreen(), __XSaveScreen()
$END$
*/
@@ -153,7 +153,7 @@
$FILES$
Library is core
$SEEALSO$
__XRestScreen(),SAVE SCREEN,__XSaveScreen()
__XRestScreen(), SAVE SCREEN, __XSaveScreen()
$END$
*/
@@ -194,7 +194,7 @@
$PLATFORMS$
All(GT)
$SEEALSO$
__XRestScreen(),SAVE SCREEN,__XSaveScreen()
__XRestScreen(), SAVE SCREEN, __XSaveScreen()
$END$
*/
@@ -303,7 +303,7 @@
$FILES$
Library is core
$SEEALSO$
@...PROMPT,MENU TO,OutStd(),__NoNoAlert()
@...PROMPT, MENU TO, OutStd(), __NoNoAlert()
$END$
*/
@@ -379,7 +379,7 @@
$FILES$
Library is core
$SEEALSO$
OS(),OutStd(),OutErr()
OS(), OutStd(), OutErr()
$END$
*/
@@ -458,7 +458,7 @@
$FILES$
Library is core
$SEEALSO$
DevOut(),Transform()
DevOut(), Transform()
$END$
*/
@@ -489,7 +489,7 @@
$FILES$
Library is core
$SEEALSO$
__Wait(),__Accept()
__Wait(), __Accept()
$END$
*/
@@ -523,7 +523,7 @@
$FILES$
Library is core
$SEEALSO$
Set(),SET ALTERNATE,SET PRINTER,TEXT,__TextRestore()
Set(), SET ALTERNATE, SET PRINTER, TEXT, __TextRestore()
$END$
*/
@@ -555,7 +555,7 @@
$FILES$
Library is core
$SEEALSO$
Set(),SET ALTERNATE,SET PRINTER,TEXT,__TextSave()
Set(), SET ALTERNATE, SET PRINTER, TEXT, __TextSave()
$END$
*/
@@ -593,7 +593,7 @@
$FILES$
Library is core
$SEEALSO$
__Accept(),__Input()
__Accept(), __Input()
$END$
*/
@@ -641,7 +641,7 @@
$FILES$
Library is core
$SEEALSO$
?,??,DevOut(),DevOutPict(),DispOut(),DispOutAt(),OutErr(),QOut(),QQOut(),Str()
?, ??, DevOut(), DevOutPict(), DispOut(), DispOutAt(), OutErr(), QOut(), QQOut(), Str()
$END$
*/
@@ -690,7 +690,7 @@
$FILES$
Library is core
$SEEALSO$
?,??,DevOut(),DevOutPict(),DispOut(),DispOutAt(),OutStd(),QOut(),QQOut(),Str()
?, ??, DevOut(), DevOutPict(), DispOut(), DispOutAt(), OutStd(), QOut(), QQOut(), Str()
$END$
*/
@@ -711,11 +711,11 @@
None
$DESCRIPTION$
This command issue an form-feed command to the printer. If the printer
is not properly hooked up to the computer,an error will not be
is not properly hooked up to the computer, an error will not be
generated and the command will be ignored.
Once completed,the values of PRow() and PCol(),the row and column
indicators to the printer,will be set to 0. Their values,however,may
Once completed, the values of PRow() and PCol(), the row and column
indicators to the printer, will be set to 0. Their values, however, may
be manipulated before or after ussuing an EJECT by using the DevPos()
function.
@@ -741,7 +741,7 @@
$PLATFORMS$
All
$SEEALSO$
DevPos(),SET PRINTER,PRow(),PCol()
DevPos(), SET PRINTER, PRow(), PCol()
$END$
*/
@@ -776,7 +776,7 @@
$FILES$
Library is core
$SEEALSO$
Row(),MaxRow(),MaxCol()
Row(), MaxRow(), MaxCol()
$END$
*/
@@ -811,7 +811,7 @@
$FILES$
Library is core
$SEEALSO$
Col(),MaxRow(),MaxCol()
Col(), MaxRow(), MaxCol()
$END$
*/
@@ -843,11 +843,11 @@
$COMPLIANCE$
C
$PLATFORMS$
Linux(GT),OS2(GT),Win(GT)
Linux(GT), OS2(GT), Win(GT)
$FILES$
Library is core
$SEEALSO$
Row(),MaxRow(),Col()
Row(), MaxRow(), Col()
$END$
*/
@@ -879,10 +879,10 @@
$COMPLIANCE$
C
$PLATFORMS$
Linux(GT),OS2(GT),Win(GT)
Linux(GT), OS2(GT), Win(GT)
$FILES$
Library is core
$SEEALSO$
Col(),Row(),MaxCol()
Col(), Row(), MaxCol()
$END$
*/

2
doc/en/tgetlist.txt
View File

@@ -60,6 +60,6 @@
$FILES$
Library is core
$SEEALSO$
@...GET,@...PROMPT,MENU TO,READ,SET KEY,__AtPrompt(),__MenuTo()
@...GET, @...PROMPT, MENU TO, READ, SET KEY, __AtPrompt(), __MenuTo()
$END$
*/

4
doc/en/tlabel.txt
View File

@@ -43,7 +43,7 @@
include NEXT <expN> (number of records to be displayed, where <expN>
is the number of records), RECORD <expN> (a specific record to be
printed), REST (all records starting from the current record
position,and ALL (all records). The default is ALL.
position, and ALL (all records). The default is ALL.
Both logical expression may work ill conjunction with one another
where <bFor> is the logical expression for the FOR condition (for
@@ -53,7 +53,7 @@
If the SAMPLE clause is specified, test labels will be generated.
If the NOCONSOLE clause is specified,the console will be turned off
If the NOCONSOLE clause is specified, the console will be turned off
while this command is being executed.
This command follows the search criteria outlined in the SET PATH TO

2
doc/en/treport.txt
View File

@@ -85,7 +85,7 @@
groups, subgroups, and grand total information. The detailed title
item information will be ignored.
If the NOCONSOLE clause is specified,output to the console will be
If the NOCONSOLE clause is specified, output to the console will be
turned off while this command is being executed.
$EXAMPLES$
PROCEDURE Main()

6
doc/en/var.txt
View File

@@ -576,7 +576,7 @@
$COMPLIANCE$
C
$SEEALSO$
__mvGet(),__mvPut()
__mvGet(), __mvPut()
$FILES$
Library is core
$END$
@@ -631,7 +631,7 @@
$FILES$
Library is core
$SEEALSO$
Eval(),FieldWBlock(),MemVarBlock()
Eval(), FieldWBlock(), MemVarBlock()
$END$
*/
@@ -694,7 +694,7 @@
$FILES$
Library is core
$SEEALSO$
Eval(),FieldBlock(),MemVarBlock()
Eval(), FieldBlock(), MemVarBlock()
$END$
*/

2
extras/guestbk/guestbk.hbp
View File

@@ -6,3 +6,5 @@
-gtcgi
guestbk.prg
_cgi.prg
_inifile.prg

2
extras/guestbk/guestbk.prg
View File

@@ -155,5 +155,7 @@ PROCEDURE Main()
RETURN
#if defined( __HBSCRIPT__HBSHELL )
SET PROCEDURE TO "_cgi.prg"
SET PROCEDURE TO "_inifile.prg"
#endif

15
extras/hbdoc/_tmplates.prg
View File

@@ -152,7 +152,6 @@ METHOD IsField( c, nType ) CLASS Entry
lResult := .F.
ELSEIF nType != NIL .AND. hb_bitAnd( self:Group[ idx ], nType ) != nType
lResult := .F.
ELSE
ENDIF
ENDIF
@@ -229,10 +228,11 @@ METHOD FieldName( cField ) CLASS Entry
RETURN self:Fields[ AScan( self:Fields, {| a | a[ 1 ] == cField } ) ][ 2 ]
METHOD CategoryIndex( cCategory ) CLASS Entry
RETURN AScan( p_aCategories, {| a | a[ 1 ] == cCategory } )
RETURN AScan( p_aCategories, {| a | HB_ISARRAY( a ) .AND. Len( a ) >= 1 .AND. a[ 1 ] == cCategory } )
METHOD SubcategoryIndex( cCategory, cSubcategory ) CLASS Entry
RETURN hb_AScan( p_aCategories[ ::CategoryIndex( cCategory ) ][ 2 ], cSubcategory, , , .T. )
RETURN ::CategoryIndex( cCategory ) >= 1 .AND. ;
hb_AScan( p_aCategories[ ::CategoryIndex( cCategory ) ][ 2 ], cSubcategory, , , .T. )
PROCEDURE init_Templates()
@@ -351,7 +351,6 @@ PROCEDURE init_Templates()
RETURN
PROCEDURE ShowTemplatesHelp( cTemplate, cDelimiter )
LOCAL o := Entry():New()
@@ -372,9 +371,11 @@ PROCEDURE ShowTemplatesHelp( cTemplate, cDelimiter )
! Empty( o:Templates[ idxTemplates ][ 1 ] ) .AND. ;
!( o:Templates[ idxTemplates ][ 1 ] == "Template" )
// ~ IF nFrom != nTo
// ~ ShowSubHelp( o:Templates[ idxTemplates ][ 1 ], 1, 0 )
// ~ ENDIF
#if 0
IF nFrom != nTo
ShowSubHelp( o:Templates[ idxTemplates ][ 1 ], 1, 0 )
ENDIF
#endif
o:SetTemplate( o:Templates[ idxTemplates ][ 1 ] )

5
extras/hbdoc/hbdoc.hbp
View File

@@ -9,6 +9,11 @@
-gtcgi
hbdoc.prg
_genbase.prg
_genhtml.prg
_gentxt.prg
_genxml.prg
_tmplates.prg
# NOTE: hbdoc doesn't work from other locations than
# the current one, so we don't install it yet.

42
extras/hbdoc/hbdoc.prg
View File

@@ -173,7 +173,7 @@ PROCEDURE Main( ... )
ENDIF
DO CASE
CASE cArgName == "-source" ; p_hsSwitches[ "basedir" ] := arg + iif( Right( arg, 1 ) == hb_ps(), "", hb_ps() )
CASE cArgName == "-source" ; p_hsSwitches[ "basedir" ] := arg + iif( Right( arg, 1 ) == hb_ps(), "", hb_ps() )
CASE cArgName == "-format"
IF arg == "" .OR. hb_AScan( p_hsSwitches[ "format-list" ], arg, , , .T. ) == 0
ShowHelp( "Unknown format option '" + arg + "'" )
@@ -463,8 +463,8 @@ STATIC PROCEDURE ProcessBlock( aHandle, aContent, cFile, cType, cVersion, o )
o:type_ := cType
o:sourcefile_ := cSourceFile
o:sourcefileversion_ := cVersion
o:Template := "?TEMPLATE?"
o:Name := "?NAME?"
o:SetTemplate( "Function" )
DO WHILE FReadSection( aHandle, @cSectionName, @cSection, @o )
@@ -504,7 +504,7 @@ STATIC PROCEDURE ProcessBlock( aHandle, aContent, cFile, cType, cVersion, o )
IF ( idxCategory := AScan( p_aCategories, {| c | ! Empty( c ) .AND. ( iif( HB_ISCHAR( c ), Lower( c ) == Lower( cSection ), Lower( c[ 1 ] ) == Lower( cSection ) ) ) } ) ) == 0
AddErrorCondition( cFile, "Unknown CATEGORY '" + cSection + "' for template '" + o:Template, aHandle[ 2 ] )
lAccepted := .F.
// lAccepted := .F.
ENDIF
CASE cSectionName == "SUBCATEGORY" .AND. o:IsField( "SUBCATEGORY" )
@@ -512,12 +512,12 @@ STATIC PROCEDURE ProcessBlock( aHandle, aContent, cFile, cType, cVersion, o )
IF idxCategory <= 0 .OR. o:Category == ""
AddErrorCondition( cFile, "SUBCATEGORY '" + cSection + "' defined before CATEGORY", aHandle[ 2 ] )
lAccepted := .F.
// lAccepted := .F.
ELSEIF ( idxSubCategory := AScan( p_aCategories[ idxCategory ][ 2 ], {| c | c != NIL .AND. ( iif( HB_ISCHAR( c ), Lower( c ) == Lower( cSection ), Lower( c[ 1 ] ) == Lower( cSection ) ) ) } ) ) == 0
AddErrorCondition( cFile, "Unknown SUBCATEGORY '" + p_aCategories[ idxCategory ][ 1 ] + "-" + cSection, aHandle[ 2 ] )
lAccepted := .F.
// lAccepted := .F.
ENDIF
@@ -528,7 +528,7 @@ STATIC PROCEDURE ProcessBlock( aHandle, aContent, cFile, cType, cVersion, o )
Lower( cSection ) == "none." )
AddErrorCondition( cFile, "'" + o:Name + "' is identified as template " + o:Template + " but has no RETURNS value (" + cSection + ")", aHandle[ 2 ] - 1 )
lAccepted := .F.
// lAccepted := .F.
CASE ! o:IsConstraint( cSectionName, cSection )
@@ -555,15 +555,13 @@ STATIC PROCEDURE ProcessBlock( aHandle, aContent, cFile, cType, cVersion, o )
ENDDO
IF lAccepted
lAccepted := o:IsComplete( @cSource )
IF ! lAccepted
IF ! o:IsComplete( @cSource )
AddErrorCondition( cFile, "Missing sections: '" + cSource + "'", aHandle[ 2 ] )
lAccepted := .F.
// lAccepted := .F.
ENDIF
ENDIF
IF ! lAccepted
ELSEIF o:Template == "Function" .AND. ( ;
Empty( o:Returns ) .OR. ;
Lower( o:Returns ) == "nil" .OR. ;
@@ -602,15 +600,14 @@ STATIC PROCEDURE ProcessBlock( aHandle, aContent, cFile, cType, cVersion, o )
IF idxSubCategory == -1 .AND. ( ! o:IsField( "SUBCATEGORY" ) .OR. ! o:IsRequired( "SUBCATEGORY" ) ) // .AND. idxSubCategory == -1
idxSubCategory := o:SubcategoryIndex( o:Category, "" )
IF idxSubCategory == -1
idxSubCategory := 1
ENDIF
ENDIF
IF ! HB_ISARRAY( p_aCategories[ idxCategory ][ 3 ][ idxSubCategory ] )
p_aCategories[ idxCategory ][ 3 ][ idxSubCategory ] := {}
IF idxCategory > 0 .AND. idxSubCategory > 0
IF ! HB_ISARRAY( p_aCategories[ idxCategory ][ 3 ][ idxSubCategory ] )
p_aCategories[ idxCategory ][ 3 ][ idxSubCategory ] := {}
ENDIF
AAdd( p_aCategories[ idxCategory ][ 3 ][ idxSubCategory ], o )
ENDIF
AAdd( p_aCategories[ idxCategory ][ 3 ][ idxSubCategory ], o )
ENDIF
@@ -823,10 +820,9 @@ FUNCTION Decode( cType, hsBlock, cKey )
IF ( idx := AScan( p_aCompliance, {| a | a[ 1 ] == cCode } ) ) > 0
RETURN p_aCompliance[ idx ][ 2 ]
ELSE
RETURN "Unknown 'COMPLIANCE' code: '" + cCode + "'"
RETURN cCode
ENDIF
DO CASE
CASE Empty( cCode ) ; RETURN cCode
CASE cCode == "C" ; RETURN "This is CA-Cl*pper v5.2 compliant"
CASE cCode == "C(array)" ; RETURN "This is CA-Cl*pper v5.2 compliant except that arrays in Harbour can have an unlimited number of elements"
CASE cCode == "C(menu)" ; RETURN "This is CA-Cl*pper v5.2 compliant except that menus (internally arrays) in Harbour can have an unlimited number of elements"
@@ -835,7 +831,7 @@ FUNCTION Decode( cType, hsBlock, cKey )
CASE cCode == "C53" ; RETURN "This is CA-Cl*pper v5.3 compliant and is only visible if source was compiled with the HB_COMPAT_C53 flag"
CASE cCode == "H" ; RETURN "This is Harbour specific"
CASE cCode == "NA" ; RETURN "Not applicable"
OTHERWISE ; RETURN "Unknown 'COMPLIANCE' code: '" + cCode + "'"
OTHERWISE ; RETURN cCode
ENDCASE
CASE cType == "NAME"
@@ -893,9 +889,9 @@ PROCEDURE ShowSubHelp( xLine, nMode, nIndent, n )
ENDIF
OTHERWISE
DO CASE
CASE nMode == 1 ; OutStd( cIndent + xLine ) ; OutStd( hb_eol() )
CASE nMode == 2 ; OutStd( iif( n > 1, ", ", "" ) + xLine )
OTHERWISE ; OutStd( "(" + hb_ntos( nMode ) + ") " ) ; OutStd( xLine ) ; OutStd( hb_eol() )
CASE nMode == 1 ; OutStd( cIndent + xLine ) ; OutStd( hb_eol() )
CASE nMode == 2 ; OutStd( iif( n > 1, ", ", "" ) + xLine )
OTHERWISE ; OutStd( "(" + hb_ntos( nMode ) + ") " ) ; OutStd( xLine ) ; OutStd( hb_eol() )
ENDCASE
ENDCASE
ENDIF
@@ -1150,8 +1146,10 @@ FUNCTION Filename( cFile, cFormat, nLength )
RETURN cResult
#if defined( __HBSCRIPT__HBSHELL )
SET PROCEDURE TO "_tmplates.prg"
SET PROCEDURE TO "_genbase.prg"
SET PROCEDURE TO "_gentxt.prg"
SET PROCEDURE TO "_genhtml.prg"
SET PROCEDURE TO "_genxml.prg"
#endif

176
extras/httpsrv/home/counter.html
View File

@@ -1,89 +1,87 @@
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<title>Show Graphic Counter</title>
<meta http-equiv="Pragma" content="no-cache">
<link rel="stylesheet" type="text/css" href="/css/base.css" />
<script type="text/javascript" src="/js/ajax.js"></script>
<script type="text/javascript">
// <![CDATA[
var divpart;
/**
* Requests table data for a specific page.
*
* @param pageNum the page number to request data for
*/
function sendData( force )
{
var qstr = getquerystring();
if ( force || qstr.length > 4 )
{
//qstr = 'w1=' + escape(qstr); // NOTE: no '?' before querystring
//xmlPost('/cgi-bin/showcounter.hrb', qstr + "&sid=" + Math.random(), tableResponseHandler);
divpart = 'result';
updatepage( escape( qstr ) );
}
return false;
}
function getquerystring()
{
var form = document.forms[ 'f1' ];
var word = form.word.value;
//alert( 'qstr: ' + qstr );
return word;
}
function updatepage( str )
{
//document.getElementById( divpart ).innerHTML = str; /* "<img src='/counter/" + str + "' />"; */
document.getElementById( divpart ).innerHTML = "<img src='/cgi-bin/showcounter.hrb?w=" + str + "' />";
}
/**
* Handler for server's response to table requests.
* Table content is pulled from response XML and a HTML
* table is built. The table is then inserted into the
* 'tableSection' DIV.
*/
function tableResponseHandler()
{
// Make sure the request is loaded (readyState = 4)
if (req.readyState == 4)
{
// Make sure the status is "OK"
if (req.status == 200)
{
// shutdown Ajax loading progress
EndProgress();
// transform
//document.write( xsldoc );
updatepage( req.responseText );
}
else
{
EndProgress();
alert("There was a problem retrieving the XML data:\n" +
req.statusText);
}
}
}
// ]]>
</script>
</head>
<body>
This is a simple ajax test. Please type a number (at least 4 digits).
<form name="f1" onsubmit='JavaScript:sendData(true);return false'>
<p>Number: <input name="word" type="text" onkeyup='JavaScript:sendData(false);return false'>
<input value="Go" type="button" onclick='JavaScript:sendData(true)'></p>
<div id="result"></div>
</form>
Return to <a href="/">Main Page</a>
</body>
</html>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<title>Show Graphic Counter</title>
<meta http-equiv="Pragma" content="no-cache">
<link rel="stylesheet" type="text/css" href="/css/base.css" />
<script type="text/javascript" src="/js/ajax.js"></script>
<script type="text/javascript">
// <![CDATA[
var divpart;
/**
* Requests table data for a specific page.
*
* @param pageNum the page number to request data for
*/
function sendData( force )
{
var qstr = getquerystring();
if ( force || qstr.length > 4 )
{
//qstr = 'w1=' + escape(qstr); // NOTE: no '?' before querystring
//xmlPost('/cgi-bin/showcounter.hrb', qstr + "&sid=" + Math.random(), tableResponseHandler);
divpart = 'result';
updatepage( escape( qstr ) );
}
return false;
}
function getquerystring()
{
var form = document.forms[ 'f1' ];
var word = form.word.value;
//alert( 'qstr: ' + qstr );
return word;
}
function updatepage( str )
{
//document.getElementById( divpart ).innerHTML = str; /* "<img src='/counter/" + str + "' />"; */
document.getElementById( divpart ).innerHTML = "<img src='/cgi-bin/showcounter.hrb?w=" + str + "' />";
}
/**
* Handler for server's response to table requests.
* Table content is pulled from response XML and a HTML
* table is built. The table is then inserted into the
* 'tableSection' DIV.
*/
function tableResponseHandler()
{
// Make sure the request is loaded (readyState = 4)
if (req.readyState == 4)
{
// Make sure the status is "OK"
if (req.status == 200)
{
// shutdown Ajax loading progress
EndProgress();
// transform
//document.write( xsldoc );
updatepage( req.responseText );
}
else
{
EndProgress();
alert("There was a problem retrieving the XML data:\n" +
req.statusText);
}
}
}
// ]]>
</script>
</head>
<body>
This is a simple ajax test. Please type a number (at least 4 digits).
<form name="f1" onsubmit='JavaScript:sendData(true);return false'>
<p>Number: <input name="word" type="text" onkeyup='JavaScript:sendData(false);return false'>
<input value="Go" type="button" onclick='JavaScript:sendData(true)'></p>
<div id="result"></div>
</form>
Return to <a href="/">Main Page</a>
</body>
</html>

128
extras/httpsrv/home/css/base.css
View File

@@ -1,64 +1,64 @@
body { color:black; font-size:10pt; font-family:Tahoma,Helvetica,Arial; }
a.pageSection:link { color: #ff0000; }
a.pageSection:visited { color: #0000ff; }
a.pageSection:hover { background: #66ff66; }
/* a:link { color: #ff0000; } */
/* a:visited { color: #0000ff; } */
/* a:hover { background: #66ff66; } */
A {
color: #0000FF;
text-decoration: none;
}
A:hover { color: #6699cc; text-decoration: underline; }
A.urls { color: #0A68B6; text-decoration: none; }
A.urls:hover { color: #6699cc; text-decoration: underline; }
A.tags { color: #008080; text-decoration: none; }
A.tags:hover { color: #6699cc; text-decoration: underline; }
table.pagetable td
{
padding: 3px;
}
table.datatable
{
width: 100%;
font-size: 12px;
font-family: Verdana;
}
table.datatable tr th
{
padding: 2px;
border-bottom:1px solid black;
text-align: left;
}
table.datatable tr td
{
padding: 2px;
border-bottom: 1px solid white;
vertical-align: top;
}
table.datatable tr.odd
{
background-color: #7FFFD4;
}
table.datatable tr.even
{
background-color: #F0F0F0;
}
table.datatable tr.blank
{
background-color: #FFFFFF;
}
body { color:black; font-size:10pt; font-family:Tahoma,Helvetica,Arial; }
a.pageSection:link { color: #ff0000; }
a.pageSection:visited { color: #0000ff; }
a.pageSection:hover { background: #66ff66; }
/* a:link { color: #ff0000; } */
/* a:visited { color: #0000ff; } */
/* a:hover { background: #66ff66; } */
A {
color: #0000FF;
text-decoration: none;
}
A:hover { color: #6699cc; text-decoration: underline; }
A.urls { color: #0A68B6; text-decoration: none; }
A.urls:hover { color: #6699cc; text-decoration: underline; }
A.tags { color: #008080; text-decoration: none; }
A.tags:hover { color: #6699cc; text-decoration: underline; }
table.pagetable td
{
padding: 3px;
}
table.datatable
{
width: 100%;
font-size: 12px;
font-family: Verdana;
}
table.datatable tr th
{
padding: 2px;
border-bottom:1px solid black;
text-align: left;
}
table.datatable tr td
{
padding: 2px;
border-bottom: 1px solid white;
vertical-align: top;
}
table.datatable tr.odd
{
background-color: #7FFFD4;
}
table.datatable tr.even
{
background-color: #F0F0F0;
}
table.datatable tr.blank
{
background-color: #FFFFFF;
}

88
extras/httpsrv/home/index.html
View File

@@ -1,44 +1,44 @@
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Harbour uHTTPD Server example</title>
<link rel="shortcut icon" href="favicon.ico" type="image/x-icon" />
</head>
<body>
<h1>Simple uHTTPD server demo</h1>
<br />
Examples:
<br />
<ul>
<li>
<a href="testajax.html">Test Ajax</a> (*)
</li>
<li>
<a href="testxmldb.html">Test Ajax XML Database</a> (*)
</li>
<li>
<a href="counter.html">Test Ajax Counter</a> (*) (**)
</li>
<li>
<a href="/serverstatus">Server Status</a>
</li>
<li>
<a href="/info">Alias to /cgi-bin/info.hrb page with server variables</a> (*)
</li>
<li>
<a href="postsample.html">Post method example</a>
</li>
<li>
<a href="/cookie">Cookie example</a> (*)
</li>
</ul>
<br />
(*) Before run these examples, please build files in /uhttpd/modules folder using 'hbmk2 modules.hbp'
<br />
(**) This example requires libgd package
</body>
</html>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Harbour uHTTPD Server example</title>
<link rel="shortcut icon" href="favicon.ico" type="image/x-icon" />
</head>
<body>
<h1>Simple uHTTPD server demo</h1>
<br />
Examples:
<br />
<ul>
<li>
<a href="testajax.html">Test Ajax</a> (*)
</li>
<li>
<a href="testxmldb.html">Test Ajax XML Database</a> (*)
</li>
<li>
<a href="counter.html">Test Ajax Counter</a> (*) (**)
</li>
<li>
<a href="/serverstatus">Server Status</a>
</li>
<li>
<a href="/info">Alias to /cgi-bin/info.hrb page with server variables</a> (*)
</li>
<li>
<a href="postsample.html">Post method example</a>
</li>
<li>
<a href="/cookie">Cookie example</a> (*)
</li>
</ul>
<br />
(*) Before run these examples, please build files in /uhttpd/modules folder using 'hbmk2 modules.hbp'
<br />
(**) This example requires libgd package
</body>
</html>

1
extras/httpsrv/home/js/ajax.js
View File

@@ -254,4 +254,3 @@ function ShowProgress()
a.style.display="none";
} // if
} // ShowProgress

46
extras/httpsrv/home/postsample.html
View File

@@ -1,23 +1,23 @@
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Harbour uHTTPD Server post example</title>
<link rel="shortcut icon" href="favicon.ico" type="image/x-icon" />
</head>
<body>
<h1>Simple uHTTPD server method POST</h1>
<br />
<br />
<form name=test action="/info" method="post">
Type something: <input type="text" name="word">
<input type="submit">
</form>
Pressing button you will redirect to /info page. Look at POST and REQUEST values.
<br />You will see a "word" variable name.
<br />
<br />Return to <a href="/">Main Page</a>
</body>
</html>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Harbour uHTTPD Server post example</title>
<link rel="shortcut icon" href="favicon.ico" type="image/x-icon" />
</head>
<body>
<h1>Simple uHTTPD server method POST</h1>
<br />
<br />
<form name=test action="/info" method="post">
Type something: <input type="text" name="word">
<input type="submit">
</form>
Pressing button you will redirect to /info page. Look at POST and REQUEST values.
<br />You will see a "word" variable name.
<br />
<br />Return to <a href="/">Main Page</a>
</body>
</html>

112
extras/httpsrv/home/testajax.html
View File

@@ -1,56 +1,56 @@
<html>
<head>
<title>Simple Ajax Example</title>
<script language="Javascript">
function xmlhttpPost(strURL)
{
var xmlHttpReq = false;
var self = this;
// Mozilla/Safari
if ( window.XMLHttpRequest )
{
self.xmlHttpReq = new XMLHttpRequest();
}
// IE
else if ( window.ActiveXObject )
{
self.xmlHttpReq = new ActiveXObject("Microsoft.XMLHTTP");
}
self.xmlHttpReq.open('POST', strURL, true);
self.xmlHttpReq.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
self.xmlHttpReq.onreadystatechange = function()
{
if ( self.xmlHttpReq.readyState == 4 )
{
updatepage( self.xmlHttpReq.responseText );
}
}
self.xmlHttpReq.send( getquerystring() );
}
function getquerystring()
{
var form = document.forms[ 'f1' ];
var word = form.word.value;
qstr = 'w=' + escape(word); // NOTE: no '?' before querystring
return qstr;
}
function updatepage( str )
{
document.getElementById( "result" ).innerHTML = str;
}
</script>
</head>
<body>
This is a simple ajax test. Please type a string in input field and press GO button.
<form name="f1">
<p>word: <input name="word" type="text">
<input value="Go" type="button" onclick='JavaScript:xmlhttpPost("/cgi-bin/testajax.hrb")'></p>
<div id="result"></div>
</form>
Return to <a href="/">Main Page</a>
</body>
</html>
<html>
<head>
<title>Simple Ajax Example</title>
<script language="Javascript">
function xmlhttpPost(strURL)
{
var xmlHttpReq = false;
var self = this;
// Mozilla/Safari
if ( window.XMLHttpRequest )
{
self.xmlHttpReq = new XMLHttpRequest();
}
// IE
else if ( window.ActiveXObject )
{
self.xmlHttpReq = new ActiveXObject("Microsoft.XMLHTTP");
}
self.xmlHttpReq.open('POST', strURL, true);
self.xmlHttpReq.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
self.xmlHttpReq.onreadystatechange = function()
{
if ( self.xmlHttpReq.readyState == 4 )
{
updatepage( self.xmlHttpReq.responseText );
}
}
self.xmlHttpReq.send( getquerystring() );
}
function getquerystring()
{
var form = document.forms[ 'f1' ];
var word = form.word.value;
qstr = 'w=' + escape(word); // NOTE: no '?' before querystring
return qstr;
}
function updatepage( str )
{
document.getElementById( "result" ).innerHTML = str;
}
</script>
</head>
<body>
This is a simple ajax test. Please type a string in input field and press GO button.
<form name="f1">
<p>word: <input name="word" type="text">
<input value="Go" type="button" onclick='JavaScript:xmlhttpPost("/cgi-bin/testajax.hrb")'></p>
<div id="result"></div>
</form>
Return to <a href="/">Main Page</a>
</body>
</html>

180
extras/httpsrv/home/testxmldb.html
View File

@@ -1,90 +1,90 @@
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<title>Part 4 Example</title>
<meta http-equiv="Pragma" content="no-cache">
<link rel="stylesheet" type="text/css" href="/css/base.css" />
<script type="text/javascript" src="/js/ajax.js"></script>
<script type="text/javascript">
// <![CDATA[
var divpart;
/**
* Requests table data for a specific page.
*
* @param pageNum the page number to request data for
*/
function getTableData(pageNum)
{
xslGet( "/xsl/based.xsl" );
xmlGet( '/cgi-bin/tableservletdb.hrb?page=' + pageNum + "&sid=" + Math.random(), tableResponseHandler);
divpart = 'tableSection';
}
function getTablePages()
{
xslGet( "/xsl/basep.xsl" );
xmlGet( '/cgi-bin/tableservletdb.hrb?count=true' + "&sid=" + Math.random(), tableResponseHandler);
divpart = 'pageSection';
}
/**
* Handler for server's response to table requests.
* Table content is pulled from response XML and a HTML
* table is built. The table is then inserted into the
* 'tableSection' DIV.
*/
function tableResponseHandler()
{
// Make sure the request is loaded (readyState = 4)
if (req.readyState == 4)
{
// Make sure the status is "OK"
if (req.status == 200)
{
// shutdown Ajax loading progress
EndProgress();
// Make sure the XSL document is loaded
if (!xsldocloaded)
{
alert('Unable to transform data. XSL is not yet loaded.');
// break out of the function
return;
}
// transform
//document.write( xsldoc );
combine_XLM_XSLT_HTML( req, xsldoc, document, divpart );
xsldocloaded = null;
xsldoc = null;
}
else
{
alert("There was a problem retrieving the XML data:\n" +
req.statusText);
}
}
}
// ]]>
</script>
</head>
<body onload="getTablePages()">
<big>Simple XML servlet</big>
<br />
<br />Tested with IE6+, Firefox 2+ and Opera 9+. Not working with Google Chrome, Safari.
<br />Please note that tableservletdb.prg simulates a slow reply of 0.5 seconds.
If you want to check real speed please comment #define SIMULATE_SLOW_REPLY in source.
<br />Return to <a href="/">Main Page</a>
<br />
<br />Select a Page&nbsp;
<div style="border: 1px solid black; padding: 10px;" id="pageSection">&nbsp;</div>
<br />
<div style="border: 1px solid black; padding: 10px;" id="tableSection">&nbsp;</div>
</body>
</html>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<title>Part 4 Example</title>
<meta http-equiv="Pragma" content="no-cache">
<link rel="stylesheet" type="text/css" href="/css/base.css" />
<script type="text/javascript" src="/js/ajax.js"></script>
<script type="text/javascript">
// <![CDATA[
var divpart;
/**
* Requests table data for a specific page.
*
* @param pageNum the page number to request data for
*/
function getTableData(pageNum)
{
xslGet( "/xsl/based.xsl" );
xmlGet( '/cgi-bin/tableservletdb.hrb?page=' + pageNum + "&sid=" + Math.random(), tableResponseHandler);
divpart = 'tableSection';
}
function getTablePages()
{
xslGet( "/xsl/basep.xsl" );
xmlGet( '/cgi-bin/tableservletdb.hrb?count=true' + "&sid=" + Math.random(), tableResponseHandler);
divpart = 'pageSection';
}
/**
* Handler for server's response to table requests.
* Table content is pulled from response XML and a HTML
* table is built. The table is then inserted into the
* 'tableSection' DIV.
*/
function tableResponseHandler()
{
// Make sure the request is loaded (readyState = 4)
if (req.readyState == 4)
{
// Make sure the status is "OK"
if (req.status == 200)
{
// shutdown Ajax loading progress
EndProgress();
// Make sure the XSL document is loaded
if (!xsldocloaded)
{
alert('Unable to transform data. XSL is not yet loaded.');
// break out of the function
return;
}
// transform
//document.write( xsldoc );
combine_XLM_XSLT_HTML( req, xsldoc, document, divpart );
xsldocloaded = null;
xsldoc = null;
}
else
{
alert("There was a problem retrieving the XML data:\n" +
req.statusText);
}
}
}
// ]]>
</script>
</head>
<body onload="getTablePages()">
<big>Simple XML servlet</big>
<br />
<br />Tested with IE6+, Firefox 2+ and Opera 9+. Not working with Google Chrome, Safari.
<br />Please note that tableservletdb.prg simulates a slow reply of 0.5 seconds.
If you want to check real speed please comment #define SIMULATE_SLOW_REPLY in source.
<br />Return to <a href="/">Main Page</a>
<br />
<br />Select a Page&nbsp;
<div style="border: 1px solid black; padding: 10px;" id="pageSection">&nbsp;</div>
<br />
<div style="border: 1px solid black; padding: 10px;" id="tableSection">&nbsp;</div>
</body>
</html>

148
extras/httpsrv/home/xsl/based.xsl
View File

@@ -1,74 +1,74 @@
<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output method="html" omit-xml-declaration="yes" indent="no"/>
<xsl:variable name="numCols" select="count(table/header/cell)" />
<xsl:variable name="numToPad" select="23 - count(table/row)" />
<xsl:template match="/">
<!-- start Data Section table -->
<table cellspacing="0" cellpadding="0" class="datatable">
<tr>
<xsl:for-each select="table/header/cell">
<th><xsl:value-of select="." /></th>
</xsl:for-each>
</tr>
<xsl:if test="count(table/row) = 0">
<tr class="blank">
<td width="100%" colspan="{$numCols}" align="center" style="font-style: italic; padding:10px;">No Records Found</td>
</tr>
</xsl:if>
<xsl:for-each select="table/row">
<xsl:variable name="rowClass">
<xsl:choose>
<xsl:when test="position() mod 2">even</xsl:when>
<xsl:otherwise>odd</xsl:otherwise>
</xsl:choose>
</xsl:variable>
<tr class="{$rowClass}">
<xsl:call-template name="buildCell">
<xsl:with-param name="rowNode" select="." />
</xsl:call-template>
</tr>
</xsl:for-each>
<xsl:call-template name="padding">
<xsl:with-param name="max_count" select="$numToPad"/>
<xsl:with-param name="counter" select="'0'"/>
</xsl:call-template>
</table>
<!-- end Data Section table -->
</xsl:template>
<xsl:template name="buildCell">
<xsl:param name="rowNode"/>
<xsl:for-each select="/table/header/cell">
<xsl:variable name="colName" select="@key" />
<td><xsl:value-of select="$rowNode/*[@key=$colName]" disable-output-escaping="yes"/>&#160;</td>
</xsl:for-each>
</xsl:template>
<xsl:template name="padding">
<xsl:param name="max_count"/>
<xsl:param name="counter"/>
<xsl:if test="$counter &lt; $max_count">
<tr class="blank">
<td colspan="{$numCols + 1}">&#160;</td>
</tr>
<xsl:call-template name="padding">
<xsl:with-param name="max_count" select="$max_count"/>
<xsl:with-param name="counter" select="$counter + 1"/>
</xsl:call-template>
</xsl:if>
</xsl:template>
</xsl:stylesheet>
<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output method="html" omit-xml-declaration="yes" indent="no"/>
<xsl:variable name="numCols" select="count(table/header/cell)" />
<xsl:variable name="numToPad" select="23 - count(table/row)" />
<xsl:template match="/">
<!-- start Data Section table -->
<table cellspacing="0" cellpadding="0" class="datatable">
<tr>
<xsl:for-each select="table/header/cell">
<th><xsl:value-of select="." /></th>
</xsl:for-each>
</tr>
<xsl:if test="count(table/row) = 0">
<tr class="blank">
<td width="100%" colspan="{$numCols}" align="center" style="font-style: italic; padding:10px;">No Records Found</td>
</tr>
</xsl:if>
<xsl:for-each select="table/row">
<xsl:variable name="rowClass">
<xsl:choose>
<xsl:when test="position() mod 2">even</xsl:when>
<xsl:otherwise>odd</xsl:otherwise>
</xsl:choose>
</xsl:variable>
<tr class="{$rowClass}">
<xsl:call-template name="buildCell">
<xsl:with-param name="rowNode" select="." />
</xsl:call-template>
</tr>
</xsl:for-each>
<xsl:call-template name="padding">
<xsl:with-param name="max_count" select="$numToPad"/>
<xsl:with-param name="counter" select="'0'"/>
</xsl:call-template>
</table>
<!-- end Data Section table -->
</xsl:template>
<xsl:template name="buildCell">
<xsl:param name="rowNode"/>
<xsl:for-each select="/table/header/cell">
<xsl:variable name="colName" select="@key" />
<td><xsl:value-of select="$rowNode/*[@key=$colName]" disable-output-escaping="yes"/>&#160;</td>
</xsl:for-each>
</xsl:template>
<xsl:template name="padding">
<xsl:param name="max_count"/>
<xsl:param name="counter"/>
<xsl:if test="$counter &lt; $max_count">
<tr class="blank">
<td colspan="{$numCols + 1}">&#160;</td>
</tr>
<xsl:call-template name="padding">
<xsl:with-param name="max_count" select="$max_count"/>
<xsl:with-param name="counter" select="$counter + 1"/>
</xsl:call-template>
</xsl:if>
</xsl:template>
</xsl:stylesheet>

48
extras/httpsrv/home/xsl/basep.xsl
View File

@@ -1,24 +1,24 @@
<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output method="html" omit-xml-declaration="yes" indent="no"/>
<xsl:template match="/">
<!-- start Data Section table -->
<table cellspacing="0" cellpadding="0" class="pagetable">
<tr>
<xsl:for-each select="pages/page">
<td>
<xsl:variable name="pagenumber"><xsl:value-of select="." /></xsl:variable>
<a class="pageSection" href="javascript: getTableData({$pagenumber});"><xsl:value-of select="$pagenumber" />
</a>
</td>
</xsl:for-each>
</tr>
</table>
</xsl:template>
</xsl:stylesheet>
<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output method="html" omit-xml-declaration="yes" indent="no"/>
<xsl:template match="/">
<!-- start Data Section table -->
<table cellspacing="0" cellpadding="0" class="pagetable">
<tr>
<xsl:for-each select="pages/page">
<td>
<xsl:variable name="pagenumber"><xsl:value-of select="." /></xsl:variable>
<a class="pageSection" href="javascript: getTableData({$pagenumber});"><xsl:value-of select="$pagenumber" />
</a>
</td>
</xsl:for-each>
</tr>
</table>
</xsl:template>
</xsl:stylesheet>

3
extras/httpsrv/uhttpd.hbp
View File

@@ -6,6 +6,9 @@
-gtwvt
uhttpd.prg
_cgifunc.prg
_cookie.prg
_session.prg
hbwin.hbc
hbnf.hbc

4
extras/httpsrv/uhttpd.prg
View File

@@ -97,7 +97,7 @@ REQUEST __HB_EXTERN__
// adding GD support
REQUEST GDChart
REQUEST GDImage
REQUEST GDImageChar
REQUEST gdImageChar
#define APP_GD_SUPPORT "_GD"
#stdout "Lib GD support enabled"
#else
@@ -2871,6 +2871,8 @@ STATIC FUNCTION HB_HASHI()
RETURN h
#if defined( __HBSCRIPT__HBSHELL )
SET PROCEDURE TO "_cgifunc.prg"
SET PROCEDURE TO "_cookie.prg"
SET PROCEDURE TO "_session.prg"
#endif

1
extras/template/tests/hbmk.hbm
View File

@@ -1,3 +1,4 @@
# hbmk2 defaults for this directory
hbtpl.hbc

6
package/mpkg_win_nightly.bat
View File

@@ -7,13 +7,13 @@ rem ---------------------------------------------------------------
rem ---------------------------------------------------------------
rem REQUIREMENTS FOR BUILD MACHINE:
rem - Online 24/7 (reliable)
rem - online 24/7 (reliable)
rem - Windows XP or higher (server preferred)
rem - 8GB disk space
rem - 8GB free disk space
rem - downstream internet traffic 100MB per day
rem - upstream internet traffic 100MB per day
rem - 1-5hours CPU time per day
rem - Multicore CPU recommended
rem - multicore CPU recommended
rem - admin rights for MSVC setup
rem - admin rights for Scheduled Task setup
rem - remote admin (via RDC or VNC protocol, RDC preferred)

1
tests/fixcase.hb
View File

@@ -32,6 +32,7 @@ PROCEDURE Main( cFile )
".7z" =>, ;
".exe" =>, ;
".o" =>, ;
".obj" =>, ;
".js" =>, ;
".dif" =>, ;
".exe" =>, ;

2
utils/hbmk2/hbmk2.prg
View File

@@ -16285,6 +16285,8 @@ STATIC PROCEDURE ShowHelp( hbmk, lMore, lLong )
e"enclose in double quotes. Standard output of the command will be used " + ;
e"as the value. F.e. \"-cflag=`wx-config --cflags`\", or " + ;
e"ldflags={unix&gcc}\"`wx-config --libs`\"." ), ;
I_( "When multiple target type selection options (-hblib, -hbdyn, etc.) are specified, " + ;
"the first one will be significant, the rest will be silently ignored." ), ;
I_( "Libraries and object files built with/for CA-Cl*pper will not work with " + ;
"any supported platform/compiler." ), ;
I_( "Defaults and feature support may vary by platform/compiler." ), ;