Changeset: 449 v1.19.36

- Bug mnx: Al generar el mn2 el identificador queda vacío (bug introducido en v1.19.35)
2014-10-08 18:18:28 +02:00
parent 24683cc4ec
commit b4e7c2adff
5 changed files with 2 additions and 2 deletions
--- a/foxbin2prg.exe
+++ b/foxbin2prg.exe
--- a/foxbin2prg.pj2
+++ b/foxbin2prg.pj2
@@ -26,7 +26,7 @@ _LegalTrademark = "Creative Commons 4:	Reconocimiento - CompartirIgual (by-sa):
 _ProductName = "FOXBIN2PRG"
 _MajorVer = "1"
 _MinorVer = "19"
-_Revision = "35"
+_Revision = "36"
 _LanguageID = "1034"
 _AutoIncrement = "0"
 *</DevInfo>
--- a/foxbin2prg.pjt
+++ b/foxbin2prg.pjt
--- a/foxbin2prg.pjx
+++ b/foxbin2prg.pjx
--- a/foxbin2prg.prg
+++ b/foxbin2prg.prg
@@ -19326,7 +19326,7 @@ DEFINE CLASS CL_MENU_OPTION AS CL_MENU_COL_BASE
 				, loBarPop AS CL_MENU_BARPOP OF 'FOXBIN2PRG.PRG'
 			STORE NULL TO loBarPop
 			lcTab		= REPLICATE(CHR(9),tnNivel)
-			toReg.NAME	= EVL(toReg.NAME, '_' + TRANSFORM(toReg.NUMITEMS, '@L #########') )
+			toReg.NAME	= EVL(toReg.NAME, '_' + TRANSFORM( INT( VAL( toReg.ItemNum ) ), '@L #########') )
 			lcText		= ''

 			*-- DEFINE PAD