From 0baa321224e09a399ed059c04af6f265577eeead Mon Sep 17 00:00:00 2001 From: fernando Date: Fri, 31 Jan 2014 01:19:40 +0100 Subject: [PATCH] =?UTF-8?q?Changeset:=20149=20-=20Arreglo=20regeneraci?= =?UTF-8?q?=C3=B3n=20de=20dataenvironment=20en=20form=20cuando=20hay=20cla?= =?UTF-8?q?ses=20con=20nombre=20menor=20a=20'd'=20-=20Reactivada=20recompi?= =?UTF-8?q?laci=C3=B3n=20por=20defecto=20para=20poder=20ver=20siempre=20lo?= =?UTF-8?q?s=20m=C3=A9todos,=20si=20no=20algunos=20no=20se=20ven?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- TESTS/DATOS_READONLY/encuestas.dbf | Bin 0 -> 578 bytes TESTS/DATOS_READONLY/fb2p_frm_1.sc2 | 20 +- TESTS/DATOS_READONLY/fb2p_frm_1.sct | Bin 14601 -> 15163 bytes TESTS/DATOS_READONLY/fb2p_frm_1.scx | Bin 4303 -> 4303 bytes TESTS/DATOS_READONLY/form1.sc2 | 191 ++++++++++++++++ TESTS/DATOS_READONLY/form1.sct | Bin 0 -> 8039 bytes TESTS/DATOS_READONLY/form1.scx | Bin 0 -> 2123 bytes foxbin2prg.pj2 | 4 +- foxbin2prg.pjt | Bin 340352 -> 340608 bytes foxbin2prg.pjx | Bin 1583 -> 1583 bytes foxbin2prg.prg | 331 +++++++++++++++------------- 11 files changed, 384 insertions(+), 162 deletions(-) create mode 100644 TESTS/DATOS_READONLY/encuestas.dbf create mode 100644 TESTS/DATOS_READONLY/form1.sc2 create mode 100644 TESTS/DATOS_READONLY/form1.sct create mode 100644 TESTS/DATOS_READONLY/form1.scx diff --git a/TESTS/DATOS_READONLY/encuestas.dbf b/TESTS/DATOS_READONLY/encuestas.dbf new file mode 100644 index 0000000000000000000000000000000000000000..4c4e02144958863a92ce2b8ec8d4c0de48edd0ba GIT binary patch literal 578 zcmXru<>X~zU|=}GXbU9K05bzaK#;$$e~5n&P{x@NNQj^*@pN(ZbB2gHi(-*?cJ%Rd z^8~AK)&$Cf>_P@^uFf8g5CIo$AkBd+31kPk28a5DIJ)=)?KcMUxzOZ!(fA{ks}SHC n;HrQIGE)rEL=+SP6$~xSEDa5fOp&CpYc@hs0b%+DVrm8eIzJ&4 literal 0 HcmV?d00001 diff --git a/TESTS/DATOS_READONLY/fb2p_frm_1.sc2 b/TESTS/DATOS_READONLY/fb2p_frm_1.sc2 index 4c89247..06a360a 100644 --- a/TESTS/DATOS_READONLY/fb2p_frm_1.sc2 +++ b/TESTS/DATOS_READONLY/fb2p_frm_1.sc2 @@ -4,10 +4,10 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\fb2p_frm_1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -*< OLE: Nombre="Cl_form1.Cl_olecontrol1" Parent="Cl_form1" ObjName="Cl_olecontrol1" OLEObject="C:\Windows\system32\richtx32.ocx" Checksum="1767681336" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHCT7i+++c4BAwAAAIACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAOAAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAAIAAAABwAAAP7///8JAAAA/v////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP////8AAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACACwAAAEFwcGVhcmFuY2UACQAAAEkKAAAAAAAAAAwAAABCb3JkZXJTdHlsZQAJAAAASQoAAAABAAAADQAAAAAAAAUAAIAAAAAAAAABAAAAAAABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dABCdWxsZXRJbmRlbnQAEQAAAE4NAAAABwAAAAAAAAAAAAAAEAAAAERpc2FibGVOb1Njcm9sbAAFAAAATAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAABSaWdodE1hcmdpbgARAAAATg0AAAAHAAAAAAAAAAAAAAAFAAAAVGV4dAAUAAAASAAAAAALAAAAT2xlY29udHJvbDENAAAAQXV0b1ZlcmJNZW51AAUAAABMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA" /> +*< OLE: Nombre="Cl_form1.Cl_olecontrol1" Parent="Cl_form1" ObjName="Cl_olecontrol1" OLEObject="C:\Windows\system32\richtx32.ocx" Checksum="617849590" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFBjW5n1Hc8BAwAAAIACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAOAAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAAIAAAABwAAAP7///8JAAAA/v////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP////8AAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACACwAAAEFwcGVhcmFuY2UACQAAAEkKAAAAAAAAAAwAAABCb3JkZXJTdHlsZQAJAAAASQoAAAABAAAADQAAAAAAAAUAAIAAAAAAAAABAAAAAAABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dABCdWxsZXRJbmRlbnQAEQAAAE4NAAAABwAAAAAAAAAAAAAAEAAAAERpc2FibGVOb1Njcm9sbAAFAAAATAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAABSaWdodE1hcmdpbgARAAAATg0AAAAHAAAAAAAAAAAAAAAFAAAAVGV4dAAUAAAASAAAAAALAAAAT2xlY29udHJvbDENAAAAQXV0b1ZlcmJNZW51AAUAAABMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA" /> * DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="2013/12/15 18:50:25" Scale="" Uniqueid="_3XW0B1R2O" /> + *< CLASSDATA: Baseclass="form" Timestamp="2014/01/30 20:58:05" Scale="" Uniqueid="_3XW0B1R2O" /> AllowOutput = .T. AlwaysOnBottom = .F. AlwaysOnTop = .F. @@ -133,7 +133,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx" Name = "Cl_olecontrol1", ; Top = 256, ; Width = 131 - *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="olecontrol" UniqueID="_3XW0BXGCR" Timestamp="2013/12/03 20:18:24" ZOrder="2900" OLEObject="C:\Windows\system32\richtx32.ocx" CheckSum="1767681336" /> + *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="olecontrol" UniqueID="_3XW0BXGCR" Timestamp="2013/12/03 20:18:24" ZOrder="2900" OLEObject="C:\Windows\system32\richtx32.ocx" CheckSum="617849590" /> ADD OBJECT 'Commandgroup1' AS commandgroup WITH ; BackColor = 255,128,255, ; @@ -483,7 +483,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx" ENDDEFINE DEFINE CLASS Dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="2013/12/15 18:50:25" Scale="" Uniqueid="_3XW0B1R2N" ClassIcon="1" /> + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="2014/01/30 20:58:05" Scale="" Uniqueid="_3XW0B1R2N" ClassIcon="1" /> AutoCloseTables = .T. AutoOpenTables = .T. Comment = "" @@ -515,6 +515,16 @@ DEFINE CLASS Dataenvironment AS dataenvironment Tag = "", ; Top = 20, ; Width = 102 - *< END OBJECT: BaseClass="cursor" UniqueID="_3XW0B58OZ" Timestamp="2013/12/15 18:50:25" ZOrder="300" /> + *< END OBJECT: BaseClass="cursor" UniqueID="_3XW0B58OZ" Timestamp="2014/01/30 20:58:05" ZOrder="300" /> + + PROCEDURE BeforeOpenTables + *-- Comentario en método [Dataenvironment.BeforeOpenTables] + + ENDPROC + + PROCEDURE Cursor1.Init + *-- Comentario en método [Dataenvironment.Cursor1.Init] + + ENDPROC ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_frm_1.sct b/TESTS/DATOS_READONLY/fb2p_frm_1.sct index 4e33748d563755e28ca724f3d7cf6334f0304126..f9153415c027dc2835015ee1371d934e1cdf7803 100644 GIT binary patch delta 508 zcmeAy+Fi!Nz+i1X`J9RPMuo?W6BSq|e~@R{%+BP=Sf3IQy#Iq&}iUB>&x;c>9 zpD{ZG;c?Hr%o0*O>s(q?oL^+92hxYtqs!qQ?E~7|H&Ia1t#%^1CtZP3AWu31F$|!2 rl7#_e1-i!sfT}%#816Bk1t5>HY+k?;s>2?T96j@^?D@@q40t&J>->Ab delta 47 zcmV+~0MP%tc8PKX0021&k~bHzAmag%AO*7n0!;z4cLY!Yv(g4tEC+Ct?k~Ri&a*Bv F4G3#f5F`Kq diff --git a/TESTS/DATOS_READONLY/fb2p_frm_1.scx b/TESTS/DATOS_READONLY/fb2p_frm_1.scx index 9872f013354541cdfeb0971b39c7d57f9b10235a..9a9d709a16b15f2b477ec6d1cb99a9d30dbad653 100644 GIT binary patch literal 4303 zcmeHKU1$_n7`@T78bP5oYU*Ft)+CBVcXnt0Dg|d}XOoS4cQ!K{qk?D%LHnSU2KrK{ z3L=FTO0hl_>O=d|7Zs(nQi6hlpdu?AuAo!7E_Ib&>g>uzl8YsO5*%0;b`H!TiDZ^34E{Sr1qX7B#W{Q#xYc!jRWF)4+I)qNp4DuFJb0&%Zf5&S8aEtQzS>7G zYnD-}I5Oise!69r4XaWxY{nITy<+GU0~dfNd~|M9`pjH)LZ0!_@%eN!CqCboRlWWS zn8m6Fg>lXA{Gt(aL{xRk`m-6c4BN0a8997*UcjR1beM4GOP)@TLmz0MtI!7<=(sj~ zO9MR#eOm)P1%0@Io`yc^qYq+yw4LH#VdI`}ZdLk!6VXl1@s|*>N4^;y-4m&+rY_Hn zcdw2N6-qgC$c}7}Zyt(f6)RR!6jjY6k||Z`AcJ+_Jne5IF5o}X-#~3$`cNF*AgP-ZGVHsh!tw|35#TT2 zH1)y>(`49~^YDk-2mTQ_3LK~2)d*uf&ck05<-I|&2#X~%8C8jX`k8R*0j~%8fv>68 zM8?!oZn^|NEl0GyVS5i^bbF(b_i)ztf()r?KC; Gi{Ak52XUDI literal 4303 zcmeH~O>7Kd7{_1LgbG>|Md;R7h>z~~N2p{vJ7w5+XFEGpB#l(lgG41n;(~BMq;VjT zlnCO$LE?ar5F8{35s5@9;nW}zaY7s%_|Lu%@9xZWbtilDB)|9BKL2-~|2#8ocP2Px za{U6v*u>fatff&ip0Qj;u{sQsLs7?JnOM4ob!GL=E=^C{dL5QY4&BnZmbVn1V=Ozv zLsv6OJ}-{p^O0*E#~1XBp`y%NJoI)YuTc-a#6vgQH)a*C*Y?kUssEZx$}&Ra|8;V_FOjcw9Q$G?A zJ}^i%p;Wdy%rKcD&931L?}C@$EuHOW%9YuO-43%(o(RG$oCpTP(d40ev1t%_2wVZT zsa6HESTbju(LJ*oM9V(pz2GP~L$&Idg{0ZJX`6m{vzRpdK2x-; znZ;N=XaOPMH{6rOrP)Vn{2jS=He-!oG4LC1vxGEjY!Yo-kXM6sAWJnrhHkT@H2X!3 zr_Nz)J_rE?_zkyNN}B0&Mcd8DePBO0PBlM>#4Il>mhTBY+lkK3!dyo%- zd=oqcZ>Z+S(rspc#gN%d`^6Qp40#POz;>z$rLxswwq?C)O0yR$aOuDgP`8q?X3z?X h;|P8}ku0u^{`v2V#h*9P;x`Mg!yb;YvDdM4e*;a@ZL$CW diff --git a/TESTS/DATOS_READONLY/form1.sc2 b/TESTS/DATOS_READONLY/form1.sc2 new file mode 100644 index 0000000..48eceb6 --- /dev/null +++ b/TESTS/DATOS_READONLY/form1.sc2 @@ -0,0 +1,191 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\TEST\VARIOS\vcx2xml\form1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +*< OLE: Nombre="frm_Form1.Olecontrol1" Parent="frm_Form1" ObjName="Olecontrol1" OLEObject="C:\Windows\system32\richtx32.ocx" Checksum="238423585" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOBWdmE47c4BAwAAAAACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAEoAAAAAAAAABQAAAAIAAAD+////BAAAAP7///8GAAAABwAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAAC/DQAAOhAAACFDNBIBAAYArAAAAAAA//8AAP//AQAAAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACADAAAAFJpZ2h0TWFyZ2luABEAAABODQAAAAcAAAAAAAAAAAAAAAUAAABUZXh0ABQAAABIAAAAAAsAAABPbGVjb250cm9sMQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFAACAAAAAAAAAAQAAAAEAAQACAAgAAAB7XHJ0ZjFcYW5zaVxhbnNpY3BnMTI1MlxkZWZmMHtcZm9udHRibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" /> +* +#INCLUDE "include\keycodes.h" + +DEFINE CLASS Dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="2013/11/19 01:01:01" Scale="" Uniqueid="_3WJ0JJNQE" ClassIcon="1" /> + DataSource = .NULL. + Height = 200 + Left = 1 + Name = "Dataenvironment" + Top = 220 + Width = 520 + + ADD OBJECT 'Cursor1' AS cursor WITH ; + Alias = "foxuser_fdbozzo", ; + CursorSource = foxuser_fdbozzo.dbf, ; + Height = 90, ; + Left = 10, ; + Name = "Cursor1", ; + Top = 20, ; + Width = 90 + *< END OBJECT: BaseClass="cursor" UniqueID="_3XH1EYNDL" Timestamp="2013/11/29 20:22:23" ZOrder="300" /> + + PROCEDURE BeforeOpenTables + *-- Dataenvironment.BeforeOpenTables() + + ENDPROC + + PROCEDURE Cursor1.Init + *-- Dataenvironment.Cursor1.Init() + + ENDPROC + +ENDDEFINE + +DEFINE CLASS frm_Form1 AS form + *< CLASSDATA: Baseclass="form" Timestamp="2013/11/29 20:22:23" Scale="" Uniqueid="_3WJ0JJNQF" /> + * + *m: *metodo_comun && Método común + * + Caption = "Form1" + DoCreate = .T. + Height = 250 + Icon = container.ico + Left = 0 + Name = "frm_Form1" + Top = 0 + Width = 470 + WindowType = 1 + + ADD OBJECT 'Cnt_controles1' AS cnt_controles WITH ; + Left = 28, ; + Name = "Cnt_controles1", ; + TabIndex = 3, ; + Top = 72, ; + Check1.Alignment = 0, ; + Check1.Name = "Check1", ; + Check1.TabIndex = 1, ; + Check1.ZOrderSet = 0, ; + Check2.Alignment = 0, ; + Check2.Name = "Check2", ; + Check2.TabIndex = 2, ; + Check2.ZOrderSet = 1, ; + Check3.Alignment = 0, ; + Check3.Name = "Check3", ; + Check3.TabIndex = 4, ; + Check3.ZOrderSet = 4, ; + Check4.Alignment = 0, ; + Check4.Name = "Check4", ; + Check4.TabIndex = 5, ; + Check4.ZOrderSet = 5, ; + Label_h.Name = "Label_h", ; + Label_h.TabIndex = 6, ; + Label_h.ZOrderSet = 2, ; + Textbox_h.Name = "Textbox_h", ; + Textbox_h.TabIndex = 3, ; + Textbox_h.ZOrderSet = 3 + *< END OBJECT: ClassLib="bca.vcx" BaseClass="container" UniqueID="_3XH0XA3XD" Timestamp="2013/11/19 01:01:01" ZOrder="700" /> + + ADD OBJECT 'Cnt_controles1.Label1' AS label WITH ; + Caption = "Label1", ; + Height = 17, ; + Left = 24, ; + Name = "Label1", ; + TabIndex = 7, ; + Top = 84, ; + Width = 64 + *< END OBJECT: BaseClass="label" UniqueID="_3XH1DGY07" Timestamp="2013/11/19 01:01:01" ZOrder="800" /> + + ADD OBJECT 'Command1' AS commandbutton WITH ; + Caption = "Command1", ; + Height = 27, ; + Left = 28, ; + Name = "Command1", ; + TabIndex = 1, ; + Top = 20, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" UniqueID="_3WJ0JJNQG" Timestamp="2013/11/23 14:11:05" ZOrder="500" /> + + ADD OBJECT 'Command2' AS commandbutton WITH ; + Caption = "Command1", ; + Height = 27, ; + Left = 132, ; + Name = "Command2", ; + TabIndex = 2, ; + Top = 20, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" UniqueID="_3WJ0JJNQH" Timestamp="2013/11/23 13:58:05" ZOrder="600" /> + + ADD OBJECT 'Olecontrol1' AS olecontrol WITH ; + Height = 157, ; + Left = 328, ; + Name = "Olecontrol1", ; + Top = 72, ; + Width = 133 + *< END OBJECT: BaseClass="olecontrol" UniqueID="_3XI026DCE" Timestamp="2013/11/19 01:01:01" ZOrder="900" OLEObject="C:\Windows\system32\richtx32.ocx" CheckSum="238423585" /> + + PROCEDURE Load + *-- Form 1 LOAD() + + ENDPROC + + PROCEDURE metodo_comun && Método común + *-- frm_Form1.metodo_comun() + + ENDPROC + + PROCEDURE Unload + *-- Form1.Unload() + + ENDPROC + + PROCEDURE Cnt_controles1.Check1.Click + *-- Form1.Cnt_controles1.Check1.Click() + + ENDPROC + + PROCEDURE Cnt_controles1.Check2.Click + *-- Form1.Cnt_controles1.Check2.Click() + + ENDPROC + + PROCEDURE Cnt_controles1.Check3.Click + *-- Form1.Cnt_controles1.Check3.Click() + + ENDPROC + + PROCEDURE Cnt_controles1.Check4.Click + *-- Form1.Cnt_controles1.Check4.Click() + + ENDPROC + + PROCEDURE Cnt_controles1.Init + *-- Form1.Command1.Cnt_controles1.Init() + + ENDPROC + + PROCEDURE Cnt_controles1.Label1.Click + *-- Form1.Cnt_controles1.Label1.Click() ==> No hereda, es nuevo! + + ENDPROC + + PROCEDURE Command1.Click + *-- Form1.Command1.Click() + PUBLIC ; + glEnabled_Opc_A_2_Sub_2 ; + , glEnabled_Opc_A_2_Sub_3 ; + , glEnabled_Opc_B + + STORE .T. TO ; + glEnabled_Opc_A_2_Sub_2 ; + , glEnabled_Opc_A_2_Sub_3 ; + , glEnabled_Opc_B + + DO MENU1.MPR + + ENDPROC + + PROCEDURE Command2.Click + *-- Form1.Command2.Click() + QUIT + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/form1.sct b/TESTS/DATOS_READONLY/form1.sct new file mode 100644 index 0000000000000000000000000000000000000000..641214037242653e275b2c1002db7fc87052bdec GIT binary patch literal 8039 zcmeGhZEPb~@!3f(jeG8;2Wn3c9eYKfw#qHuUFVYC=?*!z+veoNxx^__F_`u4bG$ic z*R0oRuH{5Q2q7V;kjfwULw^AhLPBkS@C%{-E+BpYKg%B^kobdiR4Q%E%4G`Ua!9OBPf zw$U4!w0V=>G8~f*_pWD#)ar#K&9gpO5OsM+iR=r%U>}*w~ zRoZb}TJKZ4p|^W3$V`S*u6VNrpOL~hu_VUq!5cf@o1!kY@*%xf(3vI0FKFH04P;T!}U|f z&>c7~jK*iPWq(a!i)RwbVdyV2(+QRnt@Q*RI{#jnr`thXd-iI%eB>{&@$C z6ud69YJxyE+nvb7Oti?fpN>qsW?NpmIoU25Dbh{(!_bu9hVvn$x7*)AeTk;5!W>Om z5;i1EIZg1z$C+;)7!(2U1-|(vNP+7al@VsRm8QY1_ZdHed;-;(=wd>p&i&Vq?g6DgcTzOHAgptjVPX^NVR&YGLd@6?#1X8 zIlv?~FujgKC;1a#5YpSn-#}lFx}T}vpw`Y$G#i#zH&gx{d3G==~$pqSH!fi90i({V$4A~XYe!# z_G`9D597Wl5CkG-NaRW7o@LyOTuG5Rwd}8;i)`+!*4E0>m3(e)w^y|>p_r|D-)NOu zYHNGgZmIs-qLjX>rLL}Gs@ZPTAz8@{S!&e(8~iJEX}!9!qsZ%4tzF7|RyR+I-CoO1a5<6CB0-jR@PCP?=6Y^`NkUL~4ll6nD zATzJIspfqcyEJ7aFIXzIV?_pq7AVCKnc6oRiE@Aqot_cwOd z8Yx~wej0iW#u9||c5$A2%`zjXL633hNnr!`npp^)E9eL4SP8?e5>#Nkaid`*#IbL* z3Bm+MvpvW-w&yxf5VB3PZ9|t2j6*h^3$q(TJWv)lO$uJwOMw-aLHVq{#o#4GBTcYM zj3d~l+@;1%Rff`O*DtXlctJ*HSb+yHXUJ#ku1Vc($_i<5GkbnV>=#G3UbOz@|YDy|!~0X9Svx@FJ_&0%sPI^5ZJ0 z$5lj8p-S;Jro@iRRj$aKcR<7$YpIMikujzv)V&sC9ARUOHDDY#S!NjB%BZ;Y%Pt`q z#k?l1#EqCRe;ChfaULRBq7q8*Dh4qjmL*eoF|xb!f&@F3aZ`9Pvb*!rPR5IoC3rFA z8(}cJ4p9Ojy}h!D=?+t1oe}&J`cnX}vpIG=n8nMy)LH!N!f7I!gV%lx%M{BiK!#;1 zD*3M;jTn|4_GyLR6_BYqu0zIbk|7(WN_bpSjpM(Q5}{1yN!Ml5ab0GtQnJoHFY zg7F>zrcXZtPtYLppXp&JfWg@0lphp$cs&<=8AuJky728J*a&wi`~g9MN|6U)xO+il z#*&eLPrZcLs89rQelbI4OvcX(_uv?(4Yu;!DP6sKP1)QE%vhy!gj7ibh)n;4R^SW2uzy<@8bYvkfSGgKx$OV&HlX@+Zrq zY{xj}{(4BmtvXivJT;aywOGloED1Hgq6sNfU>-)%9Qn#s7HBK_b2-4s*?JwoBxCVS8uAVY=d@YE-8 ziKEYxtj`Z)5y}x?ojm&kTbhF3p$zy?GJsDY#Wu0v{q#g~d=d`A&wtYQqn>y@G)2m! z3um>-F1*nsn_vNl^g))BwS|A-{iy%zj6Ieks5`v>SgK%;_1P>Ni)Xtx{@>HU7rybO zD=+>2qw_z1eLA~9Ud~=97th`Yw*Ljxs+S?h<2(aZz)t{&Hw;0%=iHA)oKFgmhXGdj zB+*M>?Cwd=dczxC{mP!%u|I3+)N`c-)$vn!?~A8_YzzMhTi4xP%l6Ca4Xm}%iFrdu z$1lF*!!Ym*{rh1c6h)ly{rAB7#b6g|Ap@T*K^?x(biIz!)a`-gKaBpaqAsaTlXg0V z7n&XTS;cGjU{GjwY^&Go7+u{RP_H1BTubj=xqUmIYaUqixts8RL9sbBlxAOd&1O%x zceTQb+UyLJ6-hV(kOP4P+X8V;_C%rOdaYV-?@|Fv(G{t2bD BPh0>1 literal 0 HcmV?d00001 diff --git a/TESTS/DATOS_READONLY/form1.scx b/TESTS/DATOS_READONLY/form1.scx new file mode 100644 index 0000000000000000000000000000000000000000..6de218efa8ae50bc2bb785e7953f536e97b24d20 GIT binary patch literal 2123 zcmeH|F^|(Q6vxeRK;iBL$1$Ko2VuAY2}GP++v~uPOWZb9oTN!gTL}aRb+`c}Sdb7P zv4U8TKuGMYtT3{$@d1z!6B83303rTK+^bXEi0=2Kzn|lu{a)vT=<)! z{y_Ne@KxMOvb{f)KYb8hW@%kYHfU2e^c@e$3{$VuYU7s(_6L3$d*cjbh&}Q#^)rG_ zCmBCW$;8Z>lVqPnurKgmMg6Dnj}H^Fd1M@B;xA5LxDzDLOeAZi%h=GVv0V+tz!CgI z=o$1@v{i6ZpP0UhrNFA{zcXv+$@KabZ7tiZS|CWVh)M*W|Gxm}_Ihluf4*v#v2YnW8m+?b; z1 @@ -51,7 +51,7 @@ loProject = _VFP.Projects('foxbin2prg.pjx') WITH loProject.FILES .ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="1132857145" ID="1131721714" ObjRev="0" /> - .ADD('foxbin2prg.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="1144955831" ID="1130644423" ObjRev="544" /> + .ADD('foxbin2prg.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="1144982028" ID="1130644423" ObjRev="544" /> * .ITEM('__newproject.f2b').Remove() diff --git a/foxbin2prg.pjt b/foxbin2prg.pjt index c5cfb3dd46a06a8da8724d98a40b83828d112771..674117c8b368c13591a07401ef448a0f9d9d2ac7 100644 GIT binary patch delta 12308 zcmchdcU%=m+xM^C**$xxf*d*mir8YqhJuJxML|%CH6p@MiL?M>iF!0@V$^8NNgPeN zjnNb}SQAau7!z~b3qB_H-ZioJ2G4KKA|WR4=l$>bV?5XQH`mP0PQ7Mv(s|RQizXwH zX%`W7T|3v|skD~K%QUIe+7)(3d`wQKD(_SU$`W$_>!ea4QpQ|Y_xcUWf}}1K40+;O zMiq+`YV=T{n-ID$SIE&ma&1M!*3Qx!R;g{gwA$Le?Yj-q9y*ZAvl#sQl*q^Nd8Hc# zKRX-q(3c)b9JbwP-!B^XEBc?b;M&fl{q1Ifi=wV=Wy^C%;kf=ZNsYD?rhufNsu5EL$4hW5q)>-F=#>obQ^>k>E zEE}v!$6%?_+N@)e^u#)*<2$OS;jy~ZYUmW?+E1%=LEA*t0fa}Nw1#zBprvV*h4l3^ zYgDIPYfPAz^qqB3SbI~sR%uVGp5dwNd8LtjAFJPK)-_?VZgY&4bx}!-sHG9LMm0WG zyYQaUOlx|0jfA-n}T=1TY&X_Pgqa|685)XwcJOC2h`M5&mEB)aK;x;&C37nF^( zuXG}>?vK@Tc8}F?d-R>-GvOjrPOOA{S>&fZbVg60#Pdpz>U@=YMkn>j5H7*BU1ZVN zHnysqtIIu>tEzmTS1RPEzsDC2m32f@@EFnhMbpIw)Luk%JnVuu7W}vdHPF*}rZ#cZ%I|&X}`|z&TFzZFTU=O>Z!Rb`+1uR?CYzt^ za?9uc?PuqJXAY6@5-n{n(q1aw^wdac#;EATsOW@VGMDV6RHi))wubC=Ekc90s$vcktYNWOBC!sj_iugGxX%0Zg%Xiu5ZQK@k;iBYMk*82ON%gHhPy%fcRS9wU&)<-x?>C7waAANY7 zRp!$Q>!RUqyvUh3@%Bb3p(iH80;~i(dSH*P66-z&{f0HONKBShgz@R}(2)*2(^WAE z{VV@%6c)?+C@hr!??xg0|1%1`B}blYCv`#pPqUNW3U#38+B4DZq4bKRTHHzwO$RGM2@&?dFCcp|qPVIHAl zJBeJ06iVookY)_4O)YFBlSZ*|scC(Z`=6^80*K#Kl>jM)|9ONpmVV%-qpZHkJ4zIm z$&O+Q3(CyJrMbmNcmi^yiG1Wy7ARfhvyQTc_HwN5=T1DtsJKg6yaG-w%e(9HOYJlz z=&~aX!&|0}Ei%Ux=9o|OfMd*E>dM<6V-2NYe84f*K&r`_Q2cBS|QeWQh1ZyNEamxwT zz^mR=;m*j3vWv}GrRJ34!q?2%rLO#k6D&v?!B3uGp7tAO=uW=Gv%C~v_Z72rwy!P} zUs#-9pSL`TzBTdWlgz!@^f`a`NHQ0U8up>CIgmNOsB~-}b9P~Ij)BiU$$ZUtuhl+;%mGdq?d6N0mtNd6mS-09D$y_?3Fh?&ul$%bm zz`&wKx{JG*!7-wK-6^IpUu@95c-kp+$awz7Ddz2)vqX1xp_0<#+@j1_bbLVxCTq!u zeB~(?fVH&$6m$1p`=##ZM7aeem}HsBw)RP1^XI6>ZSOKY+ejtm(#%AR`6Ax*G;1K= zEa#KZrw&oEv6;!yJ>p{0KH-I@(bx02^)zcJAK1(%oME24;xx090{F4h%wNjmk597z zS=q~d&Y%SeJPbebumi%=ho`Ji3{qV_{tTwhDgK``ELa z^K!&I3YYk%v&>%}Y2a07Sv^B{b5_n)qp<7SXE}(~ZXisl2|ggbwAe$R-$MY;m4i4ra=g~t?8;f60ex{LP z^!crs&9nB)1hf{CQLpJ@8y!SVKHr4fptiHMi;(Pe=OIx#2xoUW#s;;Wug3A_7ckme zy7QC^%*TC6PvK%;+eO0)ynx>6pTrklK%>nm{MQStnJo9_w=S@z@`6& zI*=nJ6y#vKW)+KdF?@ioI+37+g5(0Tm}F~S<+&GGYmYsH^=x}eEi5k8r~4m6_{xi{ ziF|ehKY9^e{7C_SdXf3c^NP6FCFbAh=Tg0ltG;t*#>T}b^oonkOo>VwG)~W|`?su2 zTbyugJTJV2_UBLJA6#O=A)4hy%WMZgW>D97xbrnf*X;HCJX;B`N__a$I ztN1D0;WB!xVhV3{8QqdSl_y`um`d;Sg3Bz}{_}-;wLZivIw(HgzU40-6Q4UKInUfC zKG&R=QxdzHS6pV^mZ59(Y)48f9#xQyolW?tYjw5OY#L;f9BYrvADe`iQ*CM8b|E>} zmeNiMsZMPv=(&(wAX#dTo{5SK&9%0huY-{4)|O5<3(2ke_$zc1WWw{Z3bOKY$7K~q z=M}y_%6zO^|7%k@TdnBFW-F5@=Z;?1p1~JayGx zuh_OXdU)xY(WZ&%I?twfzg(rCH{WuVnR?vu76p8&du5%EAV0hxw$zlY;u5oMmq{oX zRw(LvR-NtoSN4mn?!Mgr8fLt|AMbjNdHP{m*=lkT2LcY)SaVr!wpntU>&+ zhPsCxjVeMsZ;p+Q$!sE|dKk*g>b*W8HZv+FCN4GgdUe*{yP#fEe*79{^4G8Mr`K4c z9-p@m75JkE@l;eOjxy0z39->*dm(y~+W&jL$cu(o-L86m5OLRhC8$YN51s8OHo99} zT1ubflxvB9NvXOtDwVJMg9V0fO4YMe@$`h)kr_JLqB;@Dh;8J(+G09RH6ebM!Cn7k zf!ZoPlMlYd{LNdcJ)J~t`pG9kqKazSPK<$w6%%5w_j}Q#nx5>~Uze(5y+MKk{xR9V z9K<*N$-JB0%hK~}4aFDPy7Xce&lqlFUUZ%L_HoSr_xi>c2t5#Ijz0Cby{_}ii>zU( z(CgRu#g679ud~38hbQX#%l@sW2)#j#zws@d^|$+FIuE?TJc5V4Bh;W8ujaFLuJu;C zth^Erk~e%{D-za$3zvp9MNA**{Bi>pek%0f8oyPa@uC|nuz~RO5eR zxy~>9jb17A#x;J^*Vx$B%a*m@>X|PWn)aR0o7EJ`_+DqdH?lSgdgUKut!~ow7h|(y zi_W!r$7PQ$d5IYp%|~Bnre?JF->Zv1DD>tvjc9m?|8$dicz$(M=q+mW?@!p+_D0Qo zFX)*sztQx|LT_19=)G$^$@=rUVx2^Hp<;Z*8W*#FF z>Il7Ejc#98=USVn2+LmVl!r|syFE6!nmzVKR*<`%rSIse=3-o}4pnRQaWVK@sV}E` z@SC@pukTe4-M0=EiG5mk78N;q^2|HTOV0J>k$12+F89}YM14M1@Vy|u;12Wi$ZsSn z=!l3(-!+ordZmwkh3~$@+Q{#}!mI8u5BYv8KJhN1yOwvEoxG+4?{pX8!yg^_t9KDj zG!GYn3y{6 z9`oo@l_8wMYAP(u)VX#=9%fy8d64RvdD=a!@FTDBGW@>QtyK7h*VN@OQD;{%$1`Ki z!*HxcXBCTs+BD^#St(gLB5UV#J*##LHqFsBee!LcGw(k0=ziZOc1D=-;tCsUF3H9v zN8H6X%oim(BcQ>v#etBLHQaV2KK@wGc(FDuU-H5CnNQs>%Kxs1tzJLlKC`RvIe&oR zbAde#E6&f%D$6R!HY*gL+$YKXG%x?J5+Gkc%R{y)Ui{L36?b|0O~DL!(Y=K|Wu zi*3JNe1Z@|D|L_60?tcZ+OGKU%cwy9lnH1fpH#%J7f(WtVXUU$={$Ld;>o9OSL(_W zjC{WEa`51L#IK)+@OI;FJJ6OE)zA%K=;9%YzTeH0U*4{G%E=zQVuxblt9B^<@(>%e zkze=V%1))tfH!Tv`1YKb8IzuB`)Xz&SZT>g)>>J~iMA|zib+mP#9c2Txz}kg@f1X$ ziJ3{svFVA)f2*Xa4}Wi`;w|Ua+?o|9DAGNM2-6t+3xlfv2 zy81c$I*436Ein_}fVf=#E&D+zkKLs-knQ96h+T?*y?}V(j&>(zA|A21iaa>QVMXt&Z#&dcQT9;K07lF6IxQG(=gnLK$9`t-w0UbqK!%o)Mw??D~QM(|C7 zE&2SS;E(dT-CjIvSs`z>R|%BAE#ZlR_m}Yez1VG{#_{(A4;sf;??t`oOv&HK>>aQQ4nVy!An5t1K0y+%Spt*ei zJ|)mKe}Qmv(O#ER99PSerJd{cEBz%oMB@D`6hCPVFRM@@q-egbLP>RqrZ=Tu`#J*&?b~|A|QrHCTQgMl^5)(Mo)#YkgyasP6&&W> zBHD19C=(n8PP;?&Em9%43wYRF{8kc;0gnXVggsf6XfGJy8@*yc;Gqs;QV;u?J01h=tw82ZF9Psa8v$sTd zk=_9#2%(SgP2&?^i9P_I1&8}dG~QpLh2TrzC9p#p;~8L_;FJryEk0;G2V4Av0O)`( z7_J&oOYkAscI_nU0`3T22iv*5M2X-q@Cw+MJ4nvO<3Ae0rvSHjiGF~?H1Iyy3-Tm71fGs@>yj_g)rk^a zFyf8DQ}I2(X_7?Qc0}jF>9cXun=8>G@Fnm;*h4;)Xf+rg&#C@Ad<6MiqN89FhG`@0 z9hmVZdyIb^gwju&D*|$GHrVx7+~Id)7%UKmLs$v;X`e*X!6U)1 zV!eHgv>YrZUe^kVGLY7SUk5*eJ^nCy4E#1Y;0Qh^9GB=m_yh1-*bmO)#_dS-J^15u z5`|ups26xY_$=)6SFrv@LpTOu=2eN3{=mcoUjjdeJ^Q*uUxV*~LvBcP?xsYW!T5U= zO}i!0ueT-I39bU?-;pT&9)=8T#KgJ>d(#7nu7N$lgB~LPDL!#H5!C}fhW&wz_16hP zG=x@6rs+uI!ExYr`1WxR3w{dtb?|5S%HfZ@_a5*{@NU>Gn#t7Kndl7oIP7ntWO@(W z3G=3Jv`lkiWolN3C;^PW<X?A_HweP35Y8pw0Vy(-fQ!M~VViIP zod=!+{t0%MOqsTWmw>Or_Q^sc!QX&)!j8?wUm9F6-r(D?myVJt8T``AfhV;QqKjd}UyC0$c{p&=`H=$jHqdyCk@;6QkMKQF?&afur2O-i#)L z#ZpVh=F%*P(O&Rv@P61~%^5Kd%mJ*F%gvdE+O%WT8$xFYXJEgB9cB*rRdCyIMyDbf z?E;SmPw&bow+ExA;IF`jBt|@y(Lhh4&EU>ycvvd0lW%!H^juJ!2Q9OU_U*~s0ut8JoyMC`53y@7e_AmN7&C!GD-(811~s* z|7~%D(HO9Tl{5DyqqC0~Jp#7}TV_3GbmcjtXg@4F2(v5Er3iy_!1>^=Muqm&RcIyn zGjNfcLJ{5yN%gReg3rMo;HOXr@HViqoH4B>=mIk7>(RcIK57&y#^ z-E5RXW5My@>@tP&XDIY8csBU+nF_7?9Di{R#5M}PxLBdlyA;|9UW%n0x?7=do+zX? zKx~1f{L3?iG(;N{gU~o|XGfJj@>S^>xSj=TdB2}ZbAwefH^hVkZ)>E|yRB7P11Re{17xv)@ zm3o6M;~_i&EQnO;RR|Nov9T((#j!XQJO#W7_VRd@-Um+yhjmjavAas2fvw<9gTOfU z+BZTh06qe{F2bi6@Ivq>uon+eG0a3?fJ1Ur`U7cHBaHuY2(fu8-OX2NB^=g*Ed?qS znWxY1;lN|EBgTfpj@c=!}F0=x^n7q;Itl?H-;2QP;`V5Um1 zf$xB?!7hCtbvCvj?!)%zY*opXtMn5b!oisfRFXbHYJ$TF+zNItBsXvzxW{6ZZhfs% zXK*e!Xel1JLZu?`1aM#2!+uoB3f>Q106XM>O7=~$&tNyrfj#O1dc^|aPYB-uE?iM5 zycv#Ou>Dn)F5kx+fV*S+bb6pt{v(xkg2i_GIqV0ODjfok1bbDf)Ede06)anDKiJtw zuHZuOOxW{~JixDmcf&q}WbuVi0>K$qId7yu@F;K$>}#@tg26MuE(m8ck-CFtgQvj` zw=+;O_zQ3sX9Hb8S`JV@e@Ha<@4_*tqO|Zd2fe@UqpYIMf zP;7Gp4Fb0ZkA?kxO9RaZM}mj6Hc(-xf!2VBf{h&w)Goq6H^7s@<*^33($hexEzmn) zheQK8r5k7#cq=#>_QY2Wv;lk!?3ZbvX=aOo&O#6eivKVJRg5%{PfLVTI6!_YGSDPM z9&dmff|tW?`-Xw0f_sBAU}sJ-&>rw;@HE)#-!hQe3abeGC+w`52J!&E3!XE}K$Y*K z(cl%}`c?ydWLaRKJO~FNr2of2tiD zOAZ)FK7xmWw}OLVSDrM`Oz;)(h%0EoRdj0`oL=Ba*jw-54Z%J*;V!{Gg#T$V7@P)v z2D_!A(JJsja5n6^xMchco(Nu7SF=#CH~y~+goO|`!?q99s6|^G#bB348g*)+krjLq zJP7t%9W>etR&WAtgl!+8(KE0oxFc>X=VCSTZwDK!#%c7phejFTLEveu944wG&%#G0giy(cdw!q?`miq%(#9 zJQMbuL?iVEmx8yzc1|}^9(WGeuAh;%4>!_J;Pc>Xu*-^#6dHkh9%6=1VSkJ?1?&cH zT4tnclZ~_xoMC|w@TQTnxseQAa90D*hwZe|NUOjN5LC2=z4!+s6+{yC0v~|g>sS0& zMer2xc-S9Q7|Eq8E-B!Ruzx@*1pf@qI%=euNK3(6!RuhN>qc4uwz$_vm<{m1YovfE zY`x$fuy^AtV|VZz@D14S+u6}h@b}=KVJ~;Hqbl%K@NPdlS`}bN6Qc2-8^KNbVRoOy z_)BO!qM&`Scb&xsgsXToc-%RBs=@W$ALkEEfp8qK9#^GeToMinhccPcaWneL1#+=O+%@A zjj+C-7mj=In^WMAupNKvNB2X>pU0GU?!_uty{2dmF>i4;+S=Zv$dJFLd8P z@C3wslM(Z61rG-AhrJFlUlray3q1CzLavDUN@3?9{RVr9FOF>3!$tB_>EmF8aTdgQ zuR$1$n2#goTL#VtM}??#0x{iVu&884M+6IzDz!w&^#(YlDbogk_lw;S7WpMJg@DmxX=ci{QS+ zDg_`SIuCY7BYuND2ocb2L`Z&Mhfh^XurrV!BAm|PyRf(6xPAxceQ)rjRtAd3@w^{&Q|gK*lu4vrdZpi?7p{vU%-24Qv{&UYM_eQ})51UJTU`87_*mN*UH0}uSj zKn-yEEdwtGABUZR(=HyT+fuOI&j>hhm~8{E1s{cd7%2va*SFx=6=(obckp-Mt~l%* zPvQJeg0KO?##4xXa60V-p9UX+?S;eWIu54`;N7sjaM+B*Ve=GR0bA<{4QB_Tn>WB- zi?iZ=uoF1@RgHGwEbznL?++eZqS1Ej{X4-y;L($?lUlIXcgEh{8A2TPdNcO+W8f&T z`x0!!*vpf#SBu#FSJ>;ZweA3CgGV0F=sC91W!Oqfz~v`V{)|Q@?35G0-e*xBJ7)-Z z8h8tAKWtpi*a<%ZAB5e0DR!oE>|9GA`~iDAHjWwCnbv_T#YTd4UWSe05codq%~ R_=(o)V7btVcMegT|1TBPH4=>6 z5mCgZIaaTQO-x*?720oFZ*khg$$DSap-&P$P3Z1DD%wvCI zRJu$e+vgHpgCSeopUdrEDRXLG$W%LU{9{Q3^VK&H}Y6@ysEIwtM*0j@$!gr>6 zA?=z4Qp!^=s_-GZ%IFF!T5kE!g%pwgTA(&gkF;jEz0ZnSn1+RP5>}hmgv5%^WYfct zhTaxMvCv?IqkYeH!|ytkJxbSD9QpG_>!gt+Jy=l}h6c2p2Ck_3ZGq5N*2F zVVbbflouB4yGUDQNgFD0G4`fPN1iX`joK<3SfVTH(e1z48`IXX7{||bRSsw;T4|^; zwMI)WCY$h{!ZcIA@GRkoX?J*_@Pp}Y_-J8-N#D^=SYw*rv7NBWw5y}5U$`aObL;+6 zzG(4M4za9q#E4W7y%s4eMnFqd7N+MNeO-K&Vks527=ssrsPrWW#Z7^o-0hZGRn=3j zj#|p47n$Dc6zV(A^4*TFRa#IwPHM+jbn4p8-m1zLRVx@-qNa_N`5J_4REYGZN}~Ga zR5M1t${3BbdiP#qtW37y5vFmSy9m~%U7bG?`kOj*32K^cjmo=g2iRPBjWzD?-{oM3 z_U4*QT|$K?rqV7QeRVddvder;9qoK653#AOUSGL((x!ljGy7dgvZ5bx8`=tiFc3Rl z$}?EiER*kESKdk|%;gsy1lOiXtjZY!rd1XVRY>%d=(#O!Dp)Y=e66FD$f)?psJPxD z?~}?LO%0B?@ue0*3;vg*(1E|T5G;6oC!v^6wFD-mGKbm{rpucgcoQqZUTADOam0lu zSP2vPNh`sx!E}b<`x>i2py!>chtHaRZd#$Cm-1hXJ6j9Q#lws*w-cO%hkSN@!H18s z7M5~98{w_BC8bA2CdWp{Ml)FfMg-M}wl$(%jR>w0 z7B!+hy23m&STfy>_1F{STc1eT^&Kc%UzDDhl+Z0H zvR8Wd*vOdJq|iV$&q~Sbtsh;4W!m#cE}dZk##3$7JWEQ_=V#>UyXNHTySGhc{byKHp(lTMhBXm3bGNh1*U2eT zEoDK`1^FZOhN2w9U%VG`gfYC}Eb|e{`0TUHKj2NYTF#lW^o98ahP;g2oUs{(_cC$| z3~9aM2Xs}l-H3PoO>m3(uDiKH)rT)ARZJYNi7f78r^W4F$ssBlELxGsXJCTLv}n-^n^Y zMzz!#qnNRZiBS{c7rdn=!dKk?0t*q6_<#$nvDn?n`;;+PzVHIGbaR`c7PX;FgFd53 zkE?yC&n&X$yDs2PGI{w0<|=IEFE22E)@bwp& zn`dOT-Hr+dD;+kEQcy2_Ucq!;evx?yFL~uf=80iI-o^?GkH@Nibew z?*8ek)VA%Yu*i@zJUs@Jn_q}UT{ycs#{~bg7xBO{td`q65kD4ulbY|rmzFUXO^ni{ ziSsh%FP84+6U&*aWo+-5nAomyy<a_VOisGlah_XP(aSSCkxy z>g2q=#amrw9?s==l`Oe#R>LQJ5VEv?K2x$Z=ElY1SA5B3<|Bp>-*Z{%vdqgaGhgu+ zt@7*5eXcOca-gNMF=)t>_(XrnQ~c0|_q>ApF0$hzt}q|V$&PBi5Am`_l8^IP7nSSu zYqdK+egzl*+)K&Qsu$1j<#tzDL($it2VcdAR5a%A;n(?ifVoiJ&U?1vpIt@$@-|AA z&RpO5yD&4y4zv-h$dW~f_^ z#VaN&!qU1QD7lEK@qFbqbU7n|AGpSvSym;e`M$&lwvv3sc}cv%b=-ek?JDFQZ!q`zX=Bv74(hg_t}eZFbAWT|BVKp|-OL%s=igwBL^huP za)UX0Oc}4%sdg3Vy<$@$Vqiw;dfB6&oF!6q%kB zo0yQ45}Q6*&3CT7c1mP?d~8kjo7voO6PI1Ggny0ZjIQg{;x^PZXLLfYKB#MsJ~yi{ zVuNb7r-aPW3B^T)Ia%f%Ehfh>Xrr2CO(}-r{7gK;N;Tmp)mmp^rI}6Eb?5BH&q^tq ze@(_5!%zDZo9(~097Ey-#Z<4ZsX?V;va4$v%S4#$>zZ6G6_Z0<(`g&Ucva-?>;$t714KC2ba7F#-N;gH%e+fExT-dt*`_SvFU=PBcN=kYQwn;JbxqsDvDJ>bUu{)y^Cx$H z^EUHNd*QB>^}^_4%T3HM6za3$@`n^Ct;cw%S#C63vG*>{%}vo8@^bRA5>(&n;i;CW zrK2=VurBd> z&wowHs%bL#~Thpc5+i#bqn$+2l`tt_&nTxohKmX+( zb8qzU10}ZsZmYJ!^1-U9X0=Tn!r$D()}+fdR}CATr{w#j+wbxv|=@%;3xq*FO znoZ_0?7P+UzuO7=O0oObUfu3%mEXOKg^Lt>quO%omYUhzc(cOQYUaC@EWT6hjcY62 zUdwksU@oqO>lJ>KklZW;Qn#`r{@w^WDZKZdUBgYAYp`sH~3Dz#Y6ZPPfg3pA~EK z+EROeQMt~zSRXc<)U{Q4*jz6x>QBYkqPCvT-zvY`i3Kvu~LQV9XH~MlGXbEERBuT z_L`+JuHt`}`x38%@UE-&l1r*oez$9z5T*+hM4EopE4_%RhIb3z)G7A1wGHCsnVH`$ z7i+87+trrS*z>WEnRlDN92I-;|JoWGIH_6c_MEIY;H34Z6F=~n1z09Ht9g#Z`>c{2 z#cR&o?g?}C*SV;6J7v4T8Ah$8?3Q{DH3tFCo|Te|*SFsPzmi!#eB2Xke-Him;wQ|@ zC8v>6G8Aq?-6wj*_D(Hq#*aN=K^`-ksd?|-?xU96^C=$q^})Q;Q|2e$2;mt|Sp&E6Qgp?ytVJDvXj#P^q7pIjIM@)yp)W=xfz3V^7kaFxpjLoqEAhY zRP(N{99fi;PO+gdXJkS5BsKTl{=H6B>|qUR=VRC)v*ABC>5#=Eo?*ju&*EdBF>g6B zGUjBCB7Gd93zg#Gwbixb__}Azy|3LQ)o!o$Uq1vcE-@oZ@!Wq*Q?u%Je%nmdrasTV zn5iQcH*P*As%xIUCZNH&p=5uCo+~d-5hBp_MG{lgXo-r~bKT|JJ*My{A_80la zeNqGQRv8!eOK$x3KFL}9_Pzo^qE)48?6qI=5SLcNLH6l-|i0Vz-%qveYZprqEBA6I_eoRvb3rp{e;yum@qRSZxKyyrpm zDa@JY9z?00&U~5jJHY(w#BUyy>TB|xCESo{V|Q0xasV~QJM)f*BzJL^Gw*vy@(w@e zs^lZYj8E^C5R)38V5P|D)MWGf!$$5(u0}B-%KA^1-i!Zu2*)F<`n>cIdT}L?-#a9E ziBDT`tHby`6wCt-OWxw+_PqOH$xqb8@Z7^vebFcW(oYy!;-%k zo4{Wvzf)3q{Zh2IG?jNLm70is`|+WrlAp%VPw5JOR4O_0)KbY_v>eE{B17yjke@A; znu$XPam^8_u~;yOw>%;>^cy)ysbKCif}r&G;$r*Og7R*3&LCcR1Q+-`n=d+ocD~8x zdlddCm)}zOt6Xk#6dm~{pSL_J`G^|~JW=7p20r4bi>7d&V_?lR9(xQtZ#o}x3?0wV!{{yX*e|{ zE;`TCpky3`M{pAsS|~;F@b}>Fpid*s0sjDgqcGlvAhMxwv{41U=nvFkMEeCY(qX{-gG8M$LVuya9_ZjB zL z0yhSqxW7=oA3X~2;AVgtqxERtD@Of~7yFep6PzGEMw(}IIkGDVzzzBF~ z478@PKpVgg81~N4I=tX`0XBLm27nb_YglVBbl~ryF9yLIfrMe;0x7;*H2^E#`j|42CFy zZpH|-83jH8uZ$Haf0#fgz|%2rj=2Ku9w*Qx9qt(14=)ieBMq`3x&m(Yg+LEx3A6}& z9sJ#FL@sj$S_j6rCVCECwoIUtU?*i-mJ76aJ&xX%nEzN9;(iq93!LKzTVmmX12+k@ zV~aqe!O7t4t(ed40xbde1uxwp(D|JL9R>FXe}>1U@osbiJP`alH2sP?;0*9u=x)E^ zOk+iq3BC?};~+v&BMjLvOgSXbTs&iw!Nb5oM+F*=^bNQG?0gJyG}3zT2=Ec;KBq8Z z;A!Be&{xk0^bkB3JpHUdhs*HVz?x_qcz8Lc_ZmJNfRBN`uq(LDbL79mlL7VyABD~l@cgy2L1h>uQKW%LqrkCX3ntP*Ymvr-M}Uj*@IS!= zz90M}c$t?-Vt`1^ZHdaj8=xmfi1ayFS-34C@qIN~q(=2Hyl zj_0p035dEZ7AYTW053`q>DGH9%>mB>&&4s;aga#AfmeZdLqAAI0u`Rr@RsAPm$4na4vWvjvD{q zSb=Z)Gy^=zg3)#yAA+4R0^rBX@ z-RDI*qcLDhJPE5mV01d0k>p0y9DHjSqhAe-lE6{mA%#XpQ6m{mham-q2hgj=Gg=2O z2Iov<teuIxHKQKB2 zE(8A!{m*(v^*pd~foB+hWHfXuBTpC@9u2P&G=6|lA8;4&IcUQXGzd-r+aG1r_#~s- z;8Eap(1E8IHS&a$0^fvga+Xm9co}#v^y}MEe#YnuxH+CAV+p|V6&mq^ zXMg^SK5>)C*Bgz4+afyk^^hnS z{5$vr^mtE+BEg5j^}Qr|fYb~8rw#W1+1?V3@sp?@3=dJDVMB>L{Uw?Nt^gl^KGsO0 zSzvqur_qfiS{N$PB5)#}_2>=~<@A)u8ece9fZgLI8ig?PWAIb3f4W4)I5FG<`{7Y_ z9wO1|T!{i3z}?rw{@)#uMagi9`oPcu1-3({j*ut|+z~v}AkqA(5{(8=0Uwzr(YYn~ z=HWy157=&*L@V}5v>ChcD_y%!P%X=Tc3h)B!)D9iMRt4ue* zjz&DouiRwX=_^yBKT$jIBR`q8wUB8cxF5K*wM-dpWO@nC0MCH_3`uT;i-CVs^4j7{ z3wQ|l@Afi%7$Q>(a6Wh*v2vU>;H)%oKbd?QW3<2wp;ITg#g^cC;Qi1?2guX`ybwI# z1DRal7C&f=`Ckr0!BCm%BfeUI0&Bo)p%=pqt^;oXkNy}VgcQ&OdjPo4IGL6rwFYkm zw;qqij539Q_kdqOcbh0vSMXu*DdhCBe@XT`7}M149lB9RM*%R^Vaa zd}wDlc02F{a5(g5NNvGWz#E{4$QlX*F9hdUYN(!-hQ0zX1BXG!IcsPs_&9hJ^fq@5 z-2s<_FG3IW)fmaD1r`kU^XI-ADrl;qZs6wNRnS+OX=pMy82ot)4J~M^p~c`daNBko zO7EbdGvHC+(-9hS?5?5CfjCcq+e3%;(aODqsLkhi%S`aVxXL%<&3Q_zD(p_AZl;EB+mp?(QC54-{T@+1vC1Q&r_ zCu?ZNGz|%@Fdg6>(=`-;7`*{_6*wOH592%y^@ZUe3=|42EMzG!%FeLkQjuPJ|9PtD%wLi(u1Lbl{qXUVyKFKZL%2ADsxo zE(i~2{{Z?8<{jJv+yuHG{$gVxxDR+HbSE1vtpgW<%WbtrN_5uJB^c(xa0@!vOG|ET zFW|XW&tQDKrby_kAE7<4H+Y?Kik31z*HT)0 zI2#zILT~s|OEbag;8P|o#V*j&Veka-Q0PfZwZuZ;T)+!gXent85_k`|7&>shmZpPG zgMZnA5!tGxGvIUJCD3C_v{VMZ3N}jHw4~dvrF$^kf?*AG;SMdm20sL^gf2yrLx~=P z`~R$^-M?$e3ha&;p!Z%a*&ozW6gUL@E%fP9E#-rgzzzSz9U~mx49*3QJ*6eDGg>+e zp5}%9zx^f5;cYFo=zv`f1qMLVT`heHJ_hav9ry~12&{q6zx75-1y(w;4Z}MF@G9sf z_BzS|r-A>5{>N2Ei@}9pD>ofYY_6jd;EUj`(1Y6OXjnMn3vcZI69LVl(FhD_2om~3 z&x+MitB#lg@K)#@h{rpEKLp=_?$Ad^eZilA+okB}ai)&eg3o}RvvjmPUq^nO@b`;| z84f`2L&^tRfKv=Qaz_0A893euLl3}Ala3z2upaz7bm;dwTG$z900b5Np^t9SQNJ$u zb6jvG^q4(5`W8F}{4Mk^r8;^I-U7Z3eHH2b2pnp_Gyc}mR;0P$?cj3gmbY~DHP~o{ zC}j{J?tzXhBeC^@i=m%a>ZmRF6R`Um9qp1WXft>{_%8IRdKPpWds+df`&#R z54^E2I(ZIWQ@|@1Kdhnih>XfGIyj1lf)mQIws3rRhyOwBr)-@9&A?G94~K+~D`*G0t%K_mP_%jzqD{wAY=ZrtA1uyP~GXmoN za98*igjwZ78U2K?KH3fI0sI5P{uKz@@4Fc>Uogy{ix3$x-+Xs$i{QqH`Bot2Gc>>o z2kQ~@T|>;rFnoQ$-z}AB9b&%q;1uvH=yJq-w{iD4(^c??;4RQc!)08FOJc1w&e{ zOegbX+73Pko|KQmh=`7Yt7(pHCO}hHxb^h4ZPV>aJyY_JaA?k!E3-$sfI+PmT*>U!P}ur zklKR32M>d@3pop)9SXw+7_P(9^@MlY4E`I;Y_${(XLK6Q=`8p;bTpjJdvG?7z^|c$ z;9MAd!*lR8=!@_b8VKC_>ep1>DqvDZ6+R~2aKG4}q=U}YLte2ksch`qiE_Vyqc zhGVavjlKO3a0obJnU=z_mxp01js`z~zKpGP6SyDvt0P)!imh~BD8euBY3SMKwe%KT z2#&dc`q(+WuycL{z60G28`n$lY;YBH@JZ}U^RaU+fWf5zI~g{PVr)d~zyU|Fk>EMc hz(!FD_Q6|&TX@cc`O`M?APePx4=Dc{&9U$F{{Y$Pg+TxS diff --git a/foxbin2prg.pjx b/foxbin2prg.pjx index f5cba3eb3c47eb95f7436216844340281b1e9c77..9ab4f1216734781b06d3ac8481888514df65ad82 100644 GIT binary patch delta 33 mcmZ3_vz~{=fR9mrBg;+}RtqBoBg@H$SpI`q7L$*$W&!|}WeI%% delta 33 mcmZ3_vz~{=fR9mbBg;+}R#Q_8W7ElpSpI`qhLex6W&!|}y$OQ= diff --git a/foxbin2prg.prg b/foxbin2prg.prg index cf0cea0..bd011c6 100644 --- a/foxbin2prg.prg +++ b/foxbin2prg.prg @@ -314,9 +314,11 @@ LOCAL lnResp, loEx as Exception *SYS(2030,1) *SYS(2335,0) -*IF PCOUNT() > 1 +*IF PCOUNT() > 1 && Saltear las querys de SourceSafe sobre soporte de archivos * SET STEP ON +* MESSAGEBOX( SYS(5)+CURDIR(),64+4096,PROGRAM(),5000) *ENDIF + loCnv = CREATEOBJECT("c_foxbin2prg") loEx = NULL lnResp = loCnv.ejecutar( tc_InputFile, tcType, tcTextName, tlGenText, tcDontShowErrors, tcDebug ; @@ -690,6 +692,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM , loFSO AS Scripting.FileSystemObject lnCodError = 0 + tcRecompile = EVL(tcRecompile,'') *SET DELETED ON *SET DATE YMD @@ -719,7 +722,8 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM *-- Ejecución normal THIS.l_ShowProgress = NOT (TRANSFORM(tcDontShowProgress)=='1') THIS.l_ShowErrors = NOT (TRANSFORM(tcDontShowErrors) == '1') - THIS.l_Recompile = (NOT EMPTY(tcRecompile) AND (TRANSFORM(tcRecompile) == '1' OR DIRECTORY(tcRecompile))) + *THIS.l_Recompile = (NOT EMPTY(tcRecompile) AND (TRANSFORM(tcRecompile) == '1' OR DIRECTORY(tcRecompile))) + THIS.l_Recompile = (EMPTY(tcRecompile) OR TRANSFORM(tcRecompile) == '1' OR DIRECTORY(tcRecompile)) THIS.l_Debug = (TRANSFORM(tcDebug)=='1' OR FILE(FORCEEXT(THIS.c_Foxbin2prg_FullPath,'LOG'))) IF THIS.l_ShowProgress @@ -762,7 +766,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM IF THIS.l_Recompile AND LEN(tcRecompile) > 3 AND DIRECTORY(tcRecompile) CD (tcRecompile) ELSE - CD (JUSTPATH(lcFileSpec)) + *CD (JUSTPATH(lcFileSpec)) ENDIF THIS.c_LogFile = ADDBS( JUSTPATH( lcFileSpec ) ) + STRTRAN( JUSTFNAME( lcFileSpec ), '*', '_ALL' ) + '.LOG' @@ -818,7 +822,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM IF THIS.l_Recompile AND LEN(tcRecompile) > 3 AND DIRECTORY(tcRecompile) CD (tcRecompile) ELSE - CD (JUSTPATH(tc_InputFile)) + *CD (JUSTPATH(tc_InputFile)) ENDIF THIS.c_LogFile = tc_InputFile + '.LOG' @@ -832,7 +836,8 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM *-- Como el archivo de entrada siempre es el binario cuando se usa SCCAPI, *-- para se debe regenerar el binario (tlGenText=.F.) se debe usar como *-- archivo de entrada tcTextName en su lugar. Aquí los intercambio. - tc_InputFile = tcTextName + tc_InputFile = tcTextName + THIS.l_Recompile = .T. ENDIF ENDIF @@ -4402,111 +4407,119 @@ DEFINE CLASS c_conversor_prg_a_vcx AS c_conversor_prg_a_bin *-- Recorro las CLASES - FOR I = 1 TO toModulo._Clases_Count + FOR X = 1 TO 2 + FOR I = 1 TO toModulo._Clases_Count - loClase = toModulo._Clases(I) + loClase = toModulo._Clases(I) - *-- Inserto la clase - INSERT INTO TABLABIN ; - ( PLATFORM ; - , UNIQUEID ; - , TIMESTAMP ; - , CLASS ; - , CLASSLOC ; - , BASECLASS ; - , OBJNAME ; - , PARENT ; - , PROPERTIES ; - , PROTECTED ; - , METHODS ; - , OLE ; - , OLE2 ; - , RESERVED1 ; - , RESERVED2 ; - , RESERVED3 ; - , RESERVED4 ; - , RESERVED5 ; - , RESERVED6 ; - , RESERVED7 ; - , RESERVED8 ; - , USER) ; - VALUES ; - ( 'WINDOWS' ; - , loClase._UniqueID ; - , loClase._TimeStamp ; - , loClase._Class ; - , loClase._ClassLoc ; - , loClase._BaseClass ; - , loClase._ObjName ; - , loClase._Parent ; - , loClase._PROPERTIES ; - , loClase._PROTECTED ; - , loClase._METHODS ; - , loClase._Ole ; - , loClase._Ole2 ; - , loClase._RESERVED1 ; - , loClase._RESERVED2 ; - , loClase._RESERVED3 ; - , loClase._ClassIcon ; - , loClase._ProjectClassIcon ; - , loClase._Scale ; - , loClase._Comentario ; - , loClase._includeFile ; - , loClase._User ) + *-- El dataenvironment debe estar primero, luego lo demás. + IF X = 1 AND NOT loClase._baseclass == 'dataenvironment' ; + OR X = 2 AND loClase._baseclass == 'dataenvironment' + LOOP + ENDIF + + *-- Inserto la clase + INSERT INTO TABLABIN ; + ( PLATFORM ; + , UNIQUEID ; + , TIMESTAMP ; + , CLASS ; + , CLASSLOC ; + , BASECLASS ; + , OBJNAME ; + , PARENT ; + , PROPERTIES ; + , PROTECTED ; + , METHODS ; + , OLE ; + , OLE2 ; + , RESERVED1 ; + , RESERVED2 ; + , RESERVED3 ; + , RESERVED4 ; + , RESERVED5 ; + , RESERVED6 ; + , RESERVED7 ; + , RESERVED8 ; + , USER) ; + VALUES ; + ( 'WINDOWS' ; + , loClase._UniqueID ; + , loClase._TimeStamp ; + , loClase._Class ; + , loClase._ClassLoc ; + , loClase._BaseClass ; + , loClase._ObjName ; + , loClase._Parent ; + , loClase._PROPERTIES ; + , loClase._PROTECTED ; + , loClase._METHODS ; + , loClase._Ole ; + , loClase._Ole2 ; + , loClase._RESERVED1 ; + , loClase._RESERVED2 ; + , loClase._RESERVED3 ; + , loClase._ClassIcon ; + , loClase._ProjectClassIcon ; + , loClase._Scale ; + , loClase._Comentario ; + , loClase._includeFile ; + , loClase._User ) - THIS.insert_AllObjects( @loClase ) + THIS.insert_AllObjects( @loClase ) - *-- Inserto el COMMENT - INSERT INTO TABLABIN ; - ( PLATFORM ; - , UNIQUEID ; - , TIMESTAMP ; - , CLASS ; - , CLASSLOC ; - , BASECLASS ; - , OBJNAME ; - , PARENT ; - , PROPERTIES ; - , PROTECTED ; - , METHODS ; - , OLE ; - , OLE2 ; - , RESERVED1 ; - , RESERVED2 ; - , RESERVED3 ; - , RESERVED4 ; - , RESERVED5 ; - , RESERVED6 ; - , RESERVED7 ; - , RESERVED8 ; - , USER) ; - VALUES ; - ( 'COMMENT' ; - , 'RESERVED' ; - , loClase._TimeStamp ; - , '' ; - , '' ; - , '' ; - , loClase._ObjName ; - , '' ; - , '' ; - , '' ; - , '' ; - , '' ; - , '' ; - , '' ; - , IIF(loClase._OlePublic, 'OLEPublic', '') ; - , '' ; - , '' ; - , '' ; - , '' ; - , '' ; - , '' ; - , '' ) + *-- Inserto el COMMENT + INSERT INTO TABLABIN ; + ( PLATFORM ; + , UNIQUEID ; + , TIMESTAMP ; + , CLASS ; + , CLASSLOC ; + , BASECLASS ; + , OBJNAME ; + , PARENT ; + , PROPERTIES ; + , PROTECTED ; + , METHODS ; + , OLE ; + , OLE2 ; + , RESERVED1 ; + , RESERVED2 ; + , RESERVED3 ; + , RESERVED4 ; + , RESERVED5 ; + , RESERVED6 ; + , RESERVED7 ; + , RESERVED8 ; + , USER) ; + VALUES ; + ( 'COMMENT' ; + , 'RESERVED' ; + , loClase._TimeStamp ; + , '' ; + , '' ; + , '' ; + , loClase._ObjName ; + , '' ; + , '' ; + , '' ; + , '' ; + , '' ; + , '' ; + , '' ; + , IIF(loClase._OlePublic, 'OLEPublic', '') ; + , '' ; + , '' ; + , '' ; + , '' ; + , '' ; + , '' ; + , '' ) - ENDFOR && I = 1 TO toModulo._Clases_Count + ENDFOR && I = 1 TO toModulo._Clases_Count + ENDFOR && X = 1 TO 2 USE IN (SELECT("TABLABIN")) @@ -4671,7 +4684,7 @@ DEFINE CLASS c_conversor_prg_a_scx AS c_conversor_prg_a_bin #ENDIF TRY - LOCAL lcObjName, lnCodError, loEx AS EXCEPTION ; + LOCAL lcObjName, lnCodError, I, X, loEx AS EXCEPTION ; , loClase AS CL_CLASE OF 'FOXBIN2PRG.PRG' ; , loObjeto AS CL_OBJETO OF 'FOXBIN2PRG.PRG' @@ -4685,62 +4698,70 @@ DEFINE CLASS c_conversor_prg_a_scx AS c_conversor_prg_a_bin *-- Recorro las CLASES - FOR I = 1 TO toModulo._Clases_Count + FOR X = 1 TO 2 + FOR I = 1 TO toModulo._Clases_Count - loClase = toModulo._Clases(I) + loClase = toModulo._Clases(I) + + *-- El dataenvironment debe estar primero, luego lo demás. + IF X = 1 AND NOT loClase._baseclass == 'dataenvironment' ; + OR X = 2 AND loClase._baseclass == 'dataenvironment' + LOOP + ENDIF - *-- Inserto la clase - INSERT INTO TABLABIN ; - ( PLATFORM ; - , UNIQUEID ; - , TIMESTAMP ; - , CLASS ; - , CLASSLOC ; - , BASECLASS ; - , OBJNAME ; - , PARENT ; - , PROPERTIES ; - , PROTECTED ; - , METHODS ; - , OLE ; - , OLE2 ; - , RESERVED1 ; - , RESERVED2 ; - , RESERVED3 ; - , RESERVED4 ; - , RESERVED5 ; - , RESERVED6 ; - , RESERVED7 ; - , RESERVED8 ; - , USER) ; - VALUES ; - ( 'WINDOWS' ; - , loClase._UniqueID ; - , loClase._TimeStamp ; - , loClase._Class ; - , loClase._ClassLoc ; - , loClase._BaseClass ; - , loClase._ObjName ; - , loClase._Parent ; - , loClase._PROPERTIES ; - , loClase._PROTECTED ; - , loClase._METHODS ; - , loClase._Ole ; - , loClase._Ole2 ; - , loClase._RESERVED1 ; - , loClase._RESERVED2 ; - , loClase._RESERVED3 ; - , loClase._ClassIcon ; - , loClase._ProjectClassIcon ; - , loClase._Scale ; - , loClase._Comentario ; - , loClase._includeFile ; - , loClase._User ) + *-- Inserto la clase + INSERT INTO TABLABIN ; + ( PLATFORM ; + , UNIQUEID ; + , TIMESTAMP ; + , CLASS ; + , CLASSLOC ; + , BASECLASS ; + , OBJNAME ; + , PARENT ; + , PROPERTIES ; + , PROTECTED ; + , METHODS ; + , OLE ; + , OLE2 ; + , RESERVED1 ; + , RESERVED2 ; + , RESERVED3 ; + , RESERVED4 ; + , RESERVED5 ; + , RESERVED6 ; + , RESERVED7 ; + , RESERVED8 ; + , USER) ; + VALUES ; + ( 'WINDOWS' ; + , loClase._UniqueID ; + , loClase._TimeStamp ; + , loClase._Class ; + , loClase._ClassLoc ; + , loClase._BaseClass ; + , loClase._ObjName ; + , loClase._Parent ; + , loClase._PROPERTIES ; + , loClase._PROTECTED ; + , loClase._METHODS ; + , loClase._Ole ; + , loClase._Ole2 ; + , loClase._RESERVED1 ; + , loClase._RESERVED2 ; + , loClase._RESERVED3 ; + , loClase._ClassIcon ; + , loClase._ProjectClassIcon ; + , loClase._Scale ; + , loClase._Comentario ; + , loClase._includeFile ; + , loClase._User ) - THIS.insert_AllObjects( @loClase ) + THIS.insert_AllObjects( @loClase ) - ENDFOR && I = 1 TO toModulo._Clases_Count + ENDFOR && I = 1 TO toModulo._Clases_Count + ENDFOR && X = 1 TO 2 *-- Inserto el COMMENT final INSERT INTO TABLABIN ;