Nivelacion con 1.19.49.5

This commit is contained in:
fdbozzo
2017-12-20 22:31:38 +01:00
5 changed files with 50 additions and 3 deletions

View File

@@ -21,6 +21,9 @@ Demo video using FoxBin2Prg with PlasticSCM: http://youtu.be/sE4wQ50Itqg
Change History -------------------------------------------------------------
2017/12/20 v1.19.49.5
- BugFix DBF: When FoxBin2PRG converts a DB2 file to a DBF file and imports the data (using DBF_Conversion_Support = 8), tabs at the start of lines in memo fields are lost (Doug Hennig / https://github.com/fdbozzo/foxbin2prg/issues/13)
2017/12/04 v1.19.49.4
- Bug Fix VCX: When using ClassPerFile in API Mode and importing single classes, sometimes their names get unquoted, throwing errors / Reported by Lutz Scheffler (https://github.com/fdbozzo/foxbin2prg/issues/11)

Binary file not shown.

View File

@@ -2,9 +2,9 @@ lparameters toUpdateObject
local ldDate, ;
lnJulian, ;
lcJulian
ldDate = date(2017,12,3)
ldDate = date(2017,12,5)
lnJulian = val(sys(11, ldDate)) - val(sys(11, {^2000-01-01}))
lcJulian = padl(transform(lnJulian), 4, '0')
toUpdateObject.AvailableVersion = 'FoxBin2Prg-1.19.49.2' + lcJulian + ;
toUpdateObject.AvailableVersion = 'FoxBin2Prg-1.19.49.4' + lcJulian + ;
'-update-' + dtoc(ldDate, 1)
return toUpdateObject

Binary file not shown.

View File

@@ -203,6 +203,7 @@
* 02/12/2017 FDBOZZO v1.19.49.2 Bug Fix tx2 v1.19.49: No exporta los objetos a TX2 cuando se usa ClassPerFile (Lutz Scheffler)
* 03/12/2017 JS&FDBOZZO v1.19.49.3 Bug Fix db2: Los campos "Double" asumen 2 decimales cuando se definen con 0 decimales (Jerry Stager)
* 04/12/2017 FDBOZZO v1.19.49.4 Cuando se usa ClassPerFile an Modo API y se importan clases simples, a veces sus nombres se toman sin comillas, provocando errores (Lutz Scheffler)
* 20/12/2017 DH&FDBOZZO v1.19.49.5 Bug Fix dbf: Cuando se importan datos de un DB2 a DBF (con DBF_Conversion_Support = 8), los tabs al inicio de los memo se pierden (Doug Hennig)
* </HISTORIAL DE CAMBIOS Y NOTAS IMPORTANTES>
*
*---------------------------------------------------------------------------------------------------
@@ -319,6 +320,7 @@
* 28/11/2017 Lutz Scheffler Reporte Bug vx2 v1.19.49: No exporta los objetos a VX2 cuando se usa ClassPerFile (Arreglado en v1.19.49.2)
* 31/08/2017 Jerry Stager Reporte bug db2 v1.19.48: Los campos "Double" asumen 2 decimales cuando se definen con 0 decimales (Agregado en v1.19.49.3)
* 03/12/2017 Lutz Scheffler Reporte Bug vx2 v1.19.49: Cuando se usa ClassPerFile an Modo API y se importan clases simples, a veces sus nombres se toman sin comillas, provocando errores (Arreglado en v1.19.49.4)
* 18/12/2017 Doug Hennnig Reporte Bug dbf v1.19.49: Cuando se importan datos de un DB2 a DBF (con DBF_Conversion_Support = 8), los tabs al inicio de los memo se pierden (Arreglado en v1.19.49.5)
* </TESTEO Y REPORTE DE BUGS (AGRADECIMIENTOS)>
*
*---------------------------------------------------------------------------------------------------
@@ -3239,7 +3241,22 @@ DEFINE CLASS c_foxbin2prg AS Session
.evaluate_Full_PJ2(tc_InputFile, tcRecompile, @toModulo, @toEx, @tcOriginalFileName, '', tcType)
EXIT
CASE EVL(tcType,'0') <> '0' AND EVL(tcTextName,'0') <> '0'
CASE INLIST( EVL(tcType,'0') ;
, FILETYPE_DATABASE ;
, FILETYPE_FREETABLE ;
, FILETYPE_QUERY ;
, FILETYPE_FORM ;
, FILETYPE_REPORT ;
, FILETYPE_LABEL ;
, FILETYPE_CLASSLIB ;
, FILETYPE_PROGRAM ;
, FILETYPE_PROJECT ;
, FILETYPE_APILIB ;
, FILETYPE_APPLICATION ;
, FILETYPE_MENU ;
, FILETYPE_TEXT ;
, FILETYPE_OTHER ) ;
AND EVL(tcTextName,'0') <> '0'
*-- COMPATIBILIDAD CON SOURCESAFE. 30/01/2014
IF tlGenText
.writeLog( '> ' + loLang.C_SOURCESAFE_COMPATIBILITY_MODE_LOC + ': ' + loLang.C_BINARY_TO_TEXT_LOC )
@@ -24274,6 +24291,18 @@ DEFINE CLASS CL_DBF_RECORDS AS CL_COL_BASE
ENDPROC
PROCEDURE set_Line
*---------------------------------------------------------------------------------------------------
* PARÁMETROS: (v=Pasar por valor | @=Pasar por referencia) (!=Obligatorio | ?=Opcional) (IN/OUT)
* tcLine (!@ OUT) Contenido de la línea en análisis
* taCodeLines (!@ IN ) Array de líneas del programa analizado
* I (v! IN ) Número de línea en análisis
*---------------------------------------------------------------------------------------------------
LPARAMETERS tcLine, taCodeLines, I
tcLine = taCodeLines(I)
ENDPROC
ENDDEFINE
@@ -24529,6 +24558,7 @@ DEFINE CLASS CL_DBF_RECORD AS CL_CUS_BASE
RETURN lcText
ENDPROC
PROCEDURE Encode
LPARAMETERS tcString, tl_isCDATA
LOCAL lcString
@@ -24549,6 +24579,7 @@ DEFINE CLASS CL_DBF_RECORD AS CL_CUS_BASE
RETURN lcString
ENDPROC
PROCEDURE Decode
LPARAMETERS tcString, tl_isCDATA
LOCAL lcString
@@ -24568,6 +24599,19 @@ DEFINE CLASS CL_DBF_RECORD AS CL_CUS_BASE
RETURN lcString
ENDPROC
PROCEDURE set_Line
*---------------------------------------------------------------------------------------------------
* PARÁMETROS: (v=Pasar por valor | @=Pasar por referencia) (!=Obligatorio | ?=Opcional) (IN/OUT)
* tcLine (!@ OUT) Contenido de la línea en análisis
* taCodeLines (!@ IN ) Array de líneas del programa analizado
* I (v! IN ) Número de línea en análisis
*---------------------------------------------------------------------------------------------------
LPARAMETERS tcLine, taCodeLines, I
tcLine = taCodeLines(I)
ENDPROC
ENDDEFINE
*** DH 06/02/2014: end of added classes