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

Continuar la implementación de la importación de datos desde los DB2 sugerida por Walter Nichols

Browse Source
This commit is contained in:
fdbozzo
2016-05-24 20:22:05 +02:00
parent 31b7bd7ce7 0f4061157a
commit 86cab6ab41
4 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

BIN
TESTS/DATOS_READONLY/fb2p_free.cdx
View File

Binary file not shown.

BIN
TESTS/DATOS_READONLY/fb2p_free.dbf
View File

Binary file not shown.

BIN
TESTS/DATOS_READONLY/fb2p_free.fpt
View File

Binary file not shown.

9
foxbin2prg.prg
View File

@@ -183,6 +183,7 @@
* 25/11/2015 FDBOZZO v1.19.46 Mejora dbf: Nuevo par<61>metro ExcludeDBFAutoincNextval para evitar diferencias por este dato (edyshor) * 25/11/2015 FDBOZZO v1.19.46 Mejora dbf: Nuevo par<61>metro ExcludeDBFAutoincNextval para evitar diferencias por este dato (edyshor)
* 04/02/2016 FDBOZZO v1.19.46 Bug Fix: Cuando se procesa un archivo en el directorio raiz, se genera un error 2062 (Aur<75>lien Dellieux) * 04/02/2016 FDBOZZO v1.19.46 Bug Fix: Cuando se procesa un archivo en el directorio raiz, se genera un error 2062 (Aur<75>lien Dellieux)
* 10/02/2016 FDBOZZO v1.19.46 Bug Fix: Cuando se indica como nombre de archivo "*" y como tipo "*", se regeneran autom<6F>ticamente todos los archivos binarios desde los archivos de texto (Alejandro Sosa) * 10/02/2016 FDBOZZO v1.19.46 Bug Fix: Cuando se indica como nombre de archivo "*" y como tipo "*", se regeneran autom<6F>ticamente todos los archivos binarios desde los archivos de texto (Alejandro Sosa)
* 29/07/2015 FDBOZZO v1.19.46 Mejora DBF-Data: Permitir exportar e importar datos de los DBF (Walter Nicholls)
* </HISTORIAL DE CAMBIOS Y NOTAS IMPORTANTES> * </HISTORIAL DE CAMBIOS Y NOTAS IMPORTANTES>
* *
*--------------------------------------------------------------------------------------------------- *---------------------------------------------------------------------------------------------------
@@ -23645,10 +23646,10 @@ DEFINE CLASS CL_DBF_RECORD AS CL_CUS_BASE
DO CASE DO CASE
CASE lcFieldType == 'G' CASE lcFieldType == 'G'
luValue = 'GENERAL FIELD NOT SUPPORTED' luValue = 'GENERAL FIELD NOT SUPPORTED'
*CASE lcFieldType == 'W' CASE lcFieldType == 'W'
* luValue = 'BLOB FIELD NOT SUPPORTED' luValue = 'BLOB FIELD NOT SUPPORTED'
*CASE lcFieldType == 'Q' CASE lcFieldType == 'Q'
* luValue = 'VARBINARY FIELD NOT SUPPORTED' luValue = 'VARBINARY FIELD NOT SUPPORTED'
OTHERWISE OTHERWISE
luValue = EVALUATE(lcField) luValue = EVALUATE(lcField)
ENDCASE ENDCASE