romfast/foxbin2prg
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Debug / config

Browse Source 
Debug set via parameter will not longer be turned off via config
altered config setting
This commit is contained in:
Lutz
2023-09-01 14:32:26 +02:00
parent c0f2018727
commit bec9dcda8b
17 changed files with 241 additions and 188 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
.gitignore vendored
View File

@@ -78,5 +78,5 @@ bin2txt.*
*special, settings to create foxbin2prg binary *special, settings to create foxbin2prg binary
!/foxbin2prg_self.cfg !/foxbin2prg_self.cfg
*re-include #re-include
!foxbin2prg_keywords.* #!foxbin2prg_keywords.*

7
Create_FoxBin2Prg.cfg
View File

@@ -23,7 +23,10 @@ Language: EN && Language of shown messages and LOGs. EN=Engli
ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2= Show only for multi-file processing ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2= Show only for multi-file processing
DontShowErrors: 0 && Show message errors by default DontShowErrors: 0 && Show message errors by default
ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none
Debug: 0 && Don't Activate individual <file>.Log by default *Debug: 0 && 0=Don't Activate individual <file>.Log by default
* && 1=Activate individual <file>.Log by default
* && 2=???
* && Only valid if not controlled by parameter
*BackgroundImage: && Backgroundimage for process form. Empty for empty Background. File not found uses default. *BackgroundImage: && Backgroundimage for process form. Empty for empty Background. File not found uses default.
HomeDir: 1 && Home Directory in PJX HomeDir: 1 && Home Directory in PJX
* && 0 don't save HomeDir in PJ2 * && 0 don't save HomeDir in PJ2
@@ -31,7 +34,7 @@ HomeDir: 1 && Home Directory in PJX
*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ *~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
*-- Settings for config file via parameter only *-- Settings for config file via parameter only
*-- Settings for config file via parameter only *-- Settings for config file via parameter only
AllowInheritance: 3 && 0=Allow scanning "regular" config files (file via parameter is just additional default) InhibitInheritance: 3 && 0=Allow scanning "regular" config files (file via parameter is just additional default)
* && 1=Only read tree from root of the file given by parameter, not FoxBin2Prg default * && 1=Only read tree from root of the file given by parameter, not FoxBin2Prg default
* && 2=Only read folder and subfolder of the file given by parameter * && 2=Only read folder and subfolder of the file given by parameter
* && 3=Read no other file * && 3=Read no other file

2
Create_Foxbin2Prg.prg
View File

@@ -1,6 +1,6 @@
*Create config templates *Create config templates
DO FoxBin2Prg.prg WITH "-c","foxbin2prg.cfg.txt",FULLPATH("Create_FoxBin2Prg.cfg","") DO FoxBin2Prg.prg WITH "-c","foxbin2prg.cfg.txt",FULLPATH("Create_FoxBin2Prg.cfg","")
DO FoxBin2Prg.prg WITH "-t","foxbin2prg.dbc.txt",FULLPATH("Create_FoxBin2Prg.cfg","") DO FoxBin2Prg.prg WITH "-t","foxbin2prg.dbf.txt",FULLPATH("Create_FoxBin2Prg.cfg","")
*create binaries *create binaries
DO FOXBIN2PRG.PRG WITH JUSTPATH(FULLPATH("","")),"Bin2Prg",,,,,,,,,FULLPATH("Create_FoxBin2Prg.cfg","") DO FOXBIN2PRG.PRG WITH JUSTPATH(FULLPATH("","")),"Bin2Prg",,,,,,,,,FULLPATH("Create_FoxBin2Prg.cfg","")

4
README.md
View File

