From cff6226be2a2bcabb9e4a5859380d4fa834384d7 Mon Sep 17 00:00:00 2001 From: fdbozzo Date: Thu, 5 Mar 2015 20:44:23 +0100 Subject: [PATCH] Changeset: 671 - Cambio de la clase principal de FoxBin2Prg de custom a session (Lutz Scheffler) - Se cambia el uso de la propiedad o_Conversor por la variable loConversor --- ...rg__c_foxbin2prg__EvaluarConfiguracion.prg | 14 +++-- foxbin2prg.exe | Bin 517461 -> 517413 bytes foxbin2prg.prg | 54 +++++++++--------- 3 files changed, 35 insertions(+), 33 deletions(-) diff --git a/TESTS/ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion.prg b/TESTS/ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion.prg index d20a73a..9fb53ab 100644 --- a/TESTS/ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion.prg +++ b/TESTS/ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion.prg @@ -150,10 +150,11 @@ DEFINE CLASS ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion AS FxuTestCase O #ENDIF TRY - loEx = NULL + loEx = NULL loFB2P_Esperado = CREATEOBJECT("EMPTY") - loFB2P = THIS.ioFB2P - loFB2P.c_Foxbin2prg_ConfigFile = FORCEPATH( 'foxbin2prg.cfg', oFXU_LIB.cPathDatosTest ) + THIS.ioFB2P = NEWOBJECT("c_foxbin2prg", "FOXBIN2PRG.PRG", "", FORCEPATH( 'foxbin2prg.cfg', oFXU_LIB.cPathDatosTest ) ) + loFB2P = THIS.ioFB2P + *loFB2P.c_Foxbin2prg_ConfigFile = FORCEPATH( 'foxbin2prg.cfg', oFXU_LIB.cPathDatosTest ) *-- DATOS DE ENTRADA @@ -651,9 +652,10 @@ DEFINE CLASS ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion AS FxuTestCase O #ENDIF TRY - loEx = NULL - loFB2P = THIS.ioFB2P - loFB2P.c_Foxbin2prg_ConfigFile = FORCEPATH( 'foxbin2prg.cfg', oFXU_LIB.cPathDatosTest ) + loEx = NULL + THIS.ioFB2P = NEWOBJECT("c_foxbin2prg", "FOXBIN2PRG.PRG", "", FORCEPATH( 'foxbin2prg.cfg', oFXU_LIB.cPathDatosTest ) ) + loFB2P = THIS.ioFB2P + *loFB2P.c_Foxbin2prg_ConfigFile = FORCEPATH( 'foxbin2prg.cfg', oFXU_LIB.cPathDatosTest ) loFB2P.l_ShowErrors = .F. diff --git a/foxbin2prg.exe b/foxbin2prg.exe index 2d42321012d37263346a4703855fbd7184bd022b..454db809bf29af4a02861748e83dc11b96fc3b19 100644 GIT binary patch delta 17880 zcmb`O2Y3`!)c4QK?#z}XBq6<5S^_bICY@9Wq(MTF76REoAdM87;-XSjP>66vrS}#} zC{m;o0RbsW5fMQ|1(g;^0wjF@yR!)k^1ctx_q=%=_y0TR&TVt&+%vPwkH>vh9QWCz z%aEPl*3jj##kLu);^H&KO)`9)kGGacJ42>kk7ZiYg2=8|rn}2ZQ!@%wdV7_IHdYYT z_^_moYUkqHnWG(Ls?dKZk9 z*EmrMFROzsvO*v@2UgekD@MJ^NEE4*c%q`nn69@@yIWV+o@T{MR0`6d$X#-EjTI$kC$)RjDztanYqeWv!ed^elewevmM*bp3rv z5c-vFc`#JvZch!KMqaOQp-_Ewm9$S?<4LQZmfKTB!{T-oKE_69#D-kERY^aqtEBI2 zYaGe?DK085L!Zcgb~q(Zs&P^3XiT`Em4di|*W@DA*rBFKUR4vi^$<&fUukDbxn2>( zFAs0?dPOktOVa??tUfnBaiU?V!*X-R81f5p^HawZU#f5&!OKvE9bJFa6uo)gfn=ov zYPq%p%`7{x?)5ql^1K7Z{VSVVaW*$rJiF2{_Vc>h->|H`v;11a3w>VuoNC8nRh8=q zZhF;dlDfz9>1?X09nA~vo%{c3kEPz1wZ)68?Ec3_V|tmc;r_Ztn_CWYxaPG68TNdT z#U+oMT5+zO!lcKJu_@ZxA+@lq{mJXq-txuTjhtUKe^C)JeEx20YuuIP*vi}(Ze-Jn zoTGiM(X@Wv-YZsQdU5|Jt|NGvSN9>3_ra*E9dH}V0XNjWRtMgE-htxFPnwS4{Hn&{ z6HM36L0{WgTg%3Fyyu+H@G_=Z)1@Zgzf~@^S6g*VM<{Ua#PHx@ZeaSN$u8 z+>y0m|`}4-1ubN_gwQX@x%`5tm)cw`{ z2s8EL+uDBcyV2B-1nbx92kz&(NqDIr0nc91kCmWfvXyZWO3ht=24)PvI69`O6v)Pr`m zuh#=ag1R2Oc-5JMDENf^=QfB>c;T{ZDa^FDKi{xfx+rw=Xiu8!6&;XPSW^wp6Of=` zhp&(O-j01E3N3Yq>}qoOt=^t(RtZ^tc1qw4qEHmEcBl!&wr)z!Zdd3D8-5TwEed|R z3HHia9r#(}9D?Z9xs2K@W1)SOR9>HTPz%8#J~P$ACz>FtsE4q`&WM7qc(*?DlZ3aU zJMe+>-l20*N^ZgP3r|yg>PY%~dSn;vade>iR_IPMCu9!jYA1dk?+b60-H`-$SDub= zLp27OQeK}bI-3lgnVl@;WdxWY;JG)(WQc(w*p#;+!RbcG=X_-zWMo8{kdP1=8Kv^y z^+#P%)QwLK@=aUhapbP!`6fCw&atKyuLHSVl`KRVV^Pw9_p-aGjqZH9k84aj7)QBC6-lUoua0s@s^~)K<_afM&#y&R^yKrzCu50IjZ9se`aP@@^gn73Uc*2#Z!+WN2KKpH^kw8MQOtg)n>aB4L1~~W~D~v=450Jj~ z6yP$~UTNPNId`APFmvTCSkFb0Q~yKtpF5Mf*E*9Oo?Byj)mneEu*OByS_>SXmyN2k zs+`#VMUtaSvD0&Jd_wIx0qpi7siAeLv*Pr^Lq>7)Wsc0aSkee7tnFf{A$mWAf6Qak z_(vO7!apvuANj|4_H?n-NObpL)r%z;W;al!)tbk(hs7|rzMgXCbg1(lrra~l6TuX zNlIxa;&tVuWgB90i*nLqbAW}0{NIxmw=H$WB8VPW7#5SCn~l$}S@u%Y;>SM1heNA= zwQU+k8io}Wrsa=jyO&DtqV8R`XQ||B6=pkGDd9}a?xf@#`sIfT>j>)#4@`xb`Tagt zO!ZAGDydgu*IwcAsokQ(qoR8e>#|I86lSvC%dirTunEhgCc-4Pe3{fhyi&@(TPC?X zuiCDhucuzhKro=+zGhFBNnS?7F2$#%0*oUrGsn<>w_>rOvH6*WhUonK-2AxQ;j7JN zhZoJMF?x1r{JJsR#R+FW}$dUp?c;*Vdhf) zhZVam4a-h{E0W*ySs{^GnZrhHGkdJDKvD|~S%zV}ch^i-k?eW-RP(dHa)SN{ud3FC zR{~*hE3SSlcZKBQyV6_&T}p^eDK`cG{1y)K!v`EBjgTTJzPMl9_EtE=)Ey|-F&68bZ?8pGMh z_N|t@#0&S?FRKyOtl6{Gl7~z2quLgG<&LduaTaU7MsgOmv2JUm=HmHE_Vyadz3($M zzu0*DL&>@Mg~@q_VVP+>Naq!}St}lG-70J4rdVEDy=%;7i^&XRf3J~3#WC(Id@X`X zwuh`2qFI-2X7)tlnHU zCO1EOF}t%?@)fI_F#C0qWAO5z7mLIja*7UwDmE)JWakx*?`0U4o1gwi3zoD_a&Kwd zQgLF5W?^ZYh8h-c$j)tKcGywwP~M~Gp80Gc&J;q~&UKQ9Fo6BI4juTT6RTK3BuREV^~57u1u#AsUA*>FOeGh zz59;Rs57PIq-AAJNXw7N%H`oAF)lhaDmo^LeO4m*=^Z{$in$U?^OjwO9Ci^k3T~{X zL<-PFe580iSsK%39Y3KLkjjgr6PpPwl%i*=IE-rXp9IG$U?J(A_^c#v)29=lE4 zBU^etVL!v8xwVUXG>qRJqV52@y9vWN)kM|_omi($nCK;J@FvXIlT$2pljJ2wr4^=K zIm1?L!en)0$2OtMyV;#hn5-7eelwE5;;W_#Et`6Loh5F@m0!+AZpLYOY}RHeFu30x zUQkOeFV9n6R$5^Omgu1SwFMZ`S{HZup~4me?|@uWARSBFA~|V-Y82o@aeP-Ra*t&< z_Ok(7Fyeu>+@m***zs>W6Id1tVI^Cn0L^t5?y)je?da!W0?T6lOen>^U&tDlNhQblK>5DomHfx;7 zIV?OsKW+Rbws@EN?Jf4tR;=a{X1z^v57rG;PN}cNCB8Ca6QY%_|CO%z zJQN=j1eLQeosHOr0gLRDZBn4y)DcP%a}Z07O^A%^9TojJlbzUxyZa;d=Qf1fsZ8FE zz~3`ZDeO*cNf+5&{3VaYZI|5ig`?~2qdUp&EiO({*v{Oi#G=ByqC%eBbbPP2xtPpx ziCKoQm`p=fdcm^~*dA15^qQi$ttlnHC}$YrAuqGvY_(W0E>n3y8_NqB{}ngYvouXE zXK-r^>Em`2p)LHF--TYbx7wl&=3U}@?qs9Zsx5{GVElX8ZG6r?Swmr9k5kW`|6LxhaNm zgb}FlU(U+E+if6*mO?q*lPaKgB{%^HEr}}BtOvya~u`XH97@}bW(csb5pWn z@?jpkCBFt4af(OcK_@oKDN#Wyj*+?P1|CG(v9#Tiqo%v!W54dj&Do!QzFP{6A89Uc z!^_X-M_9}KXw|m7;leP z%r6&@dY9V+>WYthPhq9g{U&n?{LdW{JVmkBcBapV3R{e(@u!N(l}}v+`(v-<*d%)P ztE)Ru%8I-z45zL8v9c74Ik4eQL+3ruXfLQM`YQ=BgksQ*fCZ&Y{EO6Ic{b@krB z&5i5KpKmg;sjfDaTNLNZbsaC|_TajcgdGYilhcVULd}78yScGxU7>#a6}Fg*K=#vK zY%g6-vc-EP=eASN@es*o*^Gkg-D(#pS?n2gSqlL?x!2H9O7GRB`iY`q1pK<7eR!>$zuIh*F>F{S<#% zNh`!#E5*;Zrt;>B-+ZQx#i>tPvd#z5=_zdRLCMRhrY$eo9-USqQG9el?*jJeL8*n? ztj>z-d!KU)6tj}MMj0}&r6#4N z^NBvWOmSIOAG%JlDRH8Wi8|wM!U*yGN4B9b4Vz(FCcAQ2@=U+FjTi2WtrTuPT}gO5 z$uEB3ZpBeMQ)`bXT$heUM5gjLVA$VBoj&nm+0mytcQN13+olaVBJCJ-L~asfrJ-cJ zrHoBXC?Cu|y(2q&XHS#x;?$Nh^0QMjbMR6u4KGZ_7}UfcFx=STJF>6XeF58iS9WDJ zcVs6qvQ&X)caf*29Z(<*AlR@?cV#y=m+PHew-6_mDgJ6+IPs_g&F=wL9aF#nz@zS@ zdvXX~jBdOqw~&ROd6$Y)D_z*Ld$Nld^fNE&z=H3~K4P*N@cp@u@D4NHmsrPV`x3}Ve6qMmWA*F(869{JyXCz9<&?{OE6{?Gg;&Ua{xiDB7?d?16c!XFx-}A(!#)T(vb5TKIZgwb}P$l5`_IcD8VU!s$Nkm@jGmO%h4PX7tg# zFYMo8-BD%e5{TwQ&-sH0 zIUDJ~C!mkuMej4P(G~{!i|8p1t(wRQ+~yW4Ma%YJ4{$bg#^1QsU_bCY=m}4V0>C4{ zYoTYN?NW@;JwhJ>fy;&!u%hD;VZy`!FX6f0elfj zr=W8(1S*w@0@2Gw(DO6##!92ClOxbmM+xK#=Idk!bf+9-$Y8!sa-kpP2^0n9>%?O; z8bizd!86dQuFx0H3N%QE`QHzNd=A;?ZvySqVQRtI&~MztD*-)b1)b^*eFg8PLcn(D zly!hecN&WHr4^AU*rgGE3>hTS25<=YGw6}cL^=w76TAlck9Hzm0ly9Q#d|3qyoZW1 zT4NQ%kN{X5B~li+1bhtoqZpBj!P~+6po6=Kv=n>@+zWagj$Pm~@CE3Lu_7G+p9X8Y zi!>X@Y4DHWuc4Rr5a|;57w}2wp>ZM^|A65)80G@nC5Utv{4aP2bgM*>L>t^8;PjCq z1>}g7T93#J(-;qZ9>;8O0Js9$8LzIs1UCVPL!ZL29Q+3OF|;#YVU>Wxz?a5|^mvSD zq&qOQf}!zPkqU4;1iuMh0{u6Rr{MNrmvQJZ4wWr}5_rTck=o1_DHA*ZJP5kk9FaZ- z4+W2c_F5Cj^iixdP-1TTTUUM5m&a0*!eEh_t7q&V;-u>EO~ z+FlXqGw^)yXz27`MLGvw4*mjK{7a-i!8^g>(8k5LL~_Ts$cJIL1RZ)?q$c1p@JQ&P z&#>yj4!ARBK|jE;2J8$DB^A}+_1tE#Ke)N5LQqms88{eRU#+6Oc)4{B91gw%y~A2X zq62PA@G)zZkviL|$R38bV911?j-wfP0Qe;IipDAm1Mdd^0PWKrjezZOD<(iUOjglg ze2JX_?g9M+j%(m7a1HeP*cfhu3&D?us%WdP&x8G5br!&?R z*l{8{I|%~<9|M181nkF7(;tQtFx-Z&nxUdR@OiL5cAd_%RCEITD>xH+6^=*X8{mu3 z|Kh+;cIhVA^An72o{H2i7#)JmKs9m*csTevbU}%V^sYoj;N{T0@e0KcJPte+T8+0T&A{)2+e3e{ z6^(*tf%ib4*^b{OgBMvL{yzg8`bI^gVc3EK521f9!>oXBfTeFSWjLJNi2eY74t*9| zp%>T@LW1%_Zm!<@@%n(&*NHv1xMg4aR&+*Q-R z;J3m3pxZuE(RD$5u-;WRpbM;0s^|-D#&pYr$3EY-qLz9R%wU{W_n( z?0hd#x5h*^;7-ujew3&$I1uc7UZT6dNHiVX1MGWMqGf+bbP_xsd*i27XP4O82A=gE6LQ&N~YUj6~bu&^p_4Y;dgn|68tT6niCFiH}Goc zVQw-_0;hpzLfiPtvGcxIH*vjk})y`gGEHk zThOb=8fA)r!3u`!V`a*oAX5_989X2QZ6s?MU~ljS=%n}X4h9?n{s4O0WSLfg`+{#n zmrs$Y44evXHdUtRX)^r?9u6*ouK7x)8{mWBHVb5`XIzOX3qjC;p(FITbuw)MUj?s( zKCoG)OW?o3ccF{6%2W;J@qa9|!#0`h-oP3Gry)@+xFJ&ma4Ev|H^1X@IccbGD0V+Y z(^f7TdeB8fUp2>Vjc9o^Ttmk01sb{^hMf%IQ7F>TtZ5o5Y>9gmd~v#l-dUz0?^ei= z5zWe$YbbQRhK_?9fhTOxkn?s8Ikd)B4EEZsp)EKHzLo$xD;39A^bkR`_od=Ht zZ-8F>orbQ1KL8(s9(qzk72ql0va=exc1}Y9ZHPVw>wYk5C=kh93mA%F=mov`Jl;cq z7lX6^(a@@YHFN{K27Cs(ozzR~$ZVk&uGlhCYU)A^2}_6?CPGmYRVd zf!}b|(z|Y2Y7Z8$Kdgry;G?DPU~lk;(2fnYG#VTZj)zVP($XUEaIkS)Q!Pckp`~A8 z$b%stdNz)7Z~=H`Yb{Ogpe3(%xFf(jpdTY!O#yENw~ElxcRjT<9<0KKQv*HEprr@k zIpAZ^KaJDU$L$e>umQP`*V3wqS__if5M>!uLIYgi^1Tq0dMd| z{O=0z{9H@*VK|He5zw=7v;iLl?|{x;sHINetKht4TIzv(`U~()@EGW&8@03o?1~-q zG<55&TB-mCfd@kCztNIwC#)~<8_)-kZVv>%V}#)mpw+ipS`5QfaOP3Ga6GN0UEmV% z20ft`NG4@3S%C%}%_qT`^aKhn}^a4>ia{w3HC_*F1| zF-<+eRnVfOqc&am^@rhzPDktU^Vs>^0KNb{z)45T!5hKvLI-;55Im5Sg1bX+_tR1H zaLfq!HuR8&I*JDW3!c?TN2fz{Gz{#7oZtcUnN~Vl2JQgIt;!F4uPJ(Qb%6Vc$Wk|1wFA8od#P4V4-c*(H%U&q=Uo2 zj(c=;-jP*0x)>+wPb=4bbCJYfUyxUDrdlU6^9GnTh27Rozp7h-jguvJP z>FLi@J*9$6z*a-_bSPa<3|s~d!2{s_5jY=w6#N_XvC(?E0ImSv$=B0+MS2SDfja=a z9NKxJQBNIV2yBS`c%q)dz!Sk?;E$*3=_edtgIj_1)AV!`$3Ac;u*>?0deS7|E&?BcHp(~klnuiv7&<~v{TmH}Z-aM1JBn6x2|NIaV=Qz#trbm7M1|l% z(0x3uXbboXcp9{gj}>)KLSzKDgf8&6qPM^gz{{cM1Y6MTXS{zKHEG7}{7<$79x125ugLl{^>!rW&u|{t)jh-vi zv=`5Q9et2+!0^EZHF@FDY9Zpd7>bt;(7|{TI*g!V4{n$#(Iq_T7;y`^gMXMMQ7)cj zR$@U0fJd&9XaycrQn7wQz+ZkNksp#&M_m7G@D1pRNK(Dg*62{g|1QW)iZ6xk%a9ECxLUDWw{sa66^zS(4g8u~1$M(7$ zyXhC;f56G_>gXfvh5=ES5nRSd?1tyC`wfc5^>=|`>LDEkVR!o@8jA*e9eMzEvw1Pt zt-$r}q5*79UR|+WgXao}jM#kEfO~?M2OunCvsvB^4<6v$=6cHLs;9tMXs~NH>;t{^ zbQoL+p4JB&8}^Q_-EsXV!BA#E0c;kBuvtt7Pse7_341}49++aV*Cd2xgyuQm#bEtH zJ)K7=o*YNC2|RTT%CFbczu;Zq`_Pdmu;U^09t1ytUW~|hAAAAaw<*4GMPS<-mxP@T zhADs(2s|5lqA*ys%Zm0OP+USFa%h1?1bqN;;xqzBQ}8|L6^*UQ6LBI5d>%S>N7g%< z%JjHM+(F1e@N=c-e=;{ZHpQ(08`e?XpUjOEOmi9TdkgOUI%P2^xy%sCX`0dbn{S z!UG@E-Ki;qVley8gyW;3<>EOl_iHf7A zrGp!@dnt|~mJV)wCs}cfv2?tX?5Ux(X3xi#9&XgIF2A9Nn%)|U>#LlN-=x?5$=q1l zPjT$Gba3O~fr{gMO9wZ8GDvY;vvhFdjUkGo+|qGl2xfi5FvX)6>l!DS8~Yg)MWAYoWp~*P-B^zm3h8w4kP#hC29o+c6*)h-3!HrW!Drc;< zba3O3*@|PArQ^qJ%=(7Wisyu-hZ`N)Y4mWkV?KVwTcDKr*Rl*Zx{gsC_~N7PPv*u( bV-<&!rGpzUn;rP(;`!eP;bz?c?;rjj75D3U delta 17772 zcmb`O2UrzH)c4Qsy}P%8^e)|o6cKx@R2vG4Jt`tx1*HjCqq#BB7;7{{CmMUNSg}{E zF(zV6OiVPE7>%0P6^M%Of9?WaiQo76e9z01&Hew*ncXupJ3DiB?se5^@1IV4Z_y2r zV?NN3VNAZw5LYoOHa}p9k8@d5iJDE7>EnN8THc7LO}%9{#Gh%_Yv z4v{p^RQZ3WjdqZzL?+eCa%=K=@dThD6)O)CLd2WILV^V!@j0>hV8Pi0pO$Q2MB*B_ zME{rNHK_+bLC1|;Xz96%B4gU$DSlb*r1QIG2-bD*qCeQa^s1gYFbxlRC;3PPzMZsJ$-m&$E%wMc%s z`gG?hZmOER&<6+~$h)1#y_zjT_$3*jVv4G`)^PhH@vM2V z*VrFbzVsG?^IN_2=*OS-s$dPw!6q3hg7HV)987O`w_uno-V*E^bFkahgEce<3$v;S z#veg*u-)$%4D-Z)g4H(h_S7^__I zC3P^hD>uCO6~EyRURAr{&CJpI)ToHYA6#>^qIZmjN53+f5{$JI1npdt;3)*pT_kwm z|9gaLFKGrDlUfp^Zl?(p)cTjm*r7 z%t->$DlF~xc-({89#Lp4UbSVbRYI<>tuoODQYd@@4&}9wRPn?q@@|Qqu*3(lGos+D zV|L}4d_ri=HmQU$4uN#%{1Bep@VsK5U72L(z?!RtKoOrtweYznkV62kZp=FLkxPu4*8WmmH3+t{;v(~&4%_c1e((^WHcQKX_}ABA8i@Wc1TEw zjNDN9@A|V2C~97UkU83*es#!Q$5Thtag}3vQ+^R{d~QqOqu5cQ(iB z%)1*os=-|JnJc{ZX8EKJmBb=9;uZ(q_q@VgXc^DAdOKk)sK_vbd4`E=Tz}RTCH=UW zCt`7IwnlI?ahsjlWV}*Zf*!Nq631yi?9PmCMw=p^rH* zzqmCDAm@hbFDDoeRMcpHnKa%Rvntwc?pc1(ioUf&S#RfZ8*{4^v$ith?1Wsm9)^HM zDX)=A9H=~!U7I4huqCGi_x$2ZdiIl6a1j!A{i7Ayi!9)8$(nU#lE;)dgMdTCp~9iw z6=#sn&#AdgLnIIpzkx}a$;K#SdVEe+vN1R7p_a8-BsurFp;JmY(NJSvVtQg^R_2hj zq0ys~(nluc8B+`f#qC__j%lA5nUtJrObJiMWpbNU_-jylVw7?4$f1ehk&)2}2`Oyj zBB`eM%)m}Bl6-`j?Cv7TO9){4#gea3#DW$}LBc@Rcd_IzNNmDl$y->#7A=-)>08?> z0c#R_^^5Gpt}d1|!X@?>N}9&oDLyN#8@(dKDnhy2zqTe+S=U=w<2zNBeb3=_*_iH? z*3%Z&*oaDNKgZW)qqtRLZrL42HfM?C=rYdfwYy8#%9HeL{}QQ=VS%&a^rT+--BvoW z_@!t?OQv5c)j?w#@{b9u5C8CDCjN1Vt>zzt*mp~%x|sFY_e&)g*5d48-DTyiypJ^Mr{;Y{q>8Ob^H z<7o=(2xDxNF()rAr|k^IWN#i_@!jLvcMtE9*daPRD!O|EX179e6!x<^E2LV&6V`c! z6d-J7BUebZMXMcb;R?y!`NB@+d_8qHW+r8rJHvhtJF`OaG<~^O@o6a+?TJmxG)~>8 zSgdJuPFkKZIwvP9CpK&7&lP5eH_eGL=_7Mfm+h~-iuoKAcR!$5YAD5FQA&PSVYjB} zG0Dd4rg>>unPCZeIXw<4<#p6EGi}63V`9gs1&0*Vf1k?cZ1GCTx%cuSUO*r|M@QSH#5lmZ^a4$HEKkjj2pEqRH77g_0Q$;b86 z-xPO6w^#Q16BfEga&kR!N%30oLER%Q!rlS?XG;uJAjXy%vv& z{FrTCiy5yaD_$#kgcLoitU&jy(Nz^VfZZV8rPk)L*)!LeW4^IBnA)6Bj$ZX!Bd@goONE08M-gaS}(Z>XV{eWQZ1)|x=LAnMcEkK zw6pB+ddVj|sJ`OD1Z}=dcVjkce!jw5c|sRs=Ew)3N=XA5GqUr>b~h$x<)k<_X1*IR zO|@aIHb|}>y&5ZJY$KX>9cd$wzc<%T8^;9ZC(%g?`L>qvYlh5m9-ST+EW$iBT8@nYkEPxw$NSBNm=0mb4K=iud(w(w6Pphz^{|e&-+GGhq{YYA>t33A5E4)@c*gxfd*b6Gm2l zHhq)iEeg48BX_2;bDJ=Sd5&h@1(@S)3Zxo1!K(n%|0Wh)fEwj8V*yT&U{m=NChLtIosU4O-eS!_fT%wk2X?{+CrSjHxAm+A|{*_Q2? zGw!l;+c6TaG*Zf16CdjxGvhLieEEuG<=dr(LN*KCAvp&wXsHy^n@doMNxcB#BYcF&(=` zCz|W-YGh7@xF@?XtsS@=`HrW8%_{VKHgO^pxC?No*!c zn_?$dHm66<$joF+OT5he3aiB!i20Nkw6?rM;}>#M4NKGZ?c8KzX$t<9n`|vjo$qjy z9ZacJX^QV-ZnL*6)~1}B94t+v1Qkqk@s+4!WqRJgh#@49bx zxZxI<9sCU=Wn_-=oS_vz!3|GJg*_V+>)5{5idC=F!9308)KF|%vyBgT7aMkUx8zj2 z$cB47s$JtNJH@JW%ZJQ;kL0B}X3veDtl<&KQE%&D20}v8EmwARzgfXHl%155i#MTB zY01WpnM1O^WuNcC*lfer?UDSQLTW0f>1bqj3WgjuPwM)xYbfFJtq*s3RjbK!X15n} z;TG0#FS3ANSzk_RY%Kp6$L8;qg6a;9(qsvK(zS%dwU z`{%K4`z4naavJygVx>_=;^uUPt3M!(vbf!^s@xQ|3|BF^k5kOmi|2mG?fzB8*GyDc zX~dLCoNE225&b4B_R7jko~E!xYkJRCOs>4+BiQbPl4C&LoVQ=@K|Z(FuBt?H_Td4^ z#pU(_Zmv^h4q9wx^BoF!yh3qSZ_w1$++Mfpq@UOWeyvHHxVc`H`Q#Qeo3GWZ?smml z{aR&adtlW`p}Tmwz=|moGBMwT=Eeg-` z62Vnxyu6@r_3*2I<@S)Oa<`f1AqL{mT=x-P{8vda4vsZhO=-P7VKa+kdaHSKf9#w#436uAW*AdstP-l^TVsSM7?9 z+Z&N=su+nZFC8|0yI^>V>p+}^aRT#NJyL-m4b ze!O6_s)B2)I65;Kvq?K}RW)$l;VYWpGyMr|-l02P) z-{YsZL|A1m>Jr_x=W>=*BsFq7&{lC(Z&x_mRD_{4nw>3@{QWO=;iXz(&3bdOP2{f{ zeA4U~&kBl=y-p~QbdiVpDWxk%!K3~PJMyL_@>cPkj~+>b(~}0LWy-0F*Rpcw*qEb| zXRja96j$}it;^u{)>WN8YLvp3m)JR8u~k3!z<6eTO!8F6hev(Ktd2>(cHuL5$u?D2 zd&t@xliYiWixsnyY(^P}V9ktAO5uzAixrB?GG5{a#il$UL(J3`4+xr!?<6vec}ZC9 zlD=XE$E2DmHFomCZIJ=M&HFDtX{dRvOxUM5D!cCDafPeW$B4*8zT<=ieE6#~Zuve+4Avqa|N#^}ZHO0hr@3N4My)W0q z8_>M_vX3}+5sP~uyRzc@vXhvzU4d8kWp{D*5d|7Okllq=tm^~0k?gs*@SOmbxe9By9h6pBKV%vN33(1-Fqa5331H#F@la^tscu>!a?@_ zW7)Gs`gI-~T@lOEGW>QUHW9s&7!jTjU38PXv}O}tD&BOavaOG0AD=z{@-j$@ae73j z=pJ!zT*3Y&d-xb#IEB@Cf{>e8@Dtg;RSkO?=a>s3%`u01<1Bv%?l)Hn{x`~XU^AY` z^@T9D>xo=j=)x}J!*7N^FK@-`z^~UMJffl@l~-TGYCV|yh=*qH6amHmfyA<`?$aeD&#;%s4Uzf6%r8s{p^DdK}TphD`jqsD3*u>cI zuIP zFVV99+cixVPCvodOcN3Q2rBiz&HugP5y4;)gcYkbZN+QE>?Dn&ot>~vTrMQ3!fCM3 zP}oYotg)mC)*cZa5;yHilQj3@#j7Ig+e`DYaCO(EUYc)prhvmlekX`FiA0@n8)BfZ zpCq~j?hm#(1^;QHr{Gj@7wA3T;_*@uWrFWO>#&)LcL~Y{w}gHlhYL6d{3&$z?}+f8 zKx4okLl5|#s5baRA`^W97?0i05Ev$*KmqjU#YD}()4<1|3(gU>1J4HEgD(4ls3UkD zIP^S`4|YY7jnhJK0(3KMf+FFj<=`yn!54^9z-z%@L(ln{C<9!8_;d=e`xl~7Fzi5q zYtU;hqH17lic>N4ykChv10Mz-f}V_RR3x{A&Y}Y7JZzjIdnGiM7C|RpCPKoBAxbm@ zy8G`$8^O3VeE=PPg{TnxJL1zYK!=9$0k|0Yn?Hyy zg0WvpDxCBJ$93=vaMM4D8r&qh3l{NpRvPr+TSQ0zNef;GJr^6cFTti7FcbsM+{VJnNqysVr;`Ipyuz5g>q1y}*Xsb-*k6LCyr=3furZ z7rNJQyxHUXy5`_1&^0oVm4m~8tDL!e#wdao4R8v50r*q+d%H&ChCH?e<(J*gnD9V*ch+N-WeUmJ)#!7x;Ar z+yHzOdVa7-r@$@1zd$=<3+gg>JU9-zE4H7aOjbl+!7u@EHcF&)@Mdr+^xhbe^1-{n z_n`ZA5NSF17LCPlDx+__1Xtk&b}Rftx`e#!(Eu0KNr%uCs_+L39QD0(wrY zNTypb+<@U2Ag!xN55V`qpF^j_i6mO%aRcWM6RCTqNQpIwywHu~p`|Qb1Y8ST2Rb?% zJp!%|&W3)8VNIBp#@Kflzg(9s3 z3tBu8(E42>?E&k-QP714L^=Vk1HKJC%Ty#%DGU)X9ETos6ax$2+jauyL$5j}Qhjhd zxER{*q)1J{J;5!YpPof4!4tvlibYDjEYg?Y1>mL7`Bz0c4_*cS2D;&Gk^Tbj1!qH> z&fXD;eN#b6$xQ0(QicaRAy6->|F$yMPm+gGCi>1^a^sLF?5j zIspy>heQ8^-LdoF2(TCSy>42m2tQ<{Sa7M8%0!tqDzby29}HhX@4^ub?hk$e{bM~9 zg@N~jRRJpM+EPWof$i}qPJr&2prV0}n25mRpjFt2xdzSv2SabgaTh!iTsv7scZ|3` zzKk9NZZHIsd?|KXTEj30hOl8O+KiQ9D0m_GHuMMCDl&mrf!9Gt=Ba2dcr$oBbel0M zDgti@4~H)NKt)f$2f+8C-6yE1rZdJAI1+m1M`#fEH2A0qa36ax{b2YG2KSFuR1do= z+2EhS-JmmPspt&&8u%;d3pk#E{{(A3SCJ0d`WqASavny6i z@OkJ-*j(`ij|CS(H`<0S27dw`27Pb`dI|hF_%1YIU!@m#sR8qU2;k8H6^(#lI||go zGHAfkcNqL9xH0rh98PXTe}PXz3)oTd1iNFhY6%^58$AXd4IT>ZSb{<3j-?qK4?O_; z3B$l@OlI?-3Hu3d9{8}v{NEJtiL;vCgTV_0_Cj}aQ&Su`5IhUo3i}1A;4a{fT-R39 z67Uf4YUq7<-9HJ=1D8Qx2vO5b@MmD_25LIjR89JtC=1p%Q`6EmYHAHWV1nTyAf%m| zGGRCY9u8fzBPs=c3hoX4w6B_e1iN5148;ri(=;`Od*Yb~HyEa-@gvl<7TgOQo2#aP z$!huo`~|o_^!Sx(>gq*w1RS$kO*XsL)ZQES|0N6&fIlv%X&Vedm<<>Grlxg&sA;PY z1{C;L=&ldcbPqfpJOw)Sm70e860HX>fo`Ce=p^_eI0brq4T;?Rkf4BfK(E5T0f+^= zVzRpoz0yshDSo*Btzh^a@Q1fV$5CJ~*b9k3U>%9n{^&yRVCc9Yi6X%T;91aZ8cFmq z_&nGh|0JQfwM6H@PryPOiB5OGZzmCGx6`E(4bjljy(*iKc@uf$u?QPnM_%+y=ATI_Q6AN|aoOC<*NI zg+#~ZOSBXG5%?+ehl?b71pX4d3wriy^pL480EW`F5`Df!q73ja;1gW$k!U^mU+_Zc z6Z=s?umQ7QCSJW8ot3CVJ)#=m3~1X667>ex21i4CUy(?9eHt&kuJwtUfS*Cn zc9JOx+!6dU^cQY2eFPp1-Vfc%N2WF4Y2ak&1$D6#cpZioF;-A2pw^JtSy5inT6U^hmlh2vz32fKhzL9hQnrXgT&@Fi%|L~P}NBf;CC zZ%mSD6}S)BeKIQesZ1xpgTVcv^QOr36F3#T5;}Mh&H*0<4}orNT8%CXA^H}Ebm%o3 zWZDM43jPWD!B&|rg8u<~ZL|rjGhK|(GfhiiwYmC(mteL8z z4J$O{)dU)|+0&I8O5CWS)8KmGb(=I4y;DODO)whV(d0;6C66 z&|?p3=o9e!;H?KWCR%w!L!ZMi1cvXSTNY_(B{%~-`nZOyPH5-^cqF(PbQ2sufJcG* zL9aw^b^$yVdNwm)jfzZua?aPuEc8cO&{Lychg z5{8M;SCQOBf|r38{)3C()6fm@dNAGB(B+5dG4M{X{0KdQe=VeIj`s-gr_j5fXvi7N z*Ms0v4LKq?3TA_{y2eRZam zc7ZUunr6hT|wO0{SqHX5eqYH=!3U)>0erRq&D(S{k=fOAElaz^kCo zZPwB%up3s;SJ1{CTEfqlDG)pzy2Sx4xwgUP1b86ygJW9i51wFxp*C{w6y)1WVVDB` z>XeppinX*Cycx`(JuYbJCHNfp%gb8w{ZmUr+hVl?M?uHj)6#OV6PD-?pm#mfQZYCP zd=3AuOZ5sB0(S@3gKjA4s98JQ|FJMU(dpRYr_0^NhAU!35H-q1Uew3mo20jTMFho!HQ*l1{8?b#E&L5$tpTVVI zuUtKC!AoFhXY@AsJaqH~lb%|`P`eHmpb7XM4?F?f2)yr8J?WpW zZVPS$J#wm^&VXaUh0vyHdb$Me0^SV$3yz!MIIuijPlfsD5%3uB4d~IP`Fg4oi>Vcc zjnE$~(o-++KCp2)x_7mnR)Bv3_l7Q8tEX?k55Nw11N~#4o;z5tH~`xK+{SM;Rmil+$t1lrW(rk*ljI158Mbm89!2`~-X+`beOGMuD9I zu(pI4OqAHpfZQDGJq#a1x5Zm%d^aSR;33c{I97vKf*-{j=*0j76@hso+HfHLxdPro zL%I|7sE_;sx_pj-Zi0`2eZMf!G`wYQOTZum?}l!&(Lhc;u=WR{f*VZ+I~IDP<+1J5lo&>{$mGPo^t{5=EZgKdIP2Kwc51APz1KY7K! zb~ey4wH3wn!mAkgG4$mcRx}xW6#UZUVnx^S8msD!xgCZtn^{r%H&%2492SC+Jr~>P zaU$Ik@K}M};zeY+A~{+^BhPyUy#%{ryJ}zu9UM1Sq(ePaRKo_VDcICgMKkbj_}meb z5V%{8nm)z5;6+cOKe)g1DmDFscfZ!&XdMjOepXW~Uab~m9#@5;RgER;mx{L;Oe*%^ zo@o+kXW_*GkB|pg^*PGoO=dL)WG(RgH4^=Z7nMYep9bL52PBF|lIn>2p9ywAlDZK| zsuyDAgkt{BLY7*~Swrz~j>2&ZItZER+=jRX;BnBO5jkc*@cdBB|0RI0ktA+| zVL1wP_+CTzE@((Zj<+5B)z2Clc~L`s!F$2Jzak+;j+X^~3?B6qX*F`Z0Hkm)z-OVy zNm_~rJD?GDWi74HAWZ|ig1c$8G!rRU5xAoXhKN8deUFsu98#`$@Ptq;tw+M~5}Xb0 zu>|=5@`Eu*C?f*$=;K)Lo3%wU0v?C;zAe`G2jKPK`_PN9JdbUM zBo*8f%X1AZ#{)%+dpCW89XOWM==9+^hpFpIk*gZHI`4CNZcN9Ql^d) zam)t)1$NHTkt2?|;M?F+(C4w5E&$&HfBd12_F^^kk3x^&Hs)Y86px|;(YXJvFcbp% zVs*O}jX?vp!|FEezK-U_VBr9_et-a2oIKlOxdtDD_QT?{4%{7l9{L^@o0T0fOM(|S z)YIJddaBhCJqT{!K~HioJsks&1n-0-01!7H=`&Lg1{o*^6WhVqczkaI!w$f6Ogx*qVX6d&?KRL{OcWO}5ji%(AhNNd2bd>{F>wTg zeLSqNGipUOF;8>@O956iW>>56n$ncmTs%R@LGZ(+*MBlMM&bJrq~-Xj#p^$r8v`3C z4z#Z7Pv*wK?4xTMN7G=)vyGH8xm6{wq;ccIri$ZJO9wap&_Z!6wsde~LQBO_XzAd_ zv#k`zHaI8jSvt6JV}jxsW$D%ULJD|AonKl~34 CV9YN7 diff --git a/foxbin2prg.prg b/foxbin2prg.prg index 34c0378..128e16e 100644 --- a/foxbin2prg.prg +++ b/foxbin2prg.prg @@ -484,7 +484,7 @@ QUIT ******************************************************************************************************************* -DEFINE CLASS c_foxbin2prg AS CUSTOM +DEFINE CLASS c_foxbin2prg AS SESSION #IF .F. LOCAL THIS AS c_foxbin2prg OF 'FOXBIN2PRG.PRG' #ENDIF @@ -683,6 +683,8 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM PROCEDURE INIT + LPARAMETERS tcCFG_File + LOCAL lcSys16, lnPosProg, lc_Foxbin2prg_EXE, laValues(1,5) SET DELETED ON SET DATE YMD @@ -707,7 +709,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ENDIF THIS.c_Foxbin2prg_FullPath = SUBSTR( lcSys16, lnPosProg ) - THIS.c_Foxbin2prg_ConfigFile = FORCEEXT( THIS.c_Foxbin2prg_FullPath, 'CFG' ) + THIS.c_Foxbin2prg_ConfigFile = EVL( tcCFG_File, FORCEEXT( THIS.c_Foxbin2prg_FullPath, 'CFG' ) ) THIS.c_CurDir = SYS(5) + CURDIR() lc_Foxbin2prg_EXE = FORCEEXT( THIS.c_Foxbin2prg_FullPath, 'EXE' ) THIS.c_FB2PRG_EXE_Version = 'v' + IIF( AGETFILEVERSION( laValues, lc_Foxbin2prg_EXE ) = 0, TRANSFORM(THIS.n_FB2PRG_Version), laValues(4) ) @@ -2690,7 +2692,6 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM .writeLog( C_TAB + 'c_OriginalFileName: ' + .c_OriginalFileName ) .writeLog( ) - .o_Conversor = NULL IF NOT FILE(.c_InputFile) ERROR loLang.C_FILE_DOESNT_EXIST_LOC + ' [' + .c_InputFile + ']' @@ -2704,7 +2705,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, .c_VC2 ) - .o_Conversor = CREATEOBJECT( 'c_conversor_vcx_a_prg' ) + loConversor = CREATEOBJECT( 'c_conversor_vcx_a_prg' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, .c_VC2 ), lcForceAttribs ) CASE lcExtension = 'SCX' @@ -2712,7 +2713,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, .c_SC2 ) - .o_Conversor = CREATEOBJECT( 'c_conversor_scx_a_prg' ) + loConversor = CREATEOBJECT( 'c_conversor_scx_a_prg' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, .c_SC2 ), lcForceAttribs ) CASE lcExtension = 'PJX' @@ -2720,7 +2721,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, .c_PJ2 ) - .o_Conversor = CREATEOBJECT( 'c_conversor_pjx_a_prg' ) + loConversor = CREATEOBJECT( 'c_conversor_pjx_a_prg' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, .c_PJ2 ), lcForceAttribs ) CASE lcExtension = 'PJM' @@ -2728,7 +2729,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, .c_PJ2 ) - .o_Conversor = CREATEOBJECT( 'c_conversor_pjm_a_prg' ) + loConversor = CREATEOBJECT( 'c_conversor_pjm_a_prg' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, .c_PJ2 ), lcForceAttribs ) CASE lcExtension = 'FRX' @@ -2736,7 +2737,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, .c_FR2 ) - .o_Conversor = CREATEOBJECT( 'c_conversor_frx_a_prg' ) + loConversor = CREATEOBJECT( 'c_conversor_frx_a_prg' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, .c_FR2 ), lcForceAttribs ) CASE lcExtension = 'LBX' @@ -2744,7 +2745,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, .c_LB2 ) - .o_Conversor = CREATEOBJECT( 'c_conversor_frx_a_prg' ) + loConversor = CREATEOBJECT( 'c_conversor_frx_a_prg' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, .c_LB2 ), lcForceAttribs ) CASE lcExtension = 'DBF' @@ -2752,7 +2753,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, .c_DB2 ) - .o_Conversor = CREATEOBJECT( 'c_conversor_dbf_a_prg' ) + loConversor = CREATEOBJECT( 'c_conversor_dbf_a_prg' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, .c_DB2 ), lcForceAttribs ) CASE lcExtension = 'DBC' @@ -2760,7 +2761,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, .c_DC2 ) - .o_Conversor = CREATEOBJECT( 'c_conversor_dbc_a_prg' ) + loConversor = CREATEOBJECT( 'c_conversor_dbc_a_prg' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, .c_DC2 ), lcForceAttribs ) CASE lcExtension = 'MNX' @@ -2768,7 +2769,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, .c_MN2 ) - .o_Conversor = CREATEOBJECT( 'c_conversor_mnx_a_prg' ) + loConversor = CREATEOBJECT( 'c_conversor_mnx_a_prg' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, .c_MN2 ), lcForceAttribs ) CASE lcExtension = .c_VC2 @@ -2776,7 +2777,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, 'VCX' ) - .o_Conversor = CREATEOBJECT( 'c_conversor_prg_a_vcx' ) + loConversor = CREATEOBJECT( 'c_conversor_prg_a_vcx' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'VCX' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'VCT' ), lcForceAttribs ) @@ -2785,7 +2786,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, 'SCX' ) - .o_Conversor = CREATEOBJECT( 'c_conversor_prg_a_scx' ) + loConversor = CREATEOBJECT( 'c_conversor_prg_a_scx' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'SCX' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'SCT' ), lcForceAttribs ) @@ -2794,7 +2795,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, 'PJX' ) - .o_Conversor = CREATEOBJECT( 'c_conversor_prg_a_pjx' ) + loConversor = CREATEOBJECT( 'c_conversor_prg_a_pjx' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'PJX' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'PJT' ), lcForceAttribs ) @@ -2803,7 +2804,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, 'FRX' ) - .o_Conversor = CREATEOBJECT( 'c_conversor_prg_a_frx' ) + loConversor = CREATEOBJECT( 'c_conversor_prg_a_frx' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'FRX' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'FRT' ), lcForceAttribs ) @@ -2812,7 +2813,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, 'LBX' ) - .o_Conversor = CREATEOBJECT( 'c_conversor_prg_a_frx' ) + loConversor = CREATEOBJECT( 'c_conversor_prg_a_frx' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'LBX' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'LBT' ), lcForceAttribs ) @@ -2821,7 +2822,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, 'DBF' ) - .o_Conversor = CREATEOBJECT( 'c_conversor_prg_a_dbf' ) + loConversor = CREATEOBJECT( 'c_conversor_prg_a_dbf' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'DBF' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'FPT' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'CDX' ), lcForceAttribs ) @@ -2831,7 +2832,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, 'DBC' ) - .o_Conversor = CREATEOBJECT( 'c_conversor_prg_a_dbc' ) + loConversor = CREATEOBJECT( 'c_conversor_prg_a_dbc' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'DBC' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'DCX' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'DCT' ), lcForceAttribs ) @@ -2841,7 +2842,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ERROR (TEXTMERGE(loLang.C_FILE_NAME_IS_NOT_SUPPORTED_LOC)) ENDIF .c_OutputFile = FORCEEXT( .c_InputFile, 'MNX' ) - .o_Conversor = CREATEOBJECT( 'c_conversor_prg_a_mnx' ) + loConversor = CREATEOBJECT( 'c_conversor_prg_a_mnx' ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'MNX' ), lcForceAttribs ) .ChangeFileAttribute( FORCEEXT( .c_InputFile, 'MNT' ), lcForceAttribs ) @@ -2893,7 +2894,6 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM IF NOT .l_OptimizeByFilestamp OR .t_InputFile_TimeStamp >= .t_OutputFile_TimeStamp THEN .c_Type = UPPER(JUSTEXT(.c_OutputFile)) - loConversor = .o_Conversor loConversor.c_InputFile = .c_InputFile loConversor.c_OutputFile = .c_OutputFile loConversor.c_LogFile = .c_LogFile @@ -2908,14 +2908,14 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM *-- .AvanceDelProceso( loLang.C_PROCESSING_LOC + ' ' + .c_InputFile + '...', 0, 0, 0 ) - IF AEVENTS( laEvents, .o_Conversor ) = 0 THEN - BINDEVENT( .o_Conversor, 'AvanceDelProceso', THIS, 'AvanceDelProceso' ) + IF AEVENTS( laEvents, loConversor ) = 0 THEN + BINDEVENT( loConversor, 'AvanceDelProceso', THIS, 'AvanceDelProceso' ) ENDIF loConversor.Convertir( @toModulo, .F., THIS ) .n_ProcessedFilesCount = .n_ProcessedFilesCount + 1 .writeLog() - .writeLog(.o_Conversor.c_TextLog) && Recojo el LOG que haya generado el conversor + .writeLog(loConversor.c_TextLog) && Recojo el LOG que haya generado el conversor *-- Logueo los errores IF NOT EMPTY(loConversor.c_TextErr) THEN @@ -2948,11 +2948,11 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM ENDIF FINALLY - IF AEVENTS( laEvents, THIS.o_Conversor ) > 0 THEN - UNBINDEVENTS( THIS.o_Conversor ) + IF AEVENTS( laEvents, loConversor ) > 0 THEN + UNBINDEVENTS( loConversor ) ENDIF - STORE NULL TO loConversor, THIS.o_Conversor, loFSO + STORE NULL TO loConversor, loFSO *IF lnCodError = 0 OR NOT THIS.l_ShowErrors THEN * THIS.writeLog( REPLICATE('-',100) )