diff --git a/foxbin2prg.pj2 b/foxbin2prg.pj2 index 6ec139a..509eb7e 100644 --- a/foxbin2prg.pj2 +++ b/foxbin2prg.pj2 @@ -26,7 +26,7 @@ _LegalTrademark = "Creative Commons 4: Reconocimiento - CompartirIgual (by-sa): _ProductName = " FOXBIN2PRG v1.19.22" _MajorVer = "1" _MinorVer = "19" -_Revision = " 325" +_Revision = " 326" _LanguageID = "1034" _AutoIncrement = "1" * diff --git a/foxbin2prg.pjt b/foxbin2prg.pjt index 9c52a65..05c1390 100644 Binary files a/foxbin2prg.pjt and b/foxbin2prg.pjt differ diff --git a/foxbin2prg.pjx b/foxbin2prg.pjx index 8b43d7d..2fc34fe 100644 Binary files a/foxbin2prg.pjx and b/foxbin2prg.pjx differ diff --git a/foxbin2prg.prg b/foxbin2prg.prg index f2a83af..fc16070 100644 --- a/foxbin2prg.prg +++ b/foxbin2prg.prg @@ -7888,7 +7888,7 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base lnLine_Len = LEN( laLine(I) ) DO CASE - CASE UPPER( LEFT(laLine(I), 4) ) == "TEXT" + CASE UPPER( LEFT(laLine(I), 4) ) == 'TEXT' lcLine = UPPER( CHRTRAN( laLine(I) , '&'+CHR(9)+CHR(0), ' ') ) + ' ' IF lnLine_Len >= 4 AND LEFT(lcLine,5) == 'TEXT ' *-- Es el comando TEXT @@ -7901,7 +7901,7 @@ DEFINE CLASS c_conversor_bin_a_prg AS c_conversor_base lnTextNodes = lnTextNodes + 1 taCode(tnMethodCount) = taCode(tnMethodCount) + laLine(I) + CR_LF - CASE UPPER( LEFT(laLine(I), 4) ) == "ENDT" + CASE UPPER( LEFT(laLine(I), 4) ) == 'ENDT' lcLine = UPPER( CHRTRAN( laLine(I) , '&'+CHR(9)+CHR(0), ' ') ) + ' ' IF lnLine_Len >= 7 AND LEFT(lcLine,8) == 'ENDTEXT ' ; OR lnLine_Len >= 6 AND LEFT(lcLine,7) == 'ENDTEX ' ;