diff --git a/foxbin2prg.prg b/foxbin2prg.prg index da0b96d..fd4d608 100644 --- a/foxbin2prg.prg +++ b/foxbin2prg.prg @@ -6431,6 +6431,15 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base <<>> <> <<>> <> <<>> <> + ENDTEXT + + *-- Fields + THIS.write_DBF_FIELDS() + + *-- Indexes + THIS.write_DBF_INDEXES() + + TEXT TO C_FB2PRG_CODE ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 ENDTEXT @@ -6555,7 +6564,7 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base lcText = '' lcDBC = JUSTSTEM(DBC()) - TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 + TEXT TO C_FB2PRG_CODE ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 <<>> <<>> <> @@ -6563,6 +6572,21 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base <<>> <> <<>> <> <<>> <> + ENDTEXT + + *-- Connections + THIS.write_DBC_CONNECTIONS() + + *-- Tables + THIS.write_DBC_TABLES() + + *-- Views + THIS.write_DBC_VIEWS() + + *-- Relations + THIS.write_DBC_RELATIONS() + + TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 <<>> ENDTEXT @@ -6601,37 +6625,37 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 <<>> - + <<>> ENDTEXT FOR I = 1 TO tnConnection_Count TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> + <<>> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> ENDTEXT ENDFOR TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - + <<>> <<>> ENDTEXT @@ -6671,22 +6695,22 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 <<>> - + <<>> ENDTEXT FOR I = 1 TO tnTable_Count TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> + <<>>
+ <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> ENDTEXT _TALLY = 0 @@ -6699,38 +6723,38 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base IF lnField_Count > 0 TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 <<>> - <<>> + <<>> ENDTEXT FOR X = 1 TO lnField_Count TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>> - <<>> <> - <<>> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> + <<>> + <<>> <> + <<>> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> ENDTEXT ENDFOR TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>> + <<>> ENDTEXT ENDIF TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>>
<><>
+ <<>> ENDTEXT ENDFOR TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 -
+ <<>>
<<>> ENDTEXT @@ -6780,36 +6804,36 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 <<>> - + <<>> ENDTEXT FOR I = 1 TO tnView_Count TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> + <<>> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> ENDTEXT _TALLY = 0 @@ -6823,40 +6847,40 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base IF lnField_Count > 0 TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 <<>> - <<>> + <<>> ENDTEXT FOR X = 1 TO lnField_Count TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> + <<>> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> ENDTEXT ENDFOR TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>> + <<>> ENDTEXT ENDIF TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>> + <<>> ENDTEXT ENDFOR TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - + <<>> <<>> ENDTEXT @@ -6903,23 +6927,23 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 <<>> - + <<>> ENDTEXT FOR I = 1 TO tnRelation_Count TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - <<>> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> <> - <<>> + <<>> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> <> + <<>> ENDTEXT ENDFOR TEXT TO lcText ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2 - + <<>> <<>> ENDTEXT @@ -7804,12 +7828,6 @@ DEFINE CLASS c_conversor_dbf_a_prg AS c_conversor_bin_a_prg *-- Header THIS.write_DBF_HEADER( ln_HexFileType, ll_FileHasCDX, ll_FileHasMemo, ll_FileIsDBC, lc_DBC_Name ) - *-- Fields - THIS.write_DBF_FIELDS() - - *-- Indexes - THIS.write_DBF_INDEXES() - *-- Genero el DB2 IF THIS.l_Test @@ -7877,18 +7895,6 @@ DEFINE CLASS c_conversor_dbc_a_prg AS c_conversor_bin_a_prg *-- Header THIS.write_DBC_HEADER() - *-- Connections - THIS.write_DBC_CONNECTIONS() - - *-- Tables - THIS.write_DBC_TABLES() - - *-- Views - THIS.write_DBC_VIEWS() - - *-- Relations - THIS.write_DBC_RELATIONS() - *-- Genero el DC2 IF THIS.l_Test