@@ -1,4 +1,4 @@
# FoxBin2Prg 1.20.02 # FoxBin2Prg 1.20.04
**Binary/Text Converting program for Microsoft Visual FoxPro** **Binary/Text Converting program for Microsoft Visual FoxPro**
## Lutz Scheffler ## Lutz Scheffler
@@ -153,4 +153,4 @@ See [issue #93](https://github.com/fdbozzo/foxbin2prg/issues/93).
## Usage ## Usage
For usage see [documentation](./docs/FoxBin2Prg.md) For usage see [documentation](./docs/FoxBin2Prg.md)
Last changed: _2023-08-31_ Last changed: _2023/09/01_

BIN
TESTS/DATOS_READONLY/fb2p_dbc.dbc
View File

Binary file not shown.

BIN
TESTS/DATOS_READONLY/fb2p_dbc.dct
View File

Binary file not shown.

6
docs/ChangeLog.md
View File

@@ -24,6 +24,10 @@ _**Note:** you can click on the version number for downloading this version from
| Rel.Date | Developer | Version | Details | | Rel.Date | Developer | Version | Details |
| - | - | - | - | | - | - | - | - |
| 2023/09/01 | LScheffler | [v1.20.04](https://github.com/lscheffler/foxbin2prg/releases/tag/v1.20.04) | Enhancement: New option "tcDebug" for get_DirSettings method. |
| | | | Enhancement: For better clearance, renamed setting AllowInheritance to InhibitInheritance. |
| | | | Enhancement: The debug option set via parameter has precedence over value from config file. |
| | | | Enhancement: For debug option set via parameter only first valid call is used |
| 2023/08/31 | LScheffler | [v1.20.03](https://github.com/lscheffler/foxbin2prg/releases/tag/v1.20.03) | **Enhancement**: New option "tcCFG_File" for get_DirSettings method. | | 2023/08/31 | LScheffler | [v1.20.03](https://github.com/lscheffler/foxbin2prg/releases/tag/v1.20.03) | **Enhancement**: New option "tcCFG_File" for get_DirSettings method. |
| 2023/08/31 | LScheffler | [v1.20.02](https://github.com/lscheffler/foxbin2prg/releases/tag/v1.20.02) | New option for parameter set config file to control the use of "regular" config files enhanced | | 2023/08/31 | LScheffler | [v1.20.02](https://github.com/lscheffler/foxbin2prg/releases/tag/v1.20.02) | New option for parameter set config file to control the use of "regular" config files enhanced |
| 2023/08/30 | LScheffler | [v1.20.01](https://github.com/lscheffler/foxbin2prg/releases/tag/v1.20.01) | **Bug Fix**: Some values of config file would not be read, if the inline comment "&&" was not in the line (LScheffler) | | 2023/08/30 | LScheffler | [v1.20.01](https://github.com/lscheffler/foxbin2prg/releases/tag/v1.20.01) | **Bug Fix**: Some values of config file would not be read, if the inline comment "&&" was not in the line (LScheffler) |
@@ -429,4 +433,4 @@ _**Note:** you can click on the version number for downloading this version from
| 2013/11/22 | FDBOZZO | [v1.0](https://github.com/fdbozzo/foxbin2prg/tree/v1.0---pública) | Initial creation of clases on prg and support of VCX/SCX/PJX files | | 2013/11/22 | FDBOZZO | [v1.0](https://github.com/fdbozzo/foxbin2prg/tree/v1.0---pública) | Initial creation of clases on prg and support of VCX/SCX/PJX files |
---- ----
Last changed: _2023/08/31_ Last changed: _2023/09/01_

6
docs/FoxBin2Prg_Internals.md
View File

@@ -110,11 +110,11 @@ These are the FoxBin2Prg.cfg configuration file settings and their meaning:
| ShowProgressbar | 0, _1_, 2 | 0=Don't show progressbar,<br/>1=Always show a progress bar,<br/>2=Only show it when processing multiple-files | | ShowProgressbar | 0, _1_, 2 | 0=Don't show progressbar,<br/>1=Always show a progress bar,<br/>2=Only show it when processing multiple-files |
| DontShowErrors | _0_, 1 | 0=show message errors in a modal messagebox. (default)<br/>1=don't show errors | | DontShowErrors | _0_, 1 | 0=show message errors in a modal messagebox. (default)<br/>1=don't show errors |
| ExtraBackupLevels | 0, _1_, n | <br/>0=No backup<br/>1=One backupfile _\_filename\_.BAK_ (default)<br/>n=n levels of backup in style _\_filename\_.n.BAK_ | | ExtraBackupLevels | 0, _1_, n | <br/>0=No backup<br/>1=One backupfile _\_filename\_.BAK_ (default)<br/>n=n levels of backup in style _\_filename\_.n.BAK_ |
| Debug | _0_, 1, 2 | 0=Off<br/>1=Normal<br/>2=Extended<br/>By default, don't generate individual \<file\>.Log with process hints.<br/>Activate with "1" to find possible error causes and for debugging,<br/>"2" is special logging | | Debug | _0_, 1, 2 | 0=Off<br/>1=Normal<br/>2=Extended<br/>By default, don't generate individual \<file\>.Log with process hints.<br/>Activate with "1" to find possible error causes and for debugging,<br/>"2" is special logging.<br/>**If cDebug is set via parameter, this is ignored.** |
| BackgroundImage | \<cFile\> | Backgroundimage for process form | | BackgroundImage | \<cFile\> | Backgroundimage for process form |
| HomeDir | 0, _1_ | 0=don't save HomeDir in PJ2,<br/>1=save HomeDir in PJ2.<br/>Setting this to 0 prevents the PJ2 file from changing just because two developers have the project in different folders | | HomeDir | 0, _1_ | 0=don't save HomeDir in PJ2,<br/>1=save HomeDir in PJ2.<br/>Setting this to 0 prevents the PJ2 file from changing just because two developers have the project in different folders |
||| |||
| AllowInheritance | _0_, 1, 2, 3 | **This settings is for config file via parameter only**<br/>Settings for config file via parameter only0=Allow scanning "regular" config files (file via parameter is just additional default)<br/>1=Only read tree from root of the file given by parameter, not FoxBin2Prg default<br/>2=Only read folder and subfolder of the file given by parameter<br/>3=Read no other file<br/>This is like<br/>0 Default \| Parameter file \| Default near FoxBin2Prg \| all other config files<br/>1 Default \| Parameter file \| Inheritance from root to parent of folder \| folder and subdirs<br/>2 Default \| Parameter file \| folder and subdirs<br/>3 Default \| Parameter file | | InhibitInheritance | _0_, 1, 2, 3 | **This settings is for config file via parameter only**<br/>Settings for config file via parameter only0=Allow scanning "regular" config files (file via parameter is just additional default)<br/>1=Only read tree from root of the file given by parameter, not FoxBin2Prg default<br/>2=Only read folder and subfolder of the file given by parameter<br/>3=Read no other file<br/>This is like<br/>0 Default \| Parameter file \| Default near FoxBin2Prg \| all other config files<br/>1 Default \| Parameter file \| Inheritance from root to parent of folder \| folder and subdirs<br/>2 Default \| Parameter file \| folder and subdirs<br/>3 Default \| Parameter file |
||| |||
| XXX_Conversion_Support | n | Defines the conversion operation per filetype | | XXX_Conversion_Support | n | Defines the conversion operation per filetype |
| | | For code:<br/> 0=No support,<br/>1=Generate _Text_ (Diff),<br/>2=Generate _Text_ and _Bin_ (Merge) | | | | For code:<br/> 0=No support,<br/>1=Generate _Text_ (Diff),<br/>2=Generate _Text_ and _Bin_ (Merge) |
@@ -742,4 +742,4 @@ For options on integrating FoxBin2Prg with SCM tools, look at this topic:
See [FoxBin2Prg and use with git](./FoxBin2Prg_git.md) See [FoxBin2Prg and use with git](./FoxBin2Prg_git.md)
---- ----
Last changed: _2023/08/31_ Last changed: _2023/09/01_

4
docs/FoxBin2Prg_Object.md
View File

@@ -62,7 +62,7 @@ Some settings will overwrite configuration. Using an object as cCFG_File will ov
| cTextName | Text filename. | Only for SCCAPI (SCCTEXT.PRG) compatibility mode. File to use. | | cTextName | Text filename. | Only for SCCAPI (SCCTEXT.PRG) compatibility mode. File to use. |
| lGenText | .T., .F. | Only for SCCAPI (SCCTEXT.PRG) compatibility mode. .T.=Generates Text, .F.=Generates Binary. <br/> **Note:** _cType_ have predominance over _lGenText_ | | lGenText | .T., .F. | Only for SCCAPI (SCCTEXT.PRG) compatibility mode. .T.=Generates Text, .F.=Generates Binary. <br/> **Note:** _cType_ have predominance over _lGenText_ |
| cDontShowErrors | _0_, 1 | '1' for NOT showing errors in MESSAGEBOX | | cDontShowErrors | _0_, 1 | '1' for NOT showing errors in MESSAGEBOX |
| cDebug | _0_, 1, 2 | '0 'no debug, '1' for generating process LOGs, stop on errors, '2' like '1' and special log. | | cDebug | _0_, 1, 2 | '0 'no debug, '1' for generating process LOGs, stop on errors, '2' like '1' and special log.<br/>This has precedence over any value in the config files. Only the first valid value will be used. |
| cDontShowProgress | 0, _1_, 2 | '0' show progress, '1' for **not** showing the process window, '2' Show only for multi-file processing | | cDontShowProgress | 0, _1_, 2 | '0' show progress, '1' for **not** showing the process window, '2' Show only for multi-file processing |
| oModule | | Internal use for Unit Testing | | oModule | | Internal use for Unit Testing |
| oEx | | Exception object, return for errorhandling | | oEx | | Exception object, return for errorhandling |
@@ -101,4 +101,4 @@ The _BIN2PRG, PRG2BIN, INTERACTIVE, SHOWMSG_ cTypes might be mixed freely like:
Return value is 0=OK, 1=Error. Return value is 0=OK, 1=Error.
---- ----
Last changed: _2023/08/26_ Last changed: _2023/09/01_

6
docs/FoxBin2Prg_Run.md
View File

@@ -87,7 +87,7 @@ just select and process each one independently, in parallel if you like, but in
| cTextName | Text filename. | Only for SCCAPI (SCCTEXT.PRG) compatibility mode. File to use. | | cTextName | Text filename. | Only for SCCAPI (SCCTEXT.PRG) compatibility mode. File to use. |
| lGenText | .T., .F. | Only for SCCAPI (SCCTEXT.PRG) compatibility mode.<br/>.T.=Generates _Text_, .F.=Generates _Binary_.<br/>**Note:** _cType_ have predominance over _lGenText_ | | lGenText | .T., .F. | Only for SCCAPI (SCCTEXT.PRG) compatibility mode.<br/>.T.=Generates _Text_, .F.=Generates _Binary_.<br/>**Note:** _cType_ have predominance over _lGenText_ |
| cDontShowErrors | _0_, 1 | '1' for NOT showing errors in MESSAGEBOX | | cDontShowErrors | _0_, 1 | '1' for NOT showing errors in MESSAGEBOX |
| cDebug | _0_, 1, 2 | '0 'no debug, '1' for generating process LOGs, stop on errors, '2' like '1' and special log. | | cDebug | _0_, 1, 2 | '0 'no debug, '1' for generating process LOGs, stop on errors, '2' like '1' and special log.<br/>This has precedence over any value in the config files. |
| cDontShowProgress | 0, _1_, 2 | '0' show progress, '1' for **not** showing the process window, '2' Show only for multi-file processing | | cDontShowProgress | 0, _1_, 2 | '0' show progress, '1' for **not** showing the process window, '2' Show only for multi-file processing |
| cOriginalFileName | text | used in those cases in which inputFile is a temporary filename and you want to generate the correct filename on the header of the _Text_ version | | cOriginalFileName | text | used in those cases in which inputFile is a temporary filename and you want to generate the correct filename on the header of the _Text_ version |
| cRecompile | 0, _1_ | Indicates recompile ('1') the _Binary_ once generated. <br/> True if called from SCCAPI (SCCTEXT.PRG) compatibility mode. | | cRecompile | 0, _1_ | Indicates recompile ('1') the _Binary_ once generated. <br/> True if called from SCCAPI (SCCTEXT.PRG) compatibility mode. |
@@ -119,7 +119,7 @@ The filename is an external variable parameter received when SendingTo FoxBin2Pr
| | If cOutputFile is empty, a file FOXBIN2PRG.\_CFG will be created in default foder. | | | If cOutputFile is empty, a file FOXBIN2PRG.\_CFG will be created in default foder. |
| -t (t) | creates a template table-config-file _cOutputFile_ ( like \_TableName\_.dbf.cfg ) | | -t (t) | creates a template table-config-file _cOutputFile_ ( like \_TableName\_.dbf.cfg ) |
| cCFG_File | Indicates a special CFG filename for default values<br/>Note, if the "regular" config files are used orn not, is controlled by the setting *AllowInheritance* in *this** file. | | cCFG_File | Indicates a special CFG filename for default values<br/>Note, if the "regular" config files are used orn not, is controlled by the setting *AllowInheritance* in *this** file. |
| cDebug | '1' for generating process LOGs, stop on errors | | cDebug | '1' for generating process LOGs, stop on errors<br/>This has precedence over any value in the config files. |
### Usage 3 ### Usage 3
`FOXBIN2PRG.EXE VERNO` `FOXBIN2PRG.EXE VERNO`
@@ -178,4 +178,4 @@ FoxBin2Prg - Text2Binary.lnk <path>\foxbin2prg.exe "PRG2BIN-SHOWMSG"
FoxBin2Prg.lnk <path>\foxbin2prg.exe "INTERACTIVE-SHOWMSG" FoxBin2Prg.lnk <path>\foxbin2prg.exe "INTERACTIVE-SHOWMSG"
``` ```
---- ----
Last changed: _2023/08/30_ Last changed: _2023/09/01_

11
foxbin2prg.cfg.txt
View File

@@ -1,13 +1,13 @@
*################################################################################################################ *################################################################################################################
*FOXBIN2PRG.CFG configuration options: (If no values given, these are the DEFAULTS) *FOXBIN2PRG.CFG configuration options: (If no values given, these are the DEFAULTS)
*Version: v1.20.03 *Version: v1.20.04
***************************************************************************************************************** *****************************************************************************************************************
* Note, configuration files will follow an inheritance. * Note, configuration files will follow an inheritance.
* 1. Default values * 1. Default values
* 2., optional FOXBIN2PRG.CFG in folder of FOXBIN2PRG.EXE * 2., optional FOXBIN2PRG.CFG in folder of FOXBIN2PRG.EXE
* or, if defined, a config file given by a parameter calling FOXBIN2PRG * or, if defined, a config file given by a parameter calling FOXBIN2PRG
* if used, the AllowInheritance setting controls if other config files will be evaluated (default). See below. * if used, the InhibitInheritance setting controls if other config files will be evaluated (default). See below.
* 3., optional FOXBIN2PRG.CFG in root of working directory * 3., optional FOXBIN2PRG.CFG in root of working directory
* 4., optional FOXBIN2PRG.CFG in every folder up to the working directory * 4., optional FOXBIN2PRG.CFG in every folder up to the working directory
* 5., optional Special settings per single DBF's Syntax: <TableName>.dbf.cfg in tables folder) * 5., optional Special settings per single DBF's Syntax: <TableName>.dbf.cfg in tables folder)
@@ -20,14 +20,17 @@
*ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2=Show only for multi-file processing *ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2=Show only for multi-file processing
*DontShowErrors: 0 && Show message errors by default *DontShowErrors: 0 && Show message errors by default
*ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none *ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none
*Debug: 0 && Don't Activate individual <file>.Log by default *Debug: 0 && 0=Don't Activate individual <file>.Log by default
* && 1=Activate individual <file>.Log by default
* && 2=???
* && Only valid if not controlled by parameter
*BackgroundImage: <cFile> && Backgroundimage for process form. Empty for empty Background. File not found uses default. *BackgroundImage: <cFile> && Backgroundimage for process form. Empty for empty Background. File not found uses default.
*HomeDir: 1 && Home directory in PJX *HomeDir: 1 && Home directory in PJX
* && 0 don't save HomeDir in PJ2 * && 0 don't save HomeDir in PJ2
* && 1 save HomeDir in PJ2 * && 1 save HomeDir in PJ2
*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ *~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
*-- Settings for config file via parameter only *-- Settings for config file via parameter only
*AllowInheritance: 0 && 0=Allow scanning "regular" config files (file via parameter is just additional default) *InhibitInheritance: 0 && 0=Allow scanning "regular" config files (file via parameter is just additional default)
* && 1=Only read tree from root of the file given by parameter, not FoxBin2Prg default * && 1=Only read tree from root of the file given by parameter, not FoxBin2Prg default
* && 2=Only read folder and subfolder of the file given by parameter * && 2=Only read folder and subfolder of the file given by parameter
* && 3=Read no other file * && 3=Read no other file

12
foxbin2prg.dbc.txt
View File

@@ -1,12 +0,0 @@
*################################################################################################################
*-- Individual DBF configuration file (syntax: filename.dbf.cfg) Defaults see FoxBin2prg.cfg
*Version: v1.20.03
*****************************************************************************************************************
*DBF_Conversion_Support: <0,1,2,4,8> && 0=No support, 1=Generate Header TXT only (Diff), 2=Generate Header TXT and BIN (Merge/Only Structure!), 4=Generate TXT with DATA (Diff), 8=Export and Import DATA (Merge/Structure & Data)
*DBF_Conversion_Order: <c_Expression> && Field expresion. ie: name+str(age,3)
*DBF_Conversion_Condition: <c_Expression> && Logical expression. ie: age > 10 AND NOT DELETED()
*DBF_IndexList: <cFile_List> && comma delimited list of additonal non structural index files, cdx or idx
*DBF_BinChar_Base64: <0,1> && For character type fields, if NoCPTrans 0=do not transform, 1=use Base64 transform
*DBF_IncludeDeleted: <0,1> && 0=Do not include deleted records, 1=Include deleted records
*

12
foxbin2prg.dbf.cfg.txt
View File

@@ -1,12 +0,0 @@
*################################################################################################################
*-- Individual DBF configuration file (syntax: filename.dbf.cfg) Defaults see FoxBin2prg.cfg
*Version: v1.19.79
*****************************************************************************************************************
*DBF_Conversion_Support: <0,1,2,4,8> && 0=No support, 1=Generate Header TXT only (Diff), 2=Generate Header TXT and BIN (Merge/Only Structure!), 4=Generate TXT with DATA (Diff), 8=Export and Import DATA (Merge/Structure & Data)
*DBF_Conversion_Order: <c_Expression> && Field expresion. ie: name+str(age,3)
*DBF_Conversion_Condition: <c_Expression> && Logical expression. ie: age > 10 AND NOT DELETED()
*DBF_IndexList: <cFile_List> && comma delimited list of additonal non structural index files, cdx or idx
*DBF_BinChar_Base64: <0,1> && For character type fields, if NoCPTrans 0=do not transform, 1=use Base64 transform
*DBF_IncludeDeleted: <0,1> && 0=Do not include deleted records, 1=Include deleted records
*

2
foxbin2prg.pj2
View File

@@ -26,7 +26,7 @@ _LegalTrademark = "MIT License"
_ProductName = "FOXBIN2PRG" _ProductName = "FOXBIN2PRG"
_MajorVer = "1" _MajorVer = "1"
_MinorVer = "20" _MinorVer = "20"
_Revision = "3" _Revision = "4"
_LanguageID = "1034" _LanguageID = "1034"
_AutoIncrement = "0" _AutoIncrement = "0"
*</DevInfo> *</DevInfo>

313
foxbin2prg.prg
View File

@@ -1,5 +1,5 @@
#DEFINE DN_FB2PRG_VERSION 1.20 #DEFINE DN_FB2PRG_VERSION 1.20
#DEFINE DC_FB2PRG_VERSION_REAL '1.20.03' #DEFINE DC_FB2PRG_VERSION_REAL '1.20.04'
*--------------------------------------------------------------------------------------------------- *---------------------------------------------------------------------------------------------------
* Module.........: FOXBIN2PRG.PRG - FOR VISUAL FOXPRO 9.0 * Module.........: FOXBIN2PRG.PRG - FOR VISUAL FOXPRO 9.0
@@ -308,11 +308,15 @@
* 20/08/2023 LScheffler v1.20.00 Bug Fix: codepage is lost on recreation, issue #96, fixes issue #95 (OLE) as well (KestasL) * 20/08/2023 LScheffler v1.20.00 Bug Fix: codepage is lost on recreation, issue #96, fixes issue #95 (OLE) as well (KestasL)
* 30/08/2023 LScheffler v1.20.01 Bug Fix: Some values of config file would not be read, if the inline comment "&&" was not in the line (LScheffler) * 30/08/2023 LScheffler v1.20.01 Bug Fix: Some values of config file would not be read, if the inline comment "&&" was not in the line (LScheffler)
* 30/08/2023 LScheffler v1.20.01 Bug Fix: config file set by parameter would be ignored, if the folder contains FoxBin2Prg.cfg (LScheffler) * 30/08/2023 LScheffler v1.20.01 Bug Fix: config file set by parameter would be ignored, if the folder contains FoxBin2Prg.cfg (LScheffler)
* 30/08/2023 LScheffler v1.20.01 Enhancement: For config file template new options to set config file and debug added * 30/08/2023 LScheffler v1.20.01 Enhancement: For run to create config file template new options to set config file and debug added
* 30/08/2023 LScheffler v1.20.01 Enhancement: New option for parameter set config file to control the use of "regular" config files * 30/08/2023 LScheffler v1.20.01 Enhancement: New option for parameter set config file to control the use of "regular" config files
* 30/08/2023 LScheffler v1.20.01 Bug Fix: Fixed problems with table config files (LScheffler) * 30/08/2023 LScheffler v1.20.01 Bug Fix: Fixed problems with table config files (LScheffler)
* 31/08/2023 LScheffler v1.20.02 Enhancement: New option for parameter set config file to control the use of "regular" config files enhanced. * 31/08/2023 LScheffler v1.20.02 Enhancement: New option for parameter set config file to control the use of "regular" config files enhanced.
* 31/08/2023 LScheffler v1.20.03 Enhancement: New option "tcCFG_File" for get_DirSettings method. * 31/08/2023 LScheffler v1.20.03 Enhancement: New option "tcCFG_File" for get_DirSettings method.
* 01/09/2023 LScheffler v1.20.04 Enhancement: New option "tcDebug" for get_DirSettings method.
* 01/09/2023 LScheffler v1.20.04 Enhancement: For better clearance, renamed setting AllowInheritance to InhibitInheritance.
* 01/09/2023 LScheffler v1.20.04 Enhancement: The debug option set via parameter has precedence over value from config file.
* 01/09/2023 LScheffler v1.20.04 Enhancement: For debug option set via parameter only first valid call is used
* </HISTORIAL DE CAMBIOS Y NOTAS IMPORTANTES> * </HISTORIAL DE CAMBIOS Y NOTAS IMPORTANTES>
* *
*--------------------------------------------------------------------------------------------------- *---------------------------------------------------------------------------------------------------
@@ -1048,9 +1052,10 @@ Define Class c_foxbin2prg As Session
*!* + [<memberdata name="c_language_in" display="c_Language_In"/>] ; *!* + [<memberdata name="c_language_in" display="c_Language_In"/>] ;
*!* + [<memberdata name="writelog_flush" display="writeLog_Flush"/>] ; *!* + [<memberdata name="writelog_flush" display="writeLog_Flush"/>] ;
*!* + [<memberdata name="n_checkfileinpath" display="n_CheckFileInPath"/>] ; *!* + [<memberdata name="n_checkfileinpath" display="n_CheckFileInPath"/>] ;
*!* + [<memberdata name="n_allowinheritance" display="n_AllowInheritance"/>] ; *!* + [<memberdata name="n_inhibitinheritance" display="n_AllowInheritance"/>] ;
*!* + [<memberdata name="l_singleconfig" display="l_SingleConfig"/>] ; *!* + [<memberdata name="l_singleconfig" display="l_SingleConfig"/>] ;
*!* + [<memberdata name="c_singleconfig_folder" display="c_SingleConfig_Folder"/>] ; *!* + [<memberdata name="c_singleconfig_folder" display="c_SingleConfig_Folder"/>] ;
*!* + [<memberdata name="n_debugp" display="n_DebugP"/>] ;
Dimension a_ProcessedFiles(1, 6) Dimension a_ProcessedFiles(1, 6)
Protected n_CFG_Actual, l_Main_CFG_Loaded, o_Configuration, l_CFG_CachedAccess Protected n_CFG_Actual, l_Main_CFG_Loaded, o_Configuration, l_CFG_CachedAccess
@@ -1085,6 +1090,7 @@ Define Class c_foxbin2prg As Session
l_CFG_CachedAccess = .F. l_CFG_CachedAccess = .F.
n_CFG_EvaluateFromParam = 0 n_CFG_EvaluateFromParam = 0
n_Debug = 0 n_Debug = 0
n_DebugP = .NULL.
n_BodyDevInfo = 0 && Indica si se debe incluir el campo DevInfo en el cuerpo de los pjx/pj2 n_BodyDevInfo = 0 && Indica si se debe incluir el campo DevInfo en el cuerpo de los pjx/pj2
l_Error = .F. && Indicador de errores del proceso actual l_Error = .F. && Indicador de errores del proceso actual
l_Errors = .F. && Indicador de error de la sesión actual, acumulativo de todos los procesos l_Errors = .F. && Indicador de error de la sesión actual, acumulativo de todos los procesos
@@ -1124,7 +1130,7 @@ Define Class c_foxbin2prg As Session
n_ExcludeDBFAutoincNextval = 0 n_ExcludeDBFAutoincNextval = 0
l_ClassPerFileCheck = .F. l_ClassPerFileCheck = .F.
*!* LScheffler 30.08.2023 *!* LScheffler 30.08.2023
n_AllowInheritance = 0 n_InhibitInheritance = 0
l_RedirectClassPerFileToMain = .F. l_RedirectClassPerFileToMain = .F.
n_RedirectClassType = 0 && 0=Redireccionar Todas las clases, 1=Redireccionar solo la clase indicada n_RedirectClassType = 0 && 0=Redireccionar Todas las clases, 1=Redireccionar solo la clase indicada
l_NoTimestamps = .T. l_NoTimestamps = .T.
@@ -1184,6 +1190,7 @@ Define Class c_foxbin2prg As Session
i_CPID = 0 &&CPCURRENT(1) i_CPID = 0 &&CPCURRENT(1)
*!* LScheffler 31.08.2023 more sophisticated control of inheritance for para file *!* LScheffler 31.08.2023 more sophisticated control of inheritance for para file
c_SingleConfig_Folder = '' c_SingleConfig_Folder = ''
o_CFG = .NULL.
Procedure Init Procedure Init
Lparameters tcCFG_File, tcCancelWithEscKey Lparameters tcCFG_File, tcCancelWithEscKey
@@ -1288,6 +1295,9 @@ Define Class c_foxbin2prg As Session
This.o_FSO = Createobject("Scripting.FileSystemObject") This.o_FSO = Createobject("Scripting.FileSystemObject")
*THIS.o_WSH = CREATEOBJECT("WScript.Shell") *THIS.o_WSH = CREATEOBJECT("WScript.Shell")
This.o_Configuration = Createobject("COLLECTION") This.o_Configuration = Createobject("COLLECTION")
This.o_CFG = Createobject('CL_CFG')
*store default
This.o_CFG.CopyFrom(This)
This.evaluateConfiguration() This.evaluateConfiguration()
Release lcSys16, lnPosProg, lc_Foxbin2prg_EXE, laValues Release lcSys16, lnPosProg, lc_Foxbin2prg_EXE, laValues
Return Return
@@ -1528,11 +1538,16 @@ Define Class c_foxbin2prg As Session
Procedure n_Debug_ACCESS Procedure n_Debug_ACCESS
IF ISNULL(This.n_DebugP) THEN
If This.n_CFG_Actual = 0 Or Isnull( This.o_Configuration( This.n_CFG_Actual ) ) If This.n_CFG_Actual = 0 Or Isnull( This.o_Configuration( This.n_CFG_Actual ) )
Return This.n_Debug Return This.n_Debug
Else Else
Return Nvl( This.o_Configuration( This.n_CFG_Actual ).n_Debug, This.n_Debug ) Return Nvl( This.o_Configuration( This.n_CFG_Actual ).n_Debug, This.n_Debug )
Endif Endif
ELSE &&ISNULL(This.n_DebugP)
Return This.n_DebugP
ENDIF &&ISNULL(This.n_DebugP)
Endproc Endproc
@@ -1706,12 +1721,12 @@ Define Class c_foxbin2prg As Session
Endproc Endproc
*!* LScheffler 30.08.2023 *!* LScheffler 30.08.2023
Procedure n_AllowInheritance_ACCESS Procedure n_InhibitInheritance_ACCESS
*only from base config (and only if this is from parameter) *only from base config (and only if this is from parameter)
If This.n_CFG_Actual = 0 Or Isnull( This.o_Configuration( 1 ) ) If This.n_CFG_Actual = 0 Or Isnull( This.o_Configuration( 1 ) )
Return This.n_AllowInheritance Return This.n_InhibitInheritance
Else Else
Return Nvl( This.o_Configuration( 1 ).n_AllowInheritance, This.n_AllowInheritance ) Return Nvl( This.o_Configuration( 1 ).n_InhibitInheritance, This.n_InhibitInheritance )
Endif Endif
Endproc Endproc
@@ -2355,7 +2370,7 @@ Define Class c_foxbin2prg As Session
* toParentCFG (@? IN ) (Uso interno) Si se pasa un valor, el nuevo CFG copiará primero sus valores de aquí para heredarlos * toParentCFG (@? IN ) (Uso interno) Si se pasa un valor, el nuevo CFG copiará primero sus valores de aquí para heredarlos
* tl_ForceLog (v? IN ) Force logging of settings. used on cfg setting as object * tl_ForceLog (v? IN ) Force logging of settings. used on cfg setting as object
* tcCFG_File (v? IN ) Config file. If a config file is set, the normal chain of inheritance is reset and this file is read atop of the defaults * tcCFG_File (v? IN ) Config file. If a config file is set, the normal chain of inheritance is reset and this file is read atop of the defaults
* Normal inheritance may or may not run, see setting AllowInheritance * Normal inheritance may or may not run, see setting InhibitInheritance
*-------------------------------------------------------------------------------------------------------------- *--------------------------------------------------------------------------------------------------------------
Lparameters tcDontShowProgress, tcDontShowErrors, tcNoTimestamps, tcDebug, tcRecompile, tcExtraBackupLevels ; Lparameters tcDontShowProgress, tcDontShowErrors, tcNoTimestamps, tcDebug, tcRecompile, tcExtraBackupLevels ;
, tcClearUniqueID, tcOptimizeByFilestamp, tc_InputFile, tcInputFile_Type, toParentCFG, tl_ForceLog, tcCFG_File , tcClearUniqueID, tcOptimizeByFilestamp, tc_InputFile, tcInputFile_Type, toParentCFG, tl_ForceLog, tcCFG_File
@@ -2371,20 +2386,38 @@ Define Class c_foxbin2prg As Session
, lo_Configuration As Collection ; , lo_Configuration As Collection ;
, loLang As CL_LANG Of 'FOXBIN2PRG.PRG' ; , loLang As CL_LANG Of 'FOXBIN2PRG.PRG' ;
, loEx As Exception, llSetSingleConfig, lc_Foxbin2prg_ConfigFile, lc_InputPath , loEx As Exception, llSetSingleConfig, lc_Foxbin2prg_ConfigFile, lc_InputPath
Try Try
With This As c_foxbin2prg Of 'FOXBIN2PRG.PRG' With This As c_foxbin2prg Of 'FOXBIN2PRG.PRG'
If Inlist( Transform(tcDebug), '0', '1', '2' ) Then
.writeLog( C_TAB + ' > Parameter tcDebug: ' + tcDebug +;
IIF(ISNULL(This.n_DebugP), "", ", will be ignored, second use of parameter. Using: " + TRANSFORM(This.n_DebugP) )+CR_LF )
IF ISNULL(This.n_DebugP) THEN
This.n_Debug = Int(Val(tcDebug))
This.n_DebugP = This.n_Debug
ENDIF &&ISNULL(This.n_DebugP)
Endif
Store 0 To lnKey Store 0 To lnKey
llSetSingleConfig = .Null. llSetSingleConfig = .Null.
loLang = _Screen.o_FoxBin2Prg_Lang loLang = _Screen.o_FoxBin2Prg_Lang
tcRecompile = Evl(tcRecompile, .c_Recompile) tcRecompile = Evl(tcRecompile, .c_Recompile)
lo_Configuration = .o_Configuration
*!* LScheffler 30.08.2023, is a config file given by programm parameter *!* LScheffler 30.08.2023, is a config file given by programm parameter
IF VARTYPE(tcCFG_File)='C' AND !EMPTY(tcCFG_File) THEN IF VARTYPE(tcCFG_File)='C' AND !EMPTY(tcCFG_File) THEN
IF EMPTY(lo_Configuration.GetKey(tcCFG_File)) THEN
This.writeLog( '> ' + loLang.C_USING_THIS_SETTINGS_LOC6+tcCFG_File )
.l_Main_CFG_Loaded = .F.
*restore default
.o_CFG.CopyFrom(.o_CFG,This)
lc_Foxbin2prg_ConfigFile = .c_Foxbin2prg_ConfigFile lc_Foxbin2prg_ConfigFile = .c_Foxbin2prg_ConfigFile
.c_Foxbin2prg_ConfigFile = tcCFG_File .c_Foxbin2prg_ConfigFile = tcCFG_File
.l_Main_CFG_Loaded = .F.
.o_Configuration.Remove(-1) .o_Configuration.Remove(-1)
.n_CFG_EvaluateFromParam = 0 .n_CFG_EvaluateFromParam = 0
.l_SingleConfig = .F. .l_SingleConfig = .F.
@@ -2393,13 +2426,20 @@ Define Class c_foxbin2prg As Session
.writeLog( '> ' + Upper(loLang.C_USING_THIS_SETTINGS_LOC) + ': ' + .c_Foxbin2prg_ConfigFile + ; .writeLog( '> ' + Upper(loLang.C_USING_THIS_SETTINGS_LOC) + ': ' + .c_Foxbin2prg_ConfigFile + ;
loLang.C_USING_THIS_SETTINGS_LOC1 ) loLang.C_USING_THIS_SETTINGS_LOC1 )
Else &&EMPTY(lo_Configuration.GetKey(tcCFG_File))
This.writeLog( '> ' + loLang.C_USING_THIS_SETTINGS_LOC6+tcCFG_File + loLang.C_USING_THIS_SETTINGS_LOC7+;
ICASE(This.n_InhibitInheritance=0, loLang.C_USING_THIS_SETTINGS_LOC2,;
This.n_InhibitInheritance=1, loLang.C_USING_THIS_SETTINGS_LOC3,;
This.n_InhibitInheritance=2, loLang.C_USING_THIS_SETTINGS_LOC4,;
This.n_InhibitInheritance=3, loLang.C_USING_THIS_SETTINGS_LOC5," Failure."+CR_LF))
ENDIF &&EMPTY(lo_Configuration.GetKey(tcCFG_File))
ENDIF &&VARTYPE(tcCFG_File)='C' AND !EMPTY(tcCFG_File) ENDIF &&VARTYPE(tcCFG_File)='C' AND !EMPTY(tcCFG_File)
lcConfigFile = .c_Foxbin2prg_ConfigFile lcConfigFile = .c_Foxbin2prg_ConfigFile
tc_InputFile = Evl(tc_InputFile, .c_InputFile) tc_InputFile = Evl(tc_InputFile, .c_InputFile)
tcInputFile_Type = Evl(tcInputFile_Type,'') tcInputFile_Type = Evl(tcInputFile_Type,'')
lo_Configuration = .o_Configuration
If Vartype(lcConfigFile) = "O" If Vartype(lcConfigFile) = "O"
loCFG_Manual = lcConfigFile && lcConfigFile is an object CFG generated by get_DirSettings() loCFG_Manual = lcConfigFile && lcConfigFile is an object CFG generated by get_DirSettings()
@@ -2460,18 +2500,18 @@ Define Class c_foxbin2prg As Session
DO CASE DO CASE
CASE !.l_SingleConfig CASE !.l_SingleConfig
*just go ahead *just go ahead
CASE .n_AllowInheritance=0 CASE .n_InhibitInheritance=0
*read all *read all
CASE Empty(lc_InputPath) CASE Empty(lc_InputPath)
*whatever, just go ahead *whatever, just go ahead
CASE .n_AllowInheritance=3 CASE .n_InhibitInheritance=3
*read nothing *read nothing
Exit Exit
*!* CASE INLIST(.n_AllowInheritance,1,2) *!* CASE INLIST(.n_InhibitInheritance,1,2)
*!* *not a config file in FoxBinPrg's own folder *!* *not a config file in FoxBinPrg's own folder
CASE INLIST(.n_AllowInheritance,1,2) AND lc_InputPath=.c_SingleConfig_Folder CASE INLIST(.n_InhibitInheritance,1,2) AND lc_InputPath=.c_SingleConfig_Folder
*just in the directory or subdirectory of the config file set by the parameter *just in the directory or subdirectory of the config file set by the parameter
CASE .n_AllowInheritance=1 AND .c_SingleConfig_Folder=lc_InputPath CASE .n_InhibitInheritance=1 AND .c_SingleConfig_Folder=lc_InputPath
*just above the config file set by the parameter *just above the config file set by the parameter
Otherwise Otherwise
Exit Exit
@@ -2601,7 +2641,6 @@ Define Class c_foxbin2prg As Session
lo_Configuration.Add( lo_CFG, lcConfigFile ) lo_Configuration.Add( lo_CFG, lcConfigFile )
.n_CFG_Actual = lo_Configuration.Count .n_CFG_Actual = lo_Configuration.Count
ASSERT lo_Configuration.Count<6
.writeLog( '> ' + Upper(loLang.C_CACHING_CONFIG_FOR_DIRECTORY_LOC) + ': ' + lcConfigFile + ; .writeLog( '> ' + Upper(loLang.C_CACHING_CONFIG_FOR_DIRECTORY_LOC) + ': ' + lcConfigFile + ;
' CFG_Actual:' + Transform(.n_CFG_Actual) + Icase(.n_CFG_Actual=1, ' [MASTER]', ' [SECONDARY]') ) ' CFG_Actual:' + Transform(.n_CFG_Actual) + Icase(.n_CFG_Actual=1, ' [MASTER]', ' [SECONDARY]') )
@@ -2694,8 +2733,11 @@ ASSERT lo_Configuration.Count<6
Case Left( laConfig(m.I), 6 ) == Lower('Debug:') Case Left( laConfig(m.I), 6 ) == Lower('Debug:')
lcValue = Alltrim( Substr( laConfig(m.I), 7 ) ) lcValue = Alltrim( Substr( laConfig(m.I), 7 ) )
If Not Inlist( Transform(tcDebug), '0', '1' ) And Inlist( lcValue, '0', '1' ) Then If Not Inlist( Transform(tcDebug), '0', '1' ) And Inlist( lcValue, '0', '1' ) Then
tcDebug = lcValue IF ISNULL(This.n_DebugP) THEN
.writeLog( C_TAB + Justfname(lcConfigFile) + ' > tcDebug: ' + Transform(tcDebug) ) lo_CFG.n_Debug = Int(Val(lcValue))
ENDIF &&ISNULL(This.n_DebugP)
.writeLog( C_TAB + Justfname(lcConfigFile) + ' > Debug: ' + lcValue +;
IIF(ISNULL(This.n_DebugP), "", ", will be ignored, debug set via parameter. Using: " + TRANSFORM(This.n_DebugP) ) )
Endif Endif
*** DH 2021-03-04: handle n_HomeDir configuration setting *** DH 2021-03-04: handle n_HomeDir configuration setting
@@ -2821,14 +2863,14 @@ ASSERT lo_Configuration.Count<6
Endif Endif
*!* LScheffler 30.08.2023 *!* LScheffler 30.08.2023
Case Left( laConfig(m.I), 17 ) == Lower('AllowInheritance:') Case Left( laConfig(m.I), 19 ) == Lower('InhibitInheritance:')
lcValue = Alltrim( Substr( laConfig(m.I), 18 ) ) lcValue = Alltrim( Substr( laConfig(m.I), 20 ) )
If Inlist( lcValue, '0', '1' , '2' , '3' ) Then If Inlist( lcValue, '0', '1' , '2' , '3' ) Then
IF llSetSingleConfig THEN IF llSetSingleConfig THEN
lo_CFG.n_AllowInheritance = Int( Val( lcValue ) ) lo_CFG.n_InhibitInheritance = Int( Val( lcValue ) )
ENDIF &&llSetSingleConfig ENDIF &&llSetSingleConfig
.writeLog( C_TAB + Justfname(lcConfigFile) + ' > AllowInheritance: ' + Transform(lcValue) +; .writeLog( C_TAB + Justfname(lcConfigFile) + ' > InhibitInheritance: ' + Transform(lcValue) +;
IIF(m.llSetSingleConfig, "", ", will be ignored, standard configuration file." ) ) IIF(m.llSetSingleConfig, "", ", will be ignored, standard configuration file." ) )
Endif Endif
@@ -3021,16 +3063,17 @@ ASSERT lo_Configuration.Count<6
If Inlist( Transform(tcNoTimestamps), '0', '1' ) Then If Inlist( Transform(tcNoTimestamps), '0', '1' ) Then
lo_CFG.l_NoTimestamps = Not (Transform(tcNoTimestamps) == '0') lo_CFG.l_NoTimestamps = Not (Transform(tcNoTimestamps) == '0')
Endif Endif
If Inlist( Transform(tcClearUniqueID), '0', '1' ) Then If Inlist( Transform(tcClearUniqueID), '0', '1' ) Then
lo_CFG.l_ClearUniqueID = Not (Transform(tcClearUniqueID) == '0') lo_CFG.l_ClearUniqueID = Not (Transform(tcClearUniqueID) == '0')
Endif Endif
If Inlist( Transform(tcDebug), '0', '1', '2' ) Then
lo_CFG.n_Debug = Int(Val(tcDebug))
Endif
tcExtraBackupLevels = Evl( tcExtraBackupLevels, Transform( .n_ExtraBackupLevels ) ) tcExtraBackupLevels = Evl( tcExtraBackupLevels, Transform( .n_ExtraBackupLevels ) )
If Isdigit(tcExtraBackupLevels) If Isdigit(tcExtraBackupLevels)
lo_CFG.n_ExtraBackupLevels = Int( Val( Transform(tcExtraBackupLevels) ) ) lo_CFG.n_ExtraBackupLevels = Int( Val( Transform(tcExtraBackupLevels) ) )
Endif Endif
If Inlist( Transform(tcOptimizeByFilestamp), '0', '1', '2' ) Then If Inlist( Transform(tcOptimizeByFilestamp), '0', '1', '2' ) Then
lo_CFG.n_OptimizeByFilestamp = Int(Val(tcOptimizeByFilestamp)) lo_CFG.n_OptimizeByFilestamp = Int(Val(tcOptimizeByFilestamp))
Endif Endif
@@ -3176,26 +3219,22 @@ ASSERT lo_Configuration.Count<6
This.c_SingleConfig_Folder = UPPER(JUSTPATH(tcCFG_File)) This.c_SingleConfig_Folder = UPPER(JUSTPATH(tcCFG_File))
This.c_Foxbin2prg_ConfigFile = lc_Foxbin2prg_ConfigFile This.c_Foxbin2prg_ConfigFile = lc_Foxbin2prg_ConfigFile
DO CASE DO CASE
CASE This.n_AllowInheritance=0 CASE This.n_InhibitInheritance=0
This.writeLog( '> ' + IIF(This.n_AllowInheritance<3, loLang.C_USING_THIS_SETTINGS_LOC2, loLang.C_USING_THIS_SETTINGS_LOC3 )) This.writeLog( '> ' + loLang.C_USING_THIS_SETTINGS_LOC2 )
CASE This.n_AllowInheritance=1 CASE This.n_InhibitInheritance=1
This.writeLog( '> ' + IIF(This.n_AllowInheritance<3, loLang.C_USING_THIS_SETTINGS_LOC2, loLang.C_USING_THIS_SETTINGS_LOC3 )) This.writeLog( '> ' + loLang.C_USING_THIS_SETTINGS_LOC3 )
CASE This.n_AllowInheritance=2 CASE This.n_InhibitInheritance=2
This.writeLog( '> ' + IIF(This.n_AllowInheritance<3, loLang.C_USING_THIS_SETTINGS_LOC2, loLang.C_USING_THIS_SETTINGS_LOC3 )) This.writeLog( '> ' + loLang.C_USING_THIS_SETTINGS_LOC4 )
CASE This.n_AllowInheritance=3 CASE This.n_InhibitInheritance=3
This.writeLog( '> ' + IIF(This.n_AllowInheritance<3, loLang.C_USING_THIS_SETTINGS_LOC2, loLang.C_USING_THIS_SETTINGS_LOC3 )) This.writeLog( '> ' + loLang.C_USING_THIS_SETTINGS_LOC5 )
OTHERWISE
ENDCASE ENDCASE
This.writeLog( '> ' + IIF(This.n_AllowInheritance<3, loLang.C_USING_THIS_SETTINGS_LOC2, loLang.C_USING_THIS_SETTINGS_LOC3 ))
IF This.n_AllowInheritance=0 THEN IF This.n_InhibitInheritance=0 THEN
This.evaluateConfiguration( '', '', '', '', '', '', '', '', This.c_Foxbin2prg_ConfigFile, C_FILETYPE_FILE, @toParentCFG) This.evaluateConfiguration( '', '', '', '', '', '', '', '', This.c_Foxbin2prg_ConfigFile, C_FILETYPE_FILE, lo_CFG)
*In case we run FoxBin2Prg against FoxBin2Prg folder. do not reread *In case we run FoxBin2Prg against FoxBin2Prg folder. do not reread
This.n_AllowInheritance = 1 This.n_InhibitInheritance = 1
ENDIF &&This.n_AllowInheritance=0 ENDIF &&This.n_InhibitInheritance=0
ENDIF &&llSetSingleConfig ENDIF &&llSetSingleConfig
Store .Null. To lo_Configuration, lo_CFG, loEx Store .Null. To lo_Configuration, lo_CFG, loEx
@@ -3651,7 +3690,7 @@ ASSERT lo_Configuration.Count<6
* tcClearUniqueID (v? IN ) Indica si se debe limpiar el UniqueID ('1') o no ('0' ó vacío) * tcClearUniqueID (v? IN ) Indica si se debe limpiar el UniqueID ('1') o no ('0' ó vacío)
* tcOptimizeByFilestamp (v? IN ) Indica si se debe optimizar por filestamp mayor o igual ('1'), solo igual ('2') o no optimizar ('0' ó vacío) * tcOptimizeByFilestamp (v? IN ) Indica si se debe optimizar por filestamp mayor o igual ('1'), solo igual ('2') o no optimizar ('0' ó vacío)
* tcCFG_File (v? IN ) Config file. If a config file is set, the normal chain of inheritance is reset and this file is read atop of the defaults * tcCFG_File (v? IN ) Config file. If a config file is set, the normal chain of inheritance is reset and this file is read atop of the defaults
* Normal inheritance may or may not run, see setting AllowInheritance * Normal inheritance may or may not run, see setting InhibitInheritance
*-------------------------------------------------------------------------------------------------------------- *--------------------------------------------------------------------------------------------------------------
Lparameters tc_InputFile, tcType, tcTextName, tlGenText, tcDontShowErrors, tcDebug, tcDontShowProgress ; Lparameters tc_InputFile, tcType, tcTextName, tlGenText, tcDontShowErrors, tcDebug, tcDontShowProgress ;
, toModulo, toEx As Exception, tlRelanzarError, tcOriginalFileName, tcRecompile, tcNoTimestamps ; , toModulo, toEx As Exception, tlRelanzarError, tcOriginalFileName, tcRecompile, tcNoTimestamps ;
@@ -3908,13 +3947,13 @@ ASSERT lo_Configuration.Count<6
* added option to create config files * added option to create config files
Case ( m.lcType=='-t' Or m.lcType=='t' ) And ( Vartype( m.tc_InputFile )='C' And !Empty( m.tc_InputFile ) ) Case ( m.lcType=='-t' Or m.lcType=='t' ) And ( Vartype( m.tc_InputFile )='C' And !Empty( m.tc_InputFile ) )
loLang = _Screen.o_FoxBin2Prg_Lang loLang = _Screen.o_FoxBin2Prg_Lang
Strtofile( Strtran( Strtran( '*' + m.loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_tab_cfg, 0h0D0A, 0h0D0A + '*'), 0h0D0A + '*' + 0h0D0A, 0h0D0A0D0A), m.tc_InputFile ) Strtofile( Strtran( Strtran( '*' + m.loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_tab_cfg, CR_LF, CR_LF + '*'), CR_LF + '*' + CR_LF, CR_LF+CR_LF), m.tc_InputFile )
.writeLog_Flush() .writeLog_Flush()
Case ( m.lcType=='-c' Or m.lcType=='c' ) Case ( m.lcType=='-c' Or m.lcType=='c' )
tc_InputFile = Iif( Vartype( m.tc_InputFile )='C' And !Empty( m.tc_InputFile ), m.tc_InputFile, 'FoxBin2Prg._cfg' ) tc_InputFile = Iif( Vartype( m.tc_InputFile )='C' And !Empty( m.tc_InputFile ), m.tc_InputFile, 'FoxBin2Prg._cfg' )
loLang = _Screen.o_FoxBin2Prg_Lang loLang = _Screen.o_FoxBin2Prg_Lang
Strtofile( Strtran( '*' + Strtran( m.loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_cfg, 0h0D0A, 0h0D0A + '*'), 0h0D0A + '*' + 0h0D0A, 0h0D0A0D0A), m.tc_InputFile ) Strtofile( Strtran( '*' + Strtran( m.loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_cfg, CR_LF, CR_LF + '*'), CR_LF + '*' + CR_LF, CR_LF+CR_LF), m.tc_InputFile )
.writeLog_Flush() .writeLog_Flush()
*!* /Changed by: LScheffler 15.2.2021 *!* /Changed by: LScheffler 15.2.2021
@@ -3939,7 +3978,7 @@ ASSERT lo_Configuration.Count<6
tc_InputFile = Iif( Vartype( m.tc_InputFile )='C' And !Empty( m.tc_InputFile ), m.tc_InputFile, 'FoxBin2Prg._cfg' ) tc_InputFile = Iif( Vartype( m.tc_InputFile )='C' And !Empty( m.tc_InputFile ), m.tc_InputFile, 'FoxBin2Prg._cfg' )
loLang = _Screen.o_FoxBin2Prg_Lang loLang = _Screen.o_FoxBin2Prg_Lang
lcText = Strtran( '*' + Strtran( m.loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_cfg, 0h0D0A, 0h0D0A + '*'), 0h0D0A + '*' + 0h0D0A, 0h0D0A0D0A) lcText = Strtran( '*' + Strtran( m.loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_cfg, CR_LF, CR_LF + '*'), CR_LF + '*' + CR_LF, CR_LF+CR_LF)
lnLines = Alines(laLines,m.lcText) lnLines = Alines(laLines,m.lcText)
*now for each option *now for each option
@@ -4090,8 +4129,8 @@ ASSERT lo_Configuration.Count<6
laOptions(49,1) = "*BackgroundImage:" && Background image laOptions(49,1) = "*BackgroundImage:" && Background image
laOptions(49,2) = ".c_BackgroundImage" laOptions(49,2) = ".c_BackgroundImage"
laOptions(49,3) = 7 laOptions(49,3) = 7
laOptions(50,1) = "*AllowInheritance:" && Inheritance out of config via parameter laOptions(50,1) = "*InhibitInheritance:" && Inheritance out of config via parameter
laOptions(50,2) = ".n_AllowInheritance" laOptions(50,2) = ".n_InhibitInheritance"
laOptions(50,3) = 4 laOptions(50,3) = 4
For lnOption = 1 To m.lnOptions For lnOption = 1 To m.lnOptions
@@ -4170,7 +4209,7 @@ ASSERT lo_Configuration.Count<6
Ains(m.laLines,4) Ains(m.laLines,4)
laLines( 4 ) = Textmerge( m.loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_Header4 ) laLines( 4 ) = Textmerge( m.loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_Header4 )
For lnLine = 1 To m.lnLines For lnLine = 1 To m.lnLines
lcText = m.lcText+ m.laLines( m.lnLine )+0h0D0A lcText = m.lcText+ m.laLines( m.lnLine )+CR_LF
Endfor &&lnLine Endfor &&lnLine
Strtofile( m.lcText, m.tc_InputFile ) Strtofile( m.lcText, m.tc_InputFile )
@@ -5461,14 +5500,15 @@ ASSERT lo_Configuration.Count<6
*--------------------------------------------------------------------------------------------------- *---------------------------------------------------------------------------------------------------
* PARÁMETROS: (v=Pasar por valor | @=Pasar por referencia) (!=Obligatorio | ?=Opcional) (IN/OUT) * PARÁMETROS: (v=Pasar por valor | @=Pasar por referencia) (!=Obligatorio | ?=Opcional) (IN/OUT)
* tcDir (@? IN ) Directorio del que devolver su configuración * tcDir (@? IN ) Directorio del que devolver su configuración
* tcDebug (v? IN ) '1' write debug log (posiibly to GETENV("TEMP") )
* tcCFG_File (v? IN ) Config file. If a config file is set, the normal chain of inheritance is reset and this file is read atop of the defaults * tcCFG_File (v? IN ) Config file. If a config file is set, the normal chain of inheritance is reset and this file is read atop of the defaults
* Normal inheritance may or may not run, see setting AllowInheritance * Normal inheritance may or may not run, see setting InhibitInheritance
* RETORNO (@? OUT) Objeto CFG * RETORNO (@? OUT) Objeto CFG
*--------------------------------------------------------------------------------------------------- *---------------------------------------------------------------------------------------------------
Lparameters tcDir, tcCFG_File Lparameters tcDir, tcDebug, tcCFG_File
If Not Empty(tcDir) If Not Empty(tcDir)
This.evaluateConfiguration( '', '', '', '', '', '', '', '', tcDir, 'D', , , tcCFG_File ) This.evaluateConfiguration( '', '', '', tcDebug, '', '', '', '', tcDir, 'D', , , tcCFG_File )
Endif Endif
If This.n_CFG_Actual = 0 Then If This.n_CFG_Actual = 0 Then
@@ -7275,8 +7315,8 @@ Define Class frm_main As Form
Thisform.Caption = 'FoxBin2Prg ' + _Screen.c_FB2PRG_EXE_Version + ' - ' + loLang.C_FOXBIN2PRG_SYNTAX_INFO_LOC Thisform.Caption = 'FoxBin2Prg ' + _Screen.c_FB2PRG_EXE_Version + ' - ' + loLang.C_FOXBIN2PRG_SYNTAX_INFO_LOC
Endif Endif
Thisform.edt_help.Value = loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC+0h0D0A+; Thisform.edt_help.Value = loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC+CR_LF+;
STRTRAN(loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_cfg,'&'+'&','')+0h0D0A+; STRTRAN(loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_cfg,'&'+'&','')+CR_LF+;
STRTRAN(loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_tab_cfg,'&'+'&','') STRTRAN(loLang.C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC_tab_cfg,'&'+'&','')
Endif Endif
@@ -12107,7 +12147,7 @@ Define Class c_conversor_prg_a_vcx As c_conversor_prg_a_bin
If Found() Then If Found() Then
Error loLang.C_ClassTwice_Header_LOC + ; Error loLang.C_ClassTwice_Header_LOC + ;
loLang.C_ClassTwice_Lib_LOC + Justfname( Dbf() ) + ; loLang.C_ClassTwice_Lib_LOC + Justfname( Dbf() ) + ;
loLang.C_ClassTwice_Class_LOC + loClase._ObjName+0h0D0A loLang.C_ClassTwice_Class_LOC + loClase._ObjName+CR_LF
Endif &&FOUND() Endif &&FOUND()
*!* /Changed by LScheffler 07.12.2021 *!* /Changed by LScheffler 07.12.2021
@@ -14377,7 +14417,7 @@ Define Class c_conversor_prg_a_dbf As c_conversor_prg_a_bin
&lcIndex. &lcIndex.
Endfor Endfor
toFoxBin2Prg.writeLog( Replicate('+', 100) + 0h0D0A ) toFoxBin2Prg.writeLog( Replicate('+', 100) + CR_LF )
Endif &&toTable._Indexes.COUNT # 0 Endif &&toTable._Indexes.COUNT # 0
@@ -26704,7 +26744,7 @@ Define Class CL_DBF_INDEXES As CL_COL_BASE
ENDTEXT ENDTEXT
Endif &&!EMPTY(m.lcText) Endif &&!EMPTY(m.lcText)
toFoxBin2Prg.writeLog( Replicate('+', 100)+0h0D0A ) toFoxBin2Prg.writeLog( Replicate('+', 100)+CR_LF )
* /LScheffler * /LScheffler
Catch To loEx Catch To loEx
@@ -27405,7 +27445,7 @@ Define Class CL_DBF_RECORD As CL_CUS_BASE
*!* TEXT .. ENDTEXT removes trailing spaces from lines inserted with TEXXTMERGE *!* TEXT .. ENDTEXT removes trailing spaces from lines inserted with TEXXTMERGE
*!* Char etc are processed special *!* Char etc are processed special
If Vartype(luValue) = 'C' If Vartype(luValue) = 'C'
lcText = lcText + 0h0D0A + ' <' + lcField + '>' + luValue + '</' + lcField + '>' lcText = lcText + CR_LF + ' <' + lcField + '>' + luValue + '</' + lcField + '>'
Else Else
TEXT TO lcText TEXTMERGE NOSHOW flags 1+2 PRETEXT 1+2 additive TEXT TO lcText TEXTMERGE NOSHOW flags 1+2 PRETEXT 1+2 additive
<<>> <<'<' + lcField + '>'>><<luValue>><<'</' + lcField + '>'>> <<>> <<'<' + lcField + '>'>><<luValue>><<'</' + lcField + '>'>>
@@ -30919,7 +30959,7 @@ Define Class CL_CFG As Custom
*!* /Changed by: LScheffler 21.02.2021 *!* /Changed by: LScheffler 21.02.2021
l_ClassPerFileCheck = .Null. l_ClassPerFileCheck = .Null.
*!* LScheffler 30.08.2023 *!* LScheffler 30.08.2023
n_AllowInheritance = .Null. n_InhibitInheritance = .Null.
n_ExtraBackupLevels = .Null. n_ExtraBackupLevels = .Null.
c_VC2 = .Null. c_VC2 = .Null.
c_SC2 = .Null. c_SC2 = .Null.
@@ -30950,9 +30990,14 @@ Define Class CL_CFG As Custom
Procedure CopyFrom Procedure CopyFrom
*-- Copia las propiedades del CFG indicado *-- Copia las propiedades del CFG indicado
Lparameters toParentCFG Lparameters toParentCFG,toSourceCFG
With This As CL_CFG Of 'FOXBIN2PRG.PRG' IF PCOUNT()=1 THEN
toSourceCFG = This
ENDIF &&PCOUNT()=1
* With This As CL_CFG Of 'FOXBIN2PRG.PRG'
With toSourceCFG As CL_CFG Of 'FOXBIN2PRG.PRG'
.c_Foxbin2prg_FullPath = toParentCFG.c_Foxbin2prg_FullPath .c_Foxbin2prg_FullPath = toParentCFG.c_Foxbin2prg_FullPath
.c_Foxbin2prg_ConfigFile = toParentCFG.c_Foxbin2prg_ConfigFile .c_Foxbin2prg_ConfigFile = toParentCFG.c_Foxbin2prg_ConfigFile
.c_CurDir = toParentCFG.c_CurDir .c_CurDir = toParentCFG.c_CurDir
@@ -30986,7 +31031,7 @@ Define Class CL_CFG As Custom
*!* /Changed by: LScheffler 21.02.2021 *!* /Changed by: LScheffler 21.02.2021
.l_ClassPerFileCheck = toParentCFG.l_ClassPerFileCheck .l_ClassPerFileCheck = toParentCFG.l_ClassPerFileCheck
*!* LScheffler 30.08.2023 *!* LScheffler 30.08.2023
.n_AllowInheritance = toParentCFG.n_AllowInheritance .n_InhibitInheritance = toParentCFG.n_InhibitInheritance
.n_ExtraBackupLevels = toParentCFG.n_ExtraBackupLevels .n_ExtraBackupLevels = toParentCFG.n_ExtraBackupLevels
.c_VC2 = toParentCFG.c_VC2 .c_VC2 = toParentCFG.c_VC2
.c_SC2 = toParentCFG.c_SC2 .c_SC2 = toParentCFG.c_SC2
@@ -31125,6 +31170,8 @@ Define Class CL_LANG As Custom
C_USING_THIS_SETTINGS_LOC3 = "" C_USING_THIS_SETTINGS_LOC3 = ""
C_USING_THIS_SETTINGS_LOC4 = "" C_USING_THIS_SETTINGS_LOC4 = ""
C_USING_THIS_SETTINGS_LOC5 = "" C_USING_THIS_SETTINGS_LOC5 = ""
C_USING_THIS_SETTINGS_LOC6 = ""
C_USING_THIS_SETTINGS_LOC7 = ""
C_WARNING_LOC = "" C_WARNING_LOC = ""
C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = "" C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = ""
C_WITH_ERRORS_LOC = "" C_WITH_ERRORS_LOC = ""
@@ -31206,9 +31253,9 @@ Define Class CL_LANG As Custom
.C_FILENAME_LOC = "Fichier" .C_FILENAME_LOC = "Fichier"
.C_FOXBIN2PRG_ERROR_CAPTION_LOC = "ERREUR" .C_FOXBIN2PRG_ERROR_CAPTION_LOC = "ERREUR"
.C_FOXBIN2PRG_SYNTAX_INFO_LOC = "SYNTAX AND PARAMETERS INFO" .C_FOXBIN2PRG_SYNTAX_INFO_LOC = "SYNTAX AND PARAMETERS INFO"
.C_ClassTwice_Header_LOC = 0h0D0A+"Class defined twice."+0h0D0A .C_ClassTwice_Header_LOC = CR_LF+"Class defined twice."+0h0D0A
.C_ClassTwice_Lib_LOC = 0h0D0A+"Library: " .C_ClassTwice_Lib_LOC = CR_LF+"Library: "
.C_ClassTwice_Class_LOC = 0h0D0A+"Class: " .C_ClassTwice_Class_LOC = CR_LF+"Class: "
TEXT TO .C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2 TEXT TO .C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2
<<>>################################################################################################################ <<>>################################################################################################################
<<>>FoxBin2Prg Home Page and download: https://github.com/fdbozzo/foxbin2prg/wiki - Fernando D. Bozzo (2013.11.25) <<>>FoxBin2Prg Home Page and download: https://github.com/fdbozzo/foxbin2prg/wiki - Fernando D. Bozzo (2013.11.25)
@@ -31272,7 +31319,7 @@ Define Class CL_LANG As Custom
<<>> 1. Default values <<>> 1. Default values
<<>> 2., optional FOXBIN2PRG.CFG in folder of FOXBIN2PRG.EXE <<>> 2., optional FOXBIN2PRG.CFG in folder of FOXBIN2PRG.EXE
<<>> or, if defined, a config file given by a parameter calling FOXBIN2PRG <<>> or, if defined, a config file given by a parameter calling FOXBIN2PRG
<<>> if used, the AllowInheritance setting controls if other config files will be evaluated (default) <<>> if used, the InhibitInheritance setting controls if other config files will be evaluated (default)
<<>> 3., optional FOXBIN2PRG.CFG in root of working directory <<>> 3., optional FOXBIN2PRG.CFG in root of working directory
<<>> 4., optional FOXBIN2PRG.CFG in every folder up to the working directory <<>> 4., optional FOXBIN2PRG.CFG in every folder up to the working directory
<<>> 5., optional Special settings per single DBF's Syntax: <TableName>.dbf.cfg in tables folder) <<>> 5., optional Special settings per single DBF's Syntax: <TableName>.dbf.cfg in tables folder)
@@ -31285,14 +31332,17 @@ Define Class CL_LANG As Custom
<<>>ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2=Show only for multi-file processing <<>>ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2=Show only for multi-file processing
<<>>DontShowErrors: 0 && Show message errors by default <<>>DontShowErrors: 0 && Show message errors by default
<<>>ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none <<>>ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none
<<>>Debug: 0 && Don't Activate individual <file>.Log by default <<>>Debug: 0 && 0=Don't Activate individual <file>.Log by default
<<>> && 1=Activate individual <file>.Log by default
<<>> && 2=???
<<>> && Only valid if not controlled by parameter
<<>>BackgroundImage: <cFile> && Backgroundimage for process form. Empty for empty Background. File not found uses default. <<>>BackgroundImage: <cFile> && Backgroundimage for process form. Empty for empty Background. File not found uses default.
<<>>HomeDir: 1 && Home directory in PJX <<>>HomeDir: 1 && Home directory in PJX
<<>> && 0 don't save HomeDir in PJ2 <<>> && 0 don't save HomeDir in PJ2
<<>> && 1 save HomeDir in PJ2 <<>> && 1 save HomeDir in PJ2
<<>>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ <<>>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<<>>-- Settings for config file via parameter only <<>>-- Settings for config file via parameter only
<<>>AllowInheritance: 0 && 0=Allow scanning "regular" config files (file via parameter is just additional default) <<>>InhibitInheritance: 0 && 0=Allow scanning "regular" config files (file via parameter is just additional default)
<<>> && 1=Only read directory branch from root to parent of folder and below, not FoxBin2Prg default <<>> && 1=Only read directory branch from root to parent of folder and below, not FoxBin2Prg default
<<>> && 2=Only read folder and subfolder of the file given by parameter <<>> && 2=Only read folder and subfolder of the file given by parameter
<<>> && 3=Read no other file <<>> && 3=Read no other file
@@ -31458,10 +31508,12 @@ Define Class CL_LANG As Custom
.C_USE_FILE_TIMESTAMP_OPTIMIZATION_LOC = "Utilisez le fichier Optimisation d'horodatage" .C_USE_FILE_TIMESTAMP_OPTIMIZATION_LOC = "Utilisez le fichier Optimisation d'horodatage"
.C_USING_THIS_SETTINGS_LOC = "Utilisation de ce paramètre" .C_USING_THIS_SETTINGS_LOC = "Utilisation de ce paramètre"
.C_USING_THIS_SETTINGS_LOC1 = " BY PARAMETER, skipping all previous config!" .C_USING_THIS_SETTINGS_LOC1 = " BY PARAMETER, skipping all previous config!"
.C_USING_THIS_SETTINGS_LOC2 = " Parsing of full configuration allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC2 = " Parsing of full configuration allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC3 = " Parsing configuration in parent~ and subdirectories allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC3 = " Parsing configuration in parent~ and subdirectories allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC4 = " Parsing configuration in subdirectories allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC4 = " Parsing configuration in subdirectories allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC5 = " Parsing of other configuration allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC5 = " Parsing of other configuration not allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC6 = "External configuration file set: "
.C_USING_THIS_SETTINGS_LOC7 = ", using cached config."
.C_WARNING_LOC = "AVERTISSEMENT!" .C_WARNING_LOC = "AVERTISSEMENT!"
.C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = "AVERTISSEMENT!" + CR_LF+ "ASSUREZ VOUS NE UTILISEZ PAS UN ALIAS DE TABLE SUR LES EXPRESSIONS INDEX CLÉS!! (exemple: index on <<UPPER(JUSTSTEM(THIS.c_InputFile))>>.campo tag keyname)" .C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = "AVERTISSEMENT!" + CR_LF+ "ASSUREZ VOUS NE UTILISEZ PAS UN ALIAS DE TABLE SUR LES EXPRESSIONS INDEX CLÉS!! (exemple: index on <<UPPER(JUSTSTEM(THIS.c_InputFile))>>.campo tag keyname)"
.C_WITH_ERRORS_LOC = "avec des erreurs" .C_WITH_ERRORS_LOC = "avec des erreurs"
@@ -31473,11 +31525,11 @@ Define Class CL_LANG As Custom
.C_INDEX2BIN_STRUCTURAL_LOC = " TAGs for structural index" .C_INDEX2BIN_STRUCTURAL_LOC = " TAGs for structural index"
.C_INDEX2BIN_STANDALONE_LOC = " Standalone index " .C_INDEX2BIN_STANDALONE_LOC = " Standalone index "
.C_INDEX2BIN_COMPOUND_LOC = " TAGs for compound index " .C_INDEX2BIN_COMPOUND_LOC = " TAGs for compound index "
.C_PJXPATH_ERR_LOC1 = 0h0D0A + 'Main file "' .C_PJXPATH_ERR_LOC1 = CR_LF + 'Main file "'
.C_PJXPATH_ERR_LOC2 = 0h0D0A + 'Project icon file "' .C_PJXPATH_ERR_LOC2 = CR_LF + 'Project icon file "'
.C_PJXPATH_ERR_LOC3 = 0h0D0A + 'File ""' .C_PJXPATH_ERR_LOC3 = CR_LF + 'File ""'
.C_PJXPATH_ERR_LOC4 = '"' + 0h0D0A + 'not in PJX folder structure, "' .C_PJXPATH_ERR_LOC4 = '"' + CR_LF + 'not in PJX folder structure, "'
.C_PJXPATH_ERR_LOC5 = '",' + 0h0D0A + 'check option "CheckFileInPath".' + 0h0D0A0D0A .C_PJXPATH_ERR_LOC5 = '",' + CR_LF + 'check option "CheckFileInPath".' + CR_LF+CR_LF
Case Inlist(tcLanguage, '34', 'ES') && Spanish (Español) Case Inlist(tcLanguage, '34', 'ES') && Spanish (Español)
*------------------------------------------------------------------------------------------------------------------------------------------- *-------------------------------------------------------------------------------------------------------------------------------------------
@@ -31521,9 +31573,9 @@ Define Class CL_LANG As Custom
.C_FILENAME_LOC = "Archivo" .C_FILENAME_LOC = "Archivo"
.C_FOXBIN2PRG_ERROR_CAPTION_LOC = "ERROR" .C_FOXBIN2PRG_ERROR_CAPTION_LOC = "ERROR"
.C_FOXBIN2PRG_SYNTAX_INFO_LOC = "INFORMACIÓN DE SINTAXIS Y PARÁMETROS" .C_FOXBIN2PRG_SYNTAX_INFO_LOC = "INFORMACIÓN DE SINTAXIS Y PARÁMETROS"
.C_ClassTwice_Header_LOC = 0h0D0A+"Class defined twice."+0h0D0A .C_ClassTwice_Header_LOC = CR_LF+"Class defined twice."+CR_LF
.C_ClassTwice_Lib_LOC = 0h0D0A+"Library: " .C_ClassTwice_Lib_LOC = CR_LF+"Library: "
.C_ClassTwice_Class_LOC = 0h0D0A+"Class: " .C_ClassTwice_Class_LOC = CR_LF+"Class: "
TEXT TO .C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2 TEXT TO .C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2
<<>>################################################################################################################ <<>>################################################################################################################
<<>>Página principal y descarga de FoxBin2Prg: https://github.com/fdbozzo/foxbin2prg/wiki - Fernando D. Bozzo (2013.11.25) <<>>Página principal y descarga de FoxBin2Prg: https://github.com/fdbozzo/foxbin2prg/wiki - Fernando D. Bozzo (2013.11.25)
@@ -31587,7 +31639,7 @@ Define Class CL_LANG As Custom
<<>> 1. Default values <<>> 1. Default values
<<>> 2., optional FOXBIN2PRG.CFG in folder of FOXBIN2PRG.EXE <<>> 2., optional FOXBIN2PRG.CFG in folder of FOXBIN2PRG.EXE
<<>> or, if defined, a config file given by a parameter calling FOXBIN2PRG <<>> or, if defined, a config file given by a parameter calling FOXBIN2PRG
<<>> if used, the AllowInheritance setting controls if other config files will be evaluated (default) <<>> if used, the InhibitInheritance setting controls if other config files will be evaluated (default)
<<>> 3., optional FOXBIN2PRG.CFG in root of working directory <<>> 3., optional FOXBIN2PRG.CFG in root of working directory
<<>> 4., optional FOXBIN2PRG.CFG in every folder up to the working directory <<>> 4., optional FOXBIN2PRG.CFG in every folder up to the working directory
<<>> 5., optional Special settings per single DBF's Syntax: <TableName>.dbf.cfg in tables folder) <<>> 5., optional Special settings per single DBF's Syntax: <TableName>.dbf.cfg in tables folder)
@@ -31600,14 +31652,17 @@ Define Class CL_LANG As Custom
<<>>ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2=Show only for multi-file processing <<>>ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2=Show only for multi-file processing
<<>>DontShowErrors: 0 && Show message errors by default <<>>DontShowErrors: 0 && Show message errors by default
<<>>ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none <<>>ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none
<<>>Debug: 0 && Don't Activate individual <file>.Log by default <<>>Debug: 0 && 0=Don't Activate individual <file>.Log by default
<<>> && 1=Activate individual <file>.Log by default
<<>> && 2=???
<<>> && Only valid if not controlled by parameter
<<>>BackgroundImage: <cFile> && Backgroundimage for process form. Empty for empty Background. File not found uses default. <<>>BackgroundImage: <cFile> && Backgroundimage for process form. Empty for empty Background. File not found uses default.
<<>>HomeDir: 1 && Home directory in PJX <<>>HomeDir: 1 && Home directory in PJX
<<>> && 0 don't save HomeDir in PJ2 <<>> && 0 don't save HomeDir in PJ2
<<>> && 1 save HomeDir in PJ2 <<>> && 1 save HomeDir in PJ2
<<>>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ <<>>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<<>>-- Settings for config file via parameter only <<>>-- Settings for config file via parameter only
<<>>AllowInheritance: 0 && 0=Allow scanning "regular" config files (file via parameter is just additional default) <<>>InhibitInheritance: 0 && 0=Allow scanning "regular" config files (file via parameter is just additional default)
<<>> && 1=Only read directory branch from root to parent of folder and below, not FoxBin2Prg default <<>> && 1=Only read directory branch from root to parent of folder and below, not FoxBin2Prg default
<<>> && 2=Only read folder and subfolder of the file given by parameter <<>> && 2=Only read folder and subfolder of the file given by parameter
<<>> && 3=Read no other file <<>> && 3=Read no other file
@@ -31773,10 +31828,12 @@ Define Class CL_LANG As Custom
.C_USE_FILE_TIMESTAMP_OPTIMIZATION_LOC = "Usar Optimización de filestamp de archivo" .C_USE_FILE_TIMESTAMP_OPTIMIZATION_LOC = "Usar Optimización de filestamp de archivo"
.C_USING_THIS_SETTINGS_LOC = "Usando esta configuración" .C_USING_THIS_SETTINGS_LOC = "Usando esta configuración"
.C_USING_THIS_SETTINGS_LOC1 = " BY PARAMETER, skipping all previous config!" .C_USING_THIS_SETTINGS_LOC1 = " BY PARAMETER, skipping all previous config!"
.C_USING_THIS_SETTINGS_LOC2 = " Parsing of full configuration allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC2 = " Parsing of full configuration allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC3 = " Parsing configuration in parent~ and subdirectories allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC3 = " Parsing configuration in parent~ and subdirectories allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC4 = " Parsing configuration in subdirectories allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC4 = " Parsing configuration in subdirectories allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC5 = " Parsing of other configuration allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC5 = " Parsing of other configuration not allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC6 = "External configuration file set: "
.C_USING_THIS_SETTINGS_LOC7 = ", using cached config."
.C_WARNING_LOC = "¡ATENCIÓN!" .C_WARNING_LOC = "¡ATENCIÓN!"
.C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = "¡ATENCIÓN!" + CR_LF+ "ASEGÚRESE DE QUE NO ESTÁ USANDO UN ALIAS DE TABLA EN LAS EXPRESIONES DE LOS ÍNDICES!! (ej: index on <<UPPER(JUSTSTEM(THIS.c_InputFile))>>.campo tag nombreclave)" .C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = "¡ATENCIÓN!" + CR_LF+ "ASEGÚRESE DE QUE NO ESTÁ USANDO UN ALIAS DE TABLA EN LAS EXPRESIONES DE LOS ÍNDICES!! (ej: index on <<UPPER(JUSTSTEM(THIS.c_InputFile))>>.campo tag nombreclave)"
.C_WITH_ERRORS_LOC = "con errores" .C_WITH_ERRORS_LOC = "con errores"
@@ -31788,11 +31845,11 @@ Define Class CL_LANG As Custom
.C_INDEX2BIN_STRUCTURAL_LOC = " TAGs for structural index" .C_INDEX2BIN_STRUCTURAL_LOC = " TAGs for structural index"
.C_INDEX2BIN_STANDALONE_LOC = " Standalone index " .C_INDEX2BIN_STANDALONE_LOC = " Standalone index "
.C_INDEX2BIN_COMPOUND_LOC = " TAGs for compound index " .C_INDEX2BIN_COMPOUND_LOC = " TAGs for compound index "
.C_PJXPATH_ERR_LOC1 = 0h0D0A + 'Main file "' .C_PJXPATH_ERR_LOC1 = CR_LF + 'Main file "'
.C_PJXPATH_ERR_LOC2 = 0h0D0A + 'Project icon file "' .C_PJXPATH_ERR_LOC2 = CR_LF + 'Project icon file "'
.C_PJXPATH_ERR_LOC3 = 0h0D0A + 'File ""' .C_PJXPATH_ERR_LOC3 = CR_LF + 'File ""'
.C_PJXPATH_ERR_LOC4 = '"' + 0h0D0A + 'not in PJX folder structure, "' .C_PJXPATH_ERR_LOC4 = '"' + CR_LF + 'not in PJX folder structure, "'
.C_PJXPATH_ERR_LOC5 = '",' + 0h0D0A + 'check option "CheckFileInPath".' + 0h0D0A0D0A .C_PJXPATH_ERR_LOC5 = '",' + CR_LF + 'check option "CheckFileInPath".' + CR_LF+CR_LF
Case Inlist(tcLanguage, '49', 'DE') && German (Alemán) Case Inlist(tcLanguage, '49', 'DE') && German (Alemán)
*------------------------------------------------------------------------------------------------------------------------------------------- *-------------------------------------------------------------------------------------------------------------------------------------------
@@ -31803,7 +31860,7 @@ Define Class CL_LANG As Custom
.C_BACKLINK_CANT_UPDATE_BL_LOC = "Backlink kann nicht aktualisiert werden" .C_BACKLINK_CANT_UPDATE_BL_LOC = "Backlink kann nicht aktualisiert werden"
.C_BACKLINK_OF_TABLE_LOC = "von Tabelle" .C_BACKLINK_OF_TABLE_LOC = "von Tabelle"
.C_BACKUP_OF_LOC = "Erzeuge Backup von: " .C_BACKUP_OF_LOC = "Erzeuge Backup von: "
.C_CACHING_CONFIG_FOR_DIRECTORY_LOC = "Caching Config für Verzeichnis" .C_CACHING_CONFIG_FOR_DIRECTORY_LOC = "Caching Konfiguration für Verzeichnis"
.C_CANT_GENERATE_FILE_BECAUSE_IT_IS_READONLY_LOC = "Kann Datei [<<THIS.c_OutputFile>>] nicht generieren, da sie schreibgeschützt ist" .C_CANT_GENERATE_FILE_BECAUSE_IT_IS_READONLY_LOC = "Kann Datei [<<THIS.c_OutputFile>>] nicht generieren, da sie schreibgeschützt ist"
.C_CLASSPERFILE_OPTIMIZATION_BASE_ALREADY_PROCESSED_LOC = "Optimierung: Grund Datei [<<JUSTFNAME(.c_InputFile)>>] Schon verarbeitet, das Überspringen Verarbeitung der Datei [<<tc_InputFile>>]" .C_CLASSPERFILE_OPTIMIZATION_BASE_ALREADY_PROCESSED_LOC = "Optimierung: Grund Datei [<<JUSTFNAME(.c_InputFile)>>] Schon verarbeitet, das Überspringen Verarbeitung der Datei [<<tc_InputFile>>]"
.C_CONFIGFILE_LOC = "Benutzte Konfigurationsdatei:" .C_CONFIGFILE_LOC = "Benutzte Konfigurationsdatei:"
@@ -31836,9 +31893,9 @@ Define Class CL_LANG As Custom
.C_FILENAME_LOC = "Datei" .C_FILENAME_LOC = "Datei"
.C_FOXBIN2PRG_ERROR_CAPTION_LOC = "FEHLER" .C_FOXBIN2PRG_ERROR_CAPTION_LOC = "FEHLER"
.C_FOXBIN2PRG_SYNTAX_INFO_LOC = "SYNTAX UND PARAMETER INFORMATION" .C_FOXBIN2PRG_SYNTAX_INFO_LOC = "SYNTAX UND PARAMETER INFORMATION"
.C_ClassTwice_Header_LOC = 0h0D0A+"Klasse doppelt deklariert."+0h0D0A .C_ClassTwice_Header_LOC = CR_LF+"Klasse doppelt deklariert."+CR_LF
.C_ClassTwice_Lib_LOC = 0h0D0A+"Bibliothek: " .C_ClassTwice_Lib_LOC = CR_LF+"Bibliothek: "
.C_ClassTwice_Class_LOC = 0h0D0A+"Klasse: " .C_ClassTwice_Class_LOC = CR_LF+"Klasse: "
TEXT TO .C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2 TEXT TO .C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2
<<>>################################################################################################################ <<>>################################################################################################################
<<>>FoxBin2Prg Home Page and download: https://github.com/fdbozzo/foxbin2prg/wiki - Fernando D. Bozzo (2013.11.25) <<>>FoxBin2Prg Home Page and download: https://github.com/fdbozzo/foxbin2prg/wiki - Fernando D. Bozzo (2013.11.25)
@@ -31903,7 +31960,7 @@ Define Class CL_LANG As Custom
<<>> 1. Defaultwerte <<>> 1. Defaultwerte
<<>> 2., optional FOXBIN2PRG.CFG im Vereichnis aus dem FOXBIN2PRG.EXE startet <<>> 2., optional FOXBIN2PRG.CFG im Vereichnis aus dem FOXBIN2PRG.EXE startet
<<>> Oder, wenn definiert, eine Konfigurationsdatei die per parameter an FOXBIN2PRG übergeben wurde. <<>> Oder, wenn definiert, eine Konfigurationsdatei die per parameter an FOXBIN2PRG übergeben wurde.
<<>> Wird diese genutzt, steuert die Einstellung AllowInheritance, ob folgende Konfigurationsdateien ausgewertet werden. (default) <<>> Wird diese genutzt, steuert die Einstellung InhibitInheritance, ob folgende Konfigurationsdateien ausgewertet werden. (default)
<<>> 3., optional FOXBIN2PRG.CFG in der Wurzel des Arbeitsverzeichnises <<>> 3., optional FOXBIN2PRG.CFG in der Wurzel des Arbeitsverzeichnises
<<>> 4., optional FOXBIN2PRG.CFG in jedem Verzeichnis bis zum Arbeitsverzeichnis <<>> 4., optional FOXBIN2PRG.CFG in jedem Verzeichnis bis zum Arbeitsverzeichnis
<<>> 5., optional Es können spezielle Einstellungen für einzelne DBF's erzeugt werden (Syntax: <TableName>.dbf.cfg im Verzeichnis der Tabelle) <<>> 5., optional Es können spezielle Einstellungen für einzelne DBF's erzeugt werden (Syntax: <TableName>.dbf.cfg im Verzeichnis der Tabelle)
@@ -31916,7 +31973,10 @@ Define Class CL_LANG As Custom
<<>>ShowProgressbar: 1 && 0=Zeige Fortschrittsfenster, 1=Zeige es nicht, 2=Zeige Fortschrittsfenster nur, wenn mehrere Dateien konvertiert werden. <<>>ShowProgressbar: 1 && 0=Zeige Fortschrittsfenster, 1=Zeige es nicht, 2=Zeige Fortschrittsfenster nur, wenn mehrere Dateien konvertiert werden.
<<>>DontShowErrors: 0 && 0=Zeige Fehler an, 1=Zeige keine Fehler an <<>>DontShowErrors: 0 && 0=Zeige Fehler an, 1=Zeige keine Fehler an
<<>>ExtraBackupLevels: 1 && Anzahl der Backup-Ebenen der Binärdateien 0=kein Backup, 1=<Datei>.BAK, n>1= n-Backup-Ebenen, <Datei>.n.BAK <<>>ExtraBackupLevels: 1 && Anzahl der Backup-Ebenen der Binärdateien 0=kein Backup, 1=<Datei>.BAK, n>1= n-Backup-Ebenen, <Datei>.n.BAK
<<>>Debug: 0 && 0=Individuelles Logging ist aus 1= Individuelles Log per Datei <Datei>.Log <<>>Debug: 0 && 0=Individuelles Logging ist aus
<<>> && 1=Individuelles Log per Datei <Datei>.Log
<<>> && 2=???
<<>> && Nur gültig, wenn nicht durch einen Parameter übersteuert
<<>>BackgroundImage: <cFile> && Hintergrundbild für das Formular zur Fortschrittsanzeige. <<>>BackgroundImage: <cFile> && Hintergrundbild für das Formular zur Fortschrittsanzeige.
<<>> && Leer erzeugt kein Hintergrundbild. Wird die Datei nicht gefunden, wird der Standardhintergrund verwendet. <<>> && Leer erzeugt kein Hintergrundbild. Wird die Datei nicht gefunden, wird der Standardhintergrund verwendet.
<<>>HomeDir: 1 && Speichern der HomeDir Eigenschaft in die PJX <<>>HomeDir: 1 && Speichern der HomeDir Eigenschaft in die PJX
@@ -31924,7 +31984,7 @@ Define Class CL_LANG As Custom
<<>> && 1 Die Eigenschaft wird gespeichert <<>> && 1 Die Eigenschaft wird gespeichert
<<>>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ <<>>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<<>>-- Settings for config file via parameter only <<>>-- Settings for config file via parameter only
<<>>AllowInheritance: 0 && 0=Alle Konfiguration wird gelesen (Die Datei aus dem Parameter ist nur ein zusätzlicher default) <<>>InhibitInheritance: 0 && 0=Alle Konfiguration wird gelesen (Die Datei aus dem Parameter ist nur ein zusätzlicher default)
<<>> && 1=Nur die Vererbung in den Verezeichnissen , Im Verzeichnis der Konfiguration und Unterverzeichnisse werden gelesen <<>> && 1=Nur die Vererbung in den Verezeichnissen , Im Verzeichnis der Konfiguration und Unterverzeichnisse werden gelesen
<<>> && 2=Nur die Konfiguration des Veruzeichnisses der Parameterdatei und Unterverzeichnisse werden gelesen <<>> && 2=Nur die Konfiguration des Veruzeichnisses der Parameterdatei und Unterverzeichnisse werden gelesen
<<>> && 3=Keine weiter Konfiguration wird gelesen <<>> && 3=Keine weiter Konfiguration wird gelesen
@@ -32113,10 +32173,12 @@ Define Class CL_LANG As Custom
.C_USE_FILE_TIMESTAMP_OPTIMIZATION_LOC = "Verwenden Sie die Datei-Zeitstempel-Optimierung" .C_USE_FILE_TIMESTAMP_OPTIMIZATION_LOC = "Verwenden Sie die Datei-Zeitstempel-Optimierung"
.C_USING_THIS_SETTINGS_LOC = "Mit dieser Einstellung" .C_USING_THIS_SETTINGS_LOC = "Mit dieser Einstellung"
.C_USING_THIS_SETTINGS_LOC1 = " BY PARAMETER, alle vorherigen Einstellungen werden zurückgesetzt!" .C_USING_THIS_SETTINGS_LOC1 = " BY PARAMETER, alle vorherigen Einstellungen werden zurückgesetzt!"
.C_USING_THIS_SETTINGS_LOC2 = " Komplette Auswertung der Konfiguration gestattet."+0h0D0A .C_USING_THIS_SETTINGS_LOC2 = " Komplette Auswertung der Konfiguration gestattet."+CR_LF
.C_USING_THIS_SETTINGS_LOC3 = " Konfigurationsdateien von Unterverzeichnissen und ererbete Konfigurationen aus dem Baum werden ausgewertet."+0h0D0A .C_USING_THIS_SETTINGS_LOC3 = " Konfigurationsdateien von Unterverzeichnissen und ererbete Konfigurationen aus dem Baum werden ausgewertet."+CR_LF
.C_USING_THIS_SETTINGS_LOC4 = " Konfigurationsdateien von Unterverzeichnissen werden ausgewertet."+0h0D0A .C_USING_THIS_SETTINGS_LOC4 = " Konfigurationsdateien von Unterverzeichnissen werden ausgewertet."+CR_LF
.C_USING_THIS_SETTINGS_LOC5 = " Es werdenm keine anderen Konfigurationsdateien gelesen."+0h0D0A .C_USING_THIS_SETTINGS_LOC5 = " Es werden keine anderen Konfigurationsdateien gelesen."+CR_LF
.C_USING_THIS_SETTINGS_LOC6 = "Externe Konfigurationsdatei übergeben: "
.C_USING_THIS_SETTINGS_LOC7 = ", nutze gespeicherte Konfiguration."
.C_WARNING_LOC = "WARNUNG!" .C_WARNING_LOC = "WARNUNG!"
.C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = "WARNUNG!" + CR_LF+ "STELLEN SIE SICHER, DAS KEIN TABELLENALIAS IM INDEXAUSDRUCK BENUTZT WIRD!! (z.B.: index on <<UPPER(JUSTSTEM(THIS.c_InputFile))>>.campo tag keyname)" .C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = "WARNUNG!" + CR_LF+ "STELLEN SIE SICHER, DAS KEIN TABELLENALIAS IM INDEXAUSDRUCK BENUTZT WIRD!! (z.B.: index on <<UPPER(JUSTSTEM(THIS.c_InputFile))>>.campo tag keyname)"
.C_WITH_ERRORS_LOC = "mit Fehlern" .C_WITH_ERRORS_LOC = "mit Fehlern"
@@ -32129,11 +32191,11 @@ Define Class CL_LANG As Custom
.C_INDEX2BIN_STRUCTURAL_LOC = " TAGs für den strukturellen Index" .C_INDEX2BIN_STRUCTURAL_LOC = " TAGs für den strukturellen Index"
.C_INDEX2BIN_STANDALONE_LOC = " Eigenständige Indexdatei: " .C_INDEX2BIN_STANDALONE_LOC = " Eigenständige Indexdatei: "
.C_INDEX2BIN_COMPOUND_LOC = " TAGs für verbundene Indexdatei: " .C_INDEX2BIN_COMPOUND_LOC = " TAGs für verbundene Indexdatei: "
.C_PJXPATH_ERR_LOC1 = 0h0D0A + 'Hauptdatei "' .C_PJXPATH_ERR_LOC1 = CR_LF + 'Hauptdatei "'
.C_PJXPATH_ERR_LOC2 = 0h0D0A + 'Projekt-Icon Datei "' .C_PJXPATH_ERR_LOC2 = CR_LF + 'Projekt-Icon Datei "'
.C_PJXPATH_ERR_LOC3 = 0h0D0A + 'Datei ""' .C_PJXPATH_ERR_LOC3 = CR_LF + 'Datei ""'
.C_PJXPATH_ERR_LOC4 = '"' + 0h0D0A + 'ist nicht in der PJX Ordner Struktur, "' .C_PJXPATH_ERR_LOC4 = '"' + CR_LF + 'ist nicht in der PJX Ordner Struktur, "'
.C_PJXPATH_ERR_LOC5 = '",' + 0h0D0A + 'siehe Option "CheckFileInPath".' + 0h0D0A0D0A .C_PJXPATH_ERR_LOC5 = '",' + CR_LF + 'siehe Option "CheckFileInPath".' + CR_LF+CR_LF
Otherwise && English (Inglés) Otherwise && English (Inglés)
@@ -32178,9 +32240,9 @@ Define Class CL_LANG As Custom
.C_FILENAME_LOC = "File" .C_FILENAME_LOC = "File"
.C_FOXBIN2PRG_ERROR_CAPTION_LOC = "ERROR" .C_FOXBIN2PRG_ERROR_CAPTION_LOC = "ERROR"
.C_FOXBIN2PRG_SYNTAX_INFO_LOC = "SYNTAX AND PARAMETERS INFO" .C_FOXBIN2PRG_SYNTAX_INFO_LOC = "SYNTAX AND PARAMETERS INFO"
.C_ClassTwice_Header_LOC = 0h0D0A+"Class defined twice."+0h0D0A .C_ClassTwice_Header_LOC = CR_LF+"Class defined twice."+CR_LF
.C_ClassTwice_Lib_LOC = 0h0D0A+"Library: " .C_ClassTwice_Lib_LOC = CR_LF+"Library: "
.C_ClassTwice_Class_LOC = 0h0D0A+"Class: " .C_ClassTwice_Class_LOC = CR_LF+"Class: "
TEXT TO .C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2 TEXT TO .C_FOXBIN2PRG_SYNTAX_INFO_EXAMPLE_LOC TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2
<<>>################################################################################################################ <<>>################################################################################################################
<<>>FoxBin2Prg Home Page and download: https://github.com/fdbozzo/foxbin2prg/wiki - Fernando D. Bozzo (2013.11.25) <<>>FoxBin2Prg Home Page and download: https://github.com/fdbozzo/foxbin2prg/wiki - Fernando D. Bozzo (2013.11.25)
@@ -32244,7 +32306,7 @@ Define Class CL_LANG As Custom
<<>> 1. Default values <<>> 1. Default values
<<>> 2., optional FOXBIN2PRG.CFG in folder of FOXBIN2PRG.EXE <<>> 2., optional FOXBIN2PRG.CFG in folder of FOXBIN2PRG.EXE
<<>> or, if defined, a config file given by a parameter calling FOXBIN2PRG <<>> or, if defined, a config file given by a parameter calling FOXBIN2PRG
<<>> if used, the AllowInheritance setting controls if other config files will be evaluated (default). See below. <<>> if used, the InhibitInheritance setting controls if other config files will be evaluated (default). See below.
<<>> 3., optional FOXBIN2PRG.CFG in root of working directory <<>> 3., optional FOXBIN2PRG.CFG in root of working directory
<<>> 4., optional FOXBIN2PRG.CFG in every folder up to the working directory <<>> 4., optional FOXBIN2PRG.CFG in every folder up to the working directory
<<>> 5., optional Special settings per single DBF's Syntax: <TableName>.dbf.cfg in tables folder) <<>> 5., optional Special settings per single DBF's Syntax: <TableName>.dbf.cfg in tables folder)
@@ -32257,14 +32319,17 @@ Define Class CL_LANG As Custom
<<>>ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2=Show only for multi-file processing <<>>ShowProgressbar: 1 && 0=Don't show, 1=Allways show, 2=Show only for multi-file processing
<<>>DontShowErrors: 0 && Show message errors by default <<>>DontShowErrors: 0 && Show message errors by default
<<>>ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none <<>>ExtraBackupLevels: 1 && By default 1 BAK is created. With this you can make more .N.BAK, or none
<<>>Debug: 0 && Don't Activate individual <file>.Log by default <<>>Debug: 0 && 0=Don't Activate individual <file>.Log by default
<<>> && 1=Activate individual <file>.Log by default
<<>> && 2=???
<<>> && Only valid if not controlled by parameter
<<>>BackgroundImage: <cFile> && Backgroundimage for process form. Empty for empty Background. File not found uses default. <<>>BackgroundImage: <cFile> && Backgroundimage for process form. Empty for empty Background. File not found uses default.
<<>>HomeDir: 1 && Home directory in PJX <<>>HomeDir: 1 && Home directory in PJX
<<>> && 0 don't save HomeDir in PJ2 <<>> && 0 don't save HomeDir in PJ2
<<>> && 1 save HomeDir in PJ2 <<>> && 1 save HomeDir in PJ2
<<>>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ <<>>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<<>>-- Settings for config file via parameter only <<>>-- Settings for config file via parameter only
<<>>AllowInheritance: 0 && 0=Allow scanning "regular" config files (file via parameter is just additional default) <<>>InhibitInheritance: 0 && 0=Allow scanning "regular" config files (file via parameter is just additional default)
<<>> && 1=Only read tree from root of the file given by parameter, not FoxBin2Prg default <<>> && 1=Only read tree from root of the file given by parameter, not FoxBin2Prg default
<<>> && 2=Only read folder and subfolder of the file given by parameter <<>> && 2=Only read folder and subfolder of the file given by parameter
<<>> && 3=Read no other file <<>> && 3=Read no other file
@@ -32430,10 +32495,12 @@ Define Class CL_LANG As Custom
.C_USE_FILE_TIMESTAMP_OPTIMIZATION_LOC = "Use file timestamp Optimization" .C_USE_FILE_TIMESTAMP_OPTIMIZATION_LOC = "Use file timestamp Optimization"
.C_USING_THIS_SETTINGS_LOC = "Using this settings" .C_USING_THIS_SETTINGS_LOC = "Using this settings"
.C_USING_THIS_SETTINGS_LOC1 = " BY PARAMETER, skipping all previous config!" .C_USING_THIS_SETTINGS_LOC1 = " BY PARAMETER, skipping all previous config!"
.C_USING_THIS_SETTINGS_LOC2 = " Parsing of full configuration allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC2 = " Parsing of full configuration allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC3 = " Parsing configuration in parent~ and subdirectories allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC3 = " Parsing configuration in parent~ and subdirectories allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC4 = " Parsing configuration in subdirectories allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC4 = " Parsing configuration in subdirectories allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC5 = " Parsing of other configuration allowed."+0h0D0A .C_USING_THIS_SETTINGS_LOC5 = " Parsing of other configuration not allowed."+CR_LF
.C_USING_THIS_SETTINGS_LOC6 = "External configuration file set: "
.C_USING_THIS_SETTINGS_LOC7 = ", using cached config."
.C_WARNING_LOC = "WARNING!" .C_WARNING_LOC = "WARNING!"
.C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = "WARNING!" + CR_LF+ "MAKE SURE YOU ARE NOT USING A TABLE ALIAS ON INDEX KEY EXPRESSIONS!! (ex: index on <<UPPER(JUSTSTEM(THIS.c_InputFile))>>.campo tag keyname)" .C_WARN_TABLE_ALIAS_ON_INDEX_EXPRESSION_LOC = "WARNING!" + CR_LF+ "MAKE SURE YOU ARE NOT USING A TABLE ALIAS ON INDEX KEY EXPRESSIONS!! (ex: index on <<UPPER(JUSTSTEM(THIS.c_InputFile))>>.campo tag keyname)"
.C_WITH_ERRORS_LOC = "with errors" .C_WITH_ERRORS_LOC = "with errors"
@@ -32446,11 +32513,11 @@ Define Class CL_LANG As Custom
.C_INDEX2BIN_STRUCTURAL_LOC = " TAGs for structural index" .C_INDEX2BIN_STRUCTURAL_LOC = " TAGs for structural index"
.C_INDEX2BIN_STANDALONE_LOC = " Standalone index " .C_INDEX2BIN_STANDALONE_LOC = " Standalone index "
.C_INDEX2BIN_COMPOUND_LOC = " TAGs for compound index " .C_INDEX2BIN_COMPOUND_LOC = " TAGs for compound index "
.C_PJXPATH_ERR_LOC1 = 0h0D0A + 'Main file "' .C_PJXPATH_ERR_LOC1 = CR_LF + 'Main file "'
.C_PJXPATH_ERR_LOC2 = 0h0D0A + 'Project icon file "' .C_PJXPATH_ERR_LOC2 = CR_LF + 'Project icon file "'
.C_PJXPATH_ERR_LOC3 = 0h0D0A + 'File ""' .C_PJXPATH_ERR_LOC3 = CR_LF + 'File ""'
.C_PJXPATH_ERR_LOC4 = '"' + 0h0D0A + 'not in PJX folder structure, "' .C_PJXPATH_ERR_LOC4 = '"' + CR_LF + 'not in PJX folder structure, "'
.C_PJXPATH_ERR_LOC5 = '",' + 0h0D0A + 'check option "CheckFileInPath".' + 0h0D0A0D0A .C_PJXPATH_ERR_LOC5 = '",' + 0h0D0A + 'check option "CheckFileInPath".' + CR_LF+CR_LF
.n_LanguageSelectedMethod = 0 && 0=Automatic with VERSION(3) .n_LanguageSelectedMethod = 0 && 0=Automatic with VERSION(3)

BIN
foxbin2prg_keywords.cdx
View File

Binary file not shown.

BIN
foxbin2prg_keywords.dbf
View File

Binary file not shown.