From 4aff6194e1a3edf8910cf32993ce66addc8e41c3 Mon Sep 17 00:00:00 2001
From: Jose Alberto Guerra Ugalde <cheveguerra@gmail.com>
Date: Tue, 20 May 2025 22:05:32 -0600
Subject: [PATCH] =?UTF-8?q?-=20VERSION=205.05.20=20-=20Se=20agreg=C3=B3=20?=
 =?UTF-8?q?la=20opcion=20de=20abrir=20el=20avion.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Files/layout1.bal   | Bin 77947 -> 82407 bytes
 soporteKMS.b4a      |  80 +++++++++++++++++++++++++++++++++++++++++---
 soporteKMS.b4a.meta |   2 +-
 3 files changed, 76 insertions(+), 6 deletions(-)

diff --git a/Files/layout1.bal b/Files/layout1.bal
index c7c29aa8a9517d08ddcb6114349206ac102b2d2c..ef481ebd623cf08ad6eceb2cde5d0f2ca968aa0a 100644
GIT binary patch
delta 9146
zcmb_hdt8)d_U8<V%%BV+xh7>GYMR_;l#3z>n)e$hSzZBKQb7^#d1ExA)J%k9zH2q9
z*^Z@|;8<oCMeS;eQd#S2t6g>5HeoAwH!FVUJTEivc_;t){jq*N&+vVp=X=g`Ip;m+
zJg?U;-E?_PtG2Czf`U%m928`uzn@mMjf-eQV0wPx^!c;qXD^;Lx3p?tkE;H*+UfIy
zE!o-L_k&Y|)00~hXH?<zqS?J226P&*w*mVYFvT0zdU$X=cjOe7l5mOvQw^AAz;w*B
z9j9s07M93=dWDUFcf8BOwt*{{wA@6kJGDEg^`O?1+MU#TQHvKiLEuDzlLSr{*dee}
z;NAvy1@$o=f>H!d6*x`cbb<Q{+)v;P!u_dbQoBpw0fe)tWm6lduuFd!q#ks9x4?r1
z9wP8ifrkk^T;LG`j}&;6z@uq?|BA*4JXYWwfpY~OC-8WI^8~&};0XfX+k#zu6!(dN
zi2_d&c(TA#1fDAJG=cL4E)cj-;ORj@F8}WD7XyD3xJcj!1fC)AOo3+!Tr6;jz_b0B
z&VP>oAt<O+;JE^q2|Q2W`2sHxc%i_H1YRug62@$QHo=2pV5z{%1YR!i3V~M&TrRNm
ztyR>&n%YCu)(Gr+m>w#qJwokKf!7MWPT=(dKPK=7fgcxmqrjB{Z_=?#O<W}gss%=Y
zHw*lPz*_{?1pbr2TLpen;HSv{{JVcz47de;M&NA%Zx?unz|RW2Q{d+W{<9CWjXb^w
z`nyZu=LLR2;N1f65%@)c_X_-y!21NQA?)(mzE%wE7uYNC0fAo@_!WT<3jC_ThXj7j
zz^<UzjfbE&1b$QC!vY@>xK7}s0v{9jxWI1-{I<e${_Oehh=F$rzenwTY9|E#K;V-C
zpAxuU;L`%15x7C%57WiNM*@E=@L7RBA>5x@COV^5!WwT)lsCj>p$>=2{CY8w+=e=`
zx$=l9Ts-Tzw^R{CJ&>Y0(pwWvuOL!YM_(&-6fMl3zi44$b~bl8Rf(c=(o}~djJg-(
z7tWqjcz;o;V!48xs%Ft?>5A4{rxnd9n_slRr%co^PQ_A%i@xSQszYo-t<jmrTajgy
zu{ElyXlt|w?*q}_S#I%f#?i+nm*~V7LSk`u=eAZq!+WxGQ3UM99Zxy5x@hRKvmy!T
zu^`)_tqOq>?BZAft9ca9I1Uk_f$AeA*uD38dT2Q0z|Pl7@R>g6Nrs<X=WJSe7!-Ot
zq_zsS1c5i=dK!51`o)C61lCghtPN|j_Q3>iLG}`$J{D?x&W1m)EX0L_R-hxvS-sqb
z@ptdTiex7qIcY=N@<M!Y@OfOC;)G>*bW1U|9~OlX$1-6#u1-rt95w<!Yp_~o12!B>
zhLyNuYcZ5#)5v)G&2bFI&xTno6@Z0Dlfi{eD~n+j58|~^;W*Wi4VSQKkONk0N24JY
zXOHcGo3>5CH^+uzbJ8O;xMQXR)+n)umClDr=NNcd2~}W&BNiUPqoY#jw>hhT`kDWz
z;;&WHXcP5m)+>p1N@6`rV23H;*d}{CtXDFRAuKP34VYULk6FXI5~^KwGhQ4Vi~UZH
zx2&hljY)>b6=|cNw9!v`srPux%Q~r2kv92Bn|vhgstv|lF6pc)Z}#;NfNG-U*g4bO
zL9LCQeyrW`^B1}UA}k&r#`VV^s6nI!von)%`#)`1Iiv(OW5c9)`i*^b3_c(4h9^i*
zdyH9|Y3Gb&=-P}`r7^GtVaRZ_Cwf5RL$PyqlANZ*ENmX02Y<pHGe+apb6xG6vm_&S
zrb`<W0&du<6mS}o!>nNM4|(t;pKJstHZdBcK`4BWnX_i_g6Ay2(_`H5wEujb=JQb_
zF?>Re_;PUuJvJq#vFl(#t{a|FyCa{oa|#ryd3U%ktr51VWpPrJqol)oY5YJyM`@H+
za|>kJx0@K-_@t{BS9tR?S_AB$S#s>0Kn)#=K{MD69*Km904L1Lr@2T9FaB0R)`-IB
z*KIg=QX%YQi{POJ;h6YnIu4rbf#<l#&dJu$w^MUiK;Kx=6gT|YcM5pNl5i4;of8wr
zNjQyKNb??ar1Zk1$su@n>Ui5O>f_L4eI5%=#9+p>_EyftoP%3o?VgUYoTWQZ1CBc3
z)YP~!_j7cnJ+W?JIC(;(_uRB(z%N%MVBMasc23@s$PV}-J0PAbsKLqQ8MHk%NahNw
zx7GB%057St;(Tt1?NxrekHxg+NXXDnwMH>H!v`{JiMdffzXu9ozp@}Fe1pf6X5pwA
zdHCt-sOq2k!2!*2E5u=shr(f}H+JT&fJ4_%FdCRiZ$5j`PCh|=cg+YaOR-|dVmBOA
zYPl9LsV&|Nud=V&xiXL=Wv+2}>ufh1@>zzE((H|$69MoVb+_l}XXnyE3i5kKd#Cq|
zq9NWi*Ns0s(iK;2u-dt<kWAk}-d5HZu+3WCGjZzLNc`%BIQBJ-d~G@AXFP^?J>DK0
zf1L$yszc;L#8C8liyMA{XBO_p73-8G@zgq{rh4(ua71mLs}w^>H{+ZoQ=v|6zb;_3
z%rzYEd(Z<%l`K~>W?7CCPEHxxiD>8u$NT}~SOAp*2G%cg!*TyP9ycrmZ>fXIT;YMY
z{o`*N;~WPnDBEzhc!yVlsg-1L<qdm(a8i=t!2hn=!Mgzym$@FMJj22KJ-_Pr{Hi(l
zI4O5h9)tI3T-g#mn^?OZOQztKi#;jj9NjV)V-mW-3B}^bdLm#Zw)h7vku?(YKk5k;
zD*2sMXUBz^`Rsi0%t;A~ljJGI<D%_Gyit$rf_fF@>nY0r15W$b!R4GGQLiHW8UH%2
ztlbO^zMb2-#0%hRm+k}`hOBP~AL8c;i8y4v2Y;!GuC7eQ(beHJC%r=OG0u4`4$flL
zV;{gLYMor~Nlom<r#E=uQ?;&jk7wFHH8DO>dj8U)r(I?@9I(-2J4c)ZYSzDM^K3BG
z&d-KcC4<ph)$(i~(pW#{p2ga=iTG-z+jfB-mH20vziB9@KN(J|qxI^0y10q=)U;_q
z_TPx7V&z2wm#76(3$lJrKdL)|z!%)}CH;KG;A{Hfe>dsfnA><Sd_!C7r2Q=xqTwRe
zF6z|r8zP9+(vvQ0ETOXcXSl4acA2a;7=J+zT=84(ib?*mvfSVOmMec^GkmMg`r7~=
zpLN9+53YV8nwJyF6^i{I0VH<E@07BiG!Nn)LH*|qsNXAU(N+&!<vH=%-f&tu&s6@T
zhq5r&35@}A9F4a><%T9D5n7{5WZ|Kw-S96Z@vj?5eCW=@_iOdSuG4;&;o#7HTOR!A
z4<A1U$T4Ht_B=fA)#c(3_~hz$xZ#@5zX@@0CXM8?|E3*{!y!A}So{jRGyKOG#BX2G
zbHd^0-0-ts{AYs!*ZDxa37&xfzYrnE{!74`I4S<h+08rPd8#QgUvG)r`(Ed@@o2M3
znR^acanf$8mQ{&|KfI~u*dUP3qXcmIVH-}|KOASjNI}h8`%(yC$q_w}zi}kAwO$V@
zswEgOcYiLHzvKj$&iv(Q%K}CpYgquUIHv2{R6{{dXT=?FDSbkIKfk3lD_ujkH=Y_o
zwZc0gUKIqPHy~T}6&yI=YzcHWJo;9=-4;M)7kcaE3<`1_WW!jedWm$e4GUni*S68-
z^@QQr=U@%AC6#fQ6K}P&1#F&lw{{^0s0Mu14dGbzwyJRP-c#YwR?F!LF<{pvsh;8Z
zi_K?BF#WX3x)BkkiAY=RpaJ;z*YcnpDH`2UNkp^@WaTU?$ILg#g&Hz=2`n_>O*gLj
zP%ksuYuQ$~nU+~~AqIm#(tWD_up28sPT;o^FMS-U4YLBRkSN8f3>i}Ah7NpG5gh_&
zi_M+Kmp0t~Z)bH{625U(-K;S26aNl7>O16`;><WFhX2=w;m>r$`G1MRwBx>lDB_kt
z#k`HUx7^T4&D$w(n77sc?L3H<XAvF9VkMj2abwR5GiW<a*A{p~-=o^^Hp5MBGmBuu
zmF||#fK>&<u-%El=90Cy^>$+W%hfKwFIRco2(NVdRnt;2<^e0-{DB){c-9>HBMi{*
zWFuV~`D9}QMR|vwQ+#FRQlSf8Kb3-)z6fWV&U58rRsAliBYnOW$G(<aT^6Og+kw+=
z=&ICqHK`?9?VwaV`Kc98opD1qMd@}U%4ZE8=<ah^dv`NMcilVuuItVJC>fxKajHGc
ze08clK^xNrhGG8MsW|Tn2gNY_>}-P1kMA^#0Ol-Pgx*g)&`T|{SKzR|4-Y=^opM`<
z*N-)htX!;)eDt|INZ=*i%op;Agg^zXza-0wJN}wyNd!!A^}%&l!!2|~^IXHQzTAo%
z&buK=H(FAQc5l@Ms-cs4N%-GJ#ilo)`q}>E{NT`<dXT?P`#ja|FwdqRm{Yz9R;toA
zLvN)i?MJ1Fw^aV56+M^S_}!2Ci!|-0aEMdlR9BCndyf@6eBp)^btoz3S=hK;=(ZK5
z3izZi`-i0xL6r+>ptZAs19yGd4bpi_dO&M8gfc{5BDD%?OURlAm|bv-J>8@?g+qm2
zpG^7c8=UxC6i)a$6L<d>PRpPn$k6xI=9?PrCm_G0D?>zolM3DMyh)b_f)*YOdOX+i
zgCWxU@s)i5cNwm8mr1ZcyN+>tg#iX}fSIW6h@$(#o|GZl8Gvq(MF*sZ;Vcz~an4XH
zKJ~pDvVBgib!<&RE=xDfK))}mFr1%Z(<*yFf6RHjn|3u6lr6L@EBG>+E=CKhz`8AT
zeWvT*-O40)n^r}0^J`2u4)rxmyBG!;mX=QX+F%)?{7xI*mRGVR6gKLYlA*jy-ED^k
z>dRSH!{5xb+af?YzE&DRX-@_0EN|1b2+)!uTSitz`bYesoGuR(f=gh8TJ4BH?HtYz
zpSNMw+zjnBKzA6acq0RO?5atZt={nK6i!DOMj2%yj`TKMNd^BMaJ0c2ZRWA@_NbFA
zZT=O;7`!oNp3fWf`z3w6(AEQ#z*xVr$LcwErUg8Z<Fm9q$E0PfZt`5S$tm-~IJMbv
zX133Sc`)8@7W;TJ=iup9a4SHblFu`b>GEvtdz7{9_n61Y>{np|tInZ6DmRQ3=5oWm
z`q;g`v8HSL)HhPNPfd59Ssh?(?gf}=grbS&abGNHgh@(#l6ja{o2ouJ!DPb>lTD;a
zWY+zlm3E-)Temk=JJNyNcaqOG`gbOnYDiBtOS7@xcm01ZIMYbb%Ae@-3BZr^Q@}li
z^fR4WNON7^Uh1}UKRx}Chl=Ru0Uny!+}u2a07R1bOzxqM=2--+#q{%45{J7ILbJK+
zK6;u%K#@ub0Dl|jfBJ3ee!$hMC%|0ZlYXD-&G$0(t%^TzI;dIsN~S(q%_Rj!6~N!J
z)FrFLh@+L&p;~<$MPe=vwGn@y&yr<i4Lx9$`EvQeNgaV|`FX}k&NFE)<0IDtb7gfr
ze`eFBb%FyhUm143nX3#-_g$;DF&gq<0W0MYBa?8)1pzWaK|^WvtpIDDnXc8}3bnA1
z<#Ox`%|v5ou4PXCK&Q>Voi;YEGwgyzyc)|Q-c;x6FT3-I2NvsU7Ms*8@~hFFj)BVm
z(H(dRPo*2J<r2KaG^^h}U&~8ymbRq}t@A;@Fc<%k+VVJvga;39jDyYqOZ_HWs)wE1
zyO9X}7lUp{`!dr!OAk^wT?(+ARqA(?<t73ZdROS9r3O7HAgtgQILE%i%+Mp(N{(Dt
zp<F-1ax=wuhK=CT$6YrV&xwadSf!7z`u+I9x&+t&^pS}!ELuSleRW<PK;km_A<*a)
La<y*BFya3I0Rb7;

delta 8227
zcmb`Lc~n$K*1-F=3w8&(0nu?6MGZzl7Fin!xF9Zxt&+Gzg~lL?sDR@n5)F{J5gnpl
zlb5KiqDi|&L0f}M3~t#*C&-M6I%-76(dhAuM6(Tv^4+ROci(RHobQj1bE^5hcW>RQ
zx^?ST)w}s-i{I;-`?Sz#G+P5S8a@3#waO>R-$0O=o;jzWz*1ngWLpZdRwV`RDa>hR
z|FK!0X5QgmBp+$X%*u_7w5NFuYldIxPvE+zy5Xs(lHriu$9p5-KA(0)y-DvGDt)Oq
zID~O1<9>|87>6^CU>wP~KjSDD7ipqh51JUpv5e!0<EfaaBrqO8oJi$aDoKo!84qMU
zi1A>_MQY_COpwBODC1Pd!x#@|Jc98^#?LW+p7AJZ-#G#^<I#-AFdoY|jqwYNUt~Ov
z@p#4)nz%@~ZXy%B#CQ_p$&9BkPG_9K*uprI@l?hyYcxg9(PuHiG{)JCr!$_xIEV2}
z#<`4VF`n&Y^8Xy?gGQ6bIG=F=<GGCg%y=H-zc7A<@vDsI3l{S)rl63@Yg86cS;+Wx
zVxdz^rG)VtjNfFui1A{^OBgR@T(pcmlrnyc@p8s182^=V8RNGZuVlQ6@oJTe<j9Z-
z)-ZmD@w<!_#_utHpYdA8>lm+RY!$wBxOW2+Y-GHNaXI77jJGiUfboZnZH%`%STw%P
z@j(B#Gv2{?C*zM8?_#{0aRuW_#(Nm=73>(joeB0a-p}}B##M|DFh0om5aYv)KXGx9
z<_JA}N~N00QO3s@A7^}m@kz#?G5(zK7mUAT{FP**+VJ1#A)bl}Uud(?kOvw~OM03*
zH*J1i7M6EuXaB8DSxb9K=eyeHv?K_R_M%_2Wp-9>cz^jKMo%y1rdx7nS*B*qj*#zS
zg_7KZBUGh0*NZ5j5fO$P1KYKcC^u|rF+$e19}Ud%#p^>Nlrz4d$HIzsTjqxY)}%xz
z#i8`#p^|``zVC@`BNxDC1)4)RCKl=yV|!?aHzF0-jAv59mHPHD6FWp*q{sXp!m(z7
z9v9xS;Ogj$I5agvsp|wY?fTdj%^=b4YZ~tb1*)ac^Lp%3+73S%s6c@*gpH+o``d#O
zfF6aR2ZL{Fn*%0QgekkCs5gNr74&ScP5BEzbA+OBEH0P_h1e~$ueMO5tZWT~@nNG5
zuZ_3j_0#~REC2==MZSBQiZ@MyMpuYeCIsTk!-gxf0sQf$iECgXj?V0B6zPzwh0l$_
zx)Hi}n}f?Y@H+lDs12HzPcn*($<*yhlR5zuNlPNunFz^};@biyLorsEqj2pA19drn
z%3UZSYi9Z_FKa_@{9X&h^xCm#%CO>qk!>+7%7hgoTj91cp)aHvmU?(oHX(AcM-y0l
z*MxZ$dQ2#?z#_8TTFHwCFKkSWMz7}$<RA3CKLhLQ{gtGyum%=OLn3*57_yJd8VIli
z%cq--OWeeZF~7Q3m9aal09Y#JOCOcn>k>)4Oo~O;cUhO!l@Y$wba8<mi$Bog&KY{V
zIMV{9atceErm!N{25*TsMzKA(43y%kS(jnC@S0I<7B0zK!auMA@6ImMi|s<hx~>dQ
zUkt>pb6U3$JH<+@p3|wD*gx7*0kMz_RCGed4TaC`tz-ZM+K1$Y0j!ea5IYLjAveHk
zyqY)+hZIx-N>7T-#idhf51%_9V2!LU_8ON6g%{x+d-%NN0Pji#vFUg!DAIoAZ5>uG
zO;8>6iUr=2ZHdjurC%x{OvEZ4cr^{)Zwk>^Sc_LHg0OV5f!v!ksR+Fbt(cLXO;5sE
z>(OEvgNt6XqB+w<?;JL)3({bN2vnoksdy_eXbdh}XoZb3Y&XiVm9|9Kt}e1-*|Y#x
z%w3r#+NH$??@&v_DDZTcS8RoHIRdf6aogc@lkBA>ae#Ys(n*CpgmsCFm7+GZ>Z|9K
zVEwZTV2kh-&d4>W3L=uOVZxFf@PTxq*brSNr45B*RSmY^m(GL_Wy@l(bg8N1zOZaE
z*yNaP9#R-I3{RHYV5_XV)kDg11m!B3K4Dvv|0fy6hRa(@nzTnvV@EDoV7qkUc9#=j
zhji2SzuItKeh8Z5dcaPXl-B-Y_(-|h37$jqh|c(PLDQUx%wmGwcxFL2sE|Xb@Mt!F
z$|9&l%c>mMBir1=tg87Y0`@8;p)dr`6!_tp)ByCJ&nEKq`37yNBYBu$pHR)g?S)P0
zRqWh+lp?)`zb4bG393YobKrpR9zMNLM1=4er7Ae6iVjJ~iY=TQQI#m5m96Mg(gQPc
zb=t!$!C!pOipSqjdw{Lq^v7!xI>Qm+KsBwWtzCmRmPjvR%u*@FzzDs6W@hG}s42Pn
zV+nNCSbiiF_pY<SQQ;ipQMZm9mMi5LURWOl$8puTp4i=LgA=mL;(*}l@?kkH(*_%y
zBs;C~=M4jl;@IHQI3aC)#%%4}Xw!=$L<kk#7kG8WP@{PCsM1rMCSs_xY<#r$^je%J
zbjOwa1PH|*<yO5oa7c@P!&Bu$jpC78?6%ni>Y$fz9+G^Dq%v2YCipv*W>hq~ujxm=
z_9dthZ_dz9t$=^fkN9h@zD8JIpbU?Mj&K@l!#m*i^#;B0jH+v|-O>Z#tW54_o2GC2
zhc@^|_(<KIzaeE;|IW&U@vUnjZ`;<uIqC0n9*QDF!oJX9!&WPtCwm=4H~huAF`oBO
z6-nrVTwR;K)M3tcEBwp7!oMC<;i9ZiyTb;TWc!yqbVU2NciP~xlwN*}RAglDT~_!`
zYJB$ujh?%$a7Aidd4fh_MH<vmht-2eorjjl?5iu&;Hp#O>SHu+>`9|!>9BF_F&go9
zEBu=@%=9Y`Bxhy3UMDY%!M*#e@E<Ar50l-HvS&WF!c8f=$z<OP@7dq4qLaienVoNW
zG%5DL+hU8e?>smVP}$ZISLR3K_uCBAvJl>p`(Mow9e#c|0zRs$^@WyzUOQC1@jD!P
zKQ!r460|3uYzc5zws-e2?bSO?-mZ>-N>%+wxvPA;%VF=HQ|XUmlo+KFuC8c{d5I?D
z{l{4S$yvd0G6MFg72@~G3i#1phuvSCYJs0eI1=Npa^ipWu&Rc(NRe(?dDQ-n&KSo{
z`&)UbCtA5?@ZA34xarGEXpoDoL0xRhu3*sN>94HtJIzqjiu>KIwFbH3{t(k8Qs)pX
zn`nUtvRe;46h*g0OuukC4gcp*0Q#PbZ#rWn9yU<JA`-X%-3pDecH<LjAOG5lji0Eg
z*?goG9;gv@=|rLhK+C?-7=Ol!e%0y@sKq@sZB#KGGU}ljj{YhLeFy4{&FJ#v${P)i
zZAIKQ^oq9*BCz;gKMXqN+Q^K}J*rSz(6#`CiK+5bT(5=Rbb#)TQ78D=mYgtX8#H#m
zZ#n{<rX9_DdDwFJX4|)EIP^1K|Gm!~zWL*vRjUIWT{em)#Wk)B%UJuLFT?@pS06DO
z^&W<4DQKSp#jiW0;=+qV+)uZWExbwnNhez&b9Yg1G-v+_OD<WpK59RFSU+;cjK%+6
zwt~SqNW&ur)By0mLJLx!IE<KmCCX^@&=Uv62UoV@g;R3p#+IiIN?C7+Rl_mxsuld4
zZTPv>^+mXqgmKrbnDVs=#8V9J9;U-F|F&X!P1Al~S<|YO8v4F~brZVc%^LN%(R5|K
z{s7ONq4+u0!`Q~dy5(UnZCg-Q_JRIrjtRh1Hzwose+FRSd>>^_2!u4n^TB@_v}8MZ
z(md??y^XHAj%jb_VGnLy#<$M~VDZoa&|dnI`g|b=D{oKMb^tu~QXWqD)@keF5FPs5
zNz--&tTgxc?dWa{u>Sc}ynDxn@1M^WW4|EogTu)d9h`r#LT6_$I=fd?x;;hr<<Rp9
zBIKb9R^BuFc5zpce$sYz1iK9aoyG#)HKogS_iWHj*fDl<m)ec@eF3^VD&zVq2I^_@
zr6A>KYY322weF_`eGt`>=Z7A6^`~*rQwfWNzJ4i`5qgoNg~o?S*8?!WUwdOuw-&m~
zVbf6!zx??IJdG>Qw!xFXn2b+9s-+E9hx6*Mm9%gjGt}EnQH`J}**g0NztQC)_@<hb
z*WNTx6$*x?%WNO9^7^>dlwx_8#qVy(V8VX49VxfB-SY4mfDmf6FN7#1y&+t6z{5tH
zHWaXA!YEYk7_=eM@6ZqPt}jyWGW8pu!HjJ&5GK7F=GJ5g8t>;gQqdav($X|0e5Kw%
zZHcv@evq(Ic5{q3!ovh<$&U@%NHxeJ-Q^<4Mk}AThXf_5B?WfHJrVrzSXa?w^?ljl
z<Vlr|4>;N=HA_Uv$fh1#n5&#=1y*ge`aatE-tpxkLVSUEw>4Qms)wEs<LqXPdpAVL
zUWQnwIM!V($4awSRp<?r7~{nB#JQ=&I%bcSDcucm_b;>vlLlbpF9tGedAPHRzGry>
zm_$|6qgBQ2((x5SDbzy>-F<pu@NY6<QTH8FdI&H7w<+y}HmKK(M8|B-gl8QCz%dW~
zvH7k3k9;xGCaGEAK%+sM0QTfbw2LG=Y8jK=I+h@Ytxg`Dh(v}M=q`6oo>d9Z(sC17
zXONr&sw%UE{CcDvtWM8hr$|m)0^YS)6l-(3E+(ic!|}B!MFwMvdt=UElwXU6I{Q4-
zLyh_@zZfY$dr^>zq?_udG1M_rD?pj0Q&p5tb>LV_Qm%e98ZIVl_#?HemD9aIU-W;u
ztBjz^x&+EDBMIOq`gu;gd7geoQEAzDG_H@lxR~i_v=EJ<pRqzTy|J+|jR5?q`U~O>
zy=Z)qKsSzlYC}cN8c#Gqyc$nW6A7f!O9bFeZ^WN^F)~x)3l{lUSr-KI*hV)b#V;5-
zD0hOupckK?<Q-|eBjG8tg5d^CCO`Lu$yF48O97?`hfE>su5Em>aHqJ-3jJ2fratf;
zq&p`k-9uO84ATak($E*uv>754yRv=GnBlHoRTBc8Kx>iVW3;#noBEl6VW|dXe?O>%
zOh>bjDb`C@tc&-TX;3*I1~%<f)yz~kGnvlewu*qa|6lH(<KShnzeK4w&~`7owdeHn
zKd^R7j-u@kHpr6O5#1F1mG;5l4_Q?W{h<rMH0k?k&b1$)ERQDjZ1LJR+s*7Wz^ir9
z^c_Q2wJS!XsOe&+rn~86i<weC6Dl9ak)av1%sSwu@@U@~?uzQ}oFlh0rI(3(H&gZ9
zOm{t}?_NxR8`@k|C-(_DpAR6NS*p&g$Lmx@KMQXF%vKI2f!R3QLrI*K=BOu6Wmz($
F|1TJpELi{m

diff --git a/soporteKMS.b4a b/soporteKMS.b4a
index bf1df43..c355a3b 100644
--- a/soporteKMS.b4a
+++ b/soporteKMS.b4a
@@ -34,7 +34,7 @@ Version=12.8
 @EndOfDesignText@
 #Region  Project Attributes 
 	#ApplicationLabel: Soporte Keymonsoft
-	#VersionName:  4.11.29
+	#VersionName:  5.05.20
 	'SupportedOrientations possible values: unspecified, landscape or portrait.
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False
@@ -112,7 +112,7 @@ Sub Globals
 	Private s_tipoVenta As Spinner
 	Private et_usuario As EditText
 	Dim empresasMap As Map
-	Dim spinnerGunaMap, spinnerKelloggsMap, spinnerKelloggs2Map, spinnerSalmaMap, spinnerDanvitMap, spinnerDurakeloMap, spinnerMardsMap, spinnerEmpresaMap As Map
+	Dim spinnerGunaMap, spinnerKelloggsMap, spinnerKelloggs2Map, spinnerSalmaMap, spinnerDanvitMap, spinnerDurakeloMap, spinnerMardsMap, spinnerIntmexMap, spinnerEmpresaMap As Map
 	Dim almacenGuna, almacenKelloggs, almacenKelloggs2, almacenSalma, almacenDanvit, almacenDurakelo, almacenDeRuta, almacenMards, almacenEmpresa As String
 	Dim tipoVentaKelloggs As String = "VENTA"
 	Private l_version As Label
@@ -199,6 +199,11 @@ Sub Globals
 	Private p_resVentaTransparente As Panel
 	Private l_version1 As Label
 	Private b_resDuplicadosKell As Button
+	Private s_empresaAA As Spinner
+	Private s_almacenAA As Spinner
+	Private et_rutaAA As EditText
+	Private b_abrirAvion As Button
+	dim empresaAA, almacenAA as string
 End Sub
 
 Sub Activity_Create(FirstTime As Boolean)
@@ -253,13 +258,14 @@ Sub Activity_Create(FirstTime As Boolean)
 	spinnerDanvitMap.Initialize
 	spinnerDurakeloMap.Initialize
 	spinnerMardsMap.Initialize
+	spinnerIntmexMap.Initialize
 	spinnerEmpresaMap.Initialize
 	s_empresaBV.Clear
 	s_empresaBV.AddAll(Array As String("-= Seleccione =-", "Danvit", "Durakelo", "Guna", "Kelloggs", "Mards", "Salma"))
+	s_empresaAA.AddAll(Array As String("-= Seleccione =-", "Danvit", "Durakelo", "Guna", "Intmex",  "Kelloggs", "Mards", "Salma"))
 	s_tipoVentaBV.AddAll(Array As String("VENTA", "ABORDO"))
 	s_tipoVentaBV.SelectedIndex = 0
 	
-	
 	reqManager.Initialize(Me, DBRS_1782)
 	'Traemos los almacenes de Guna
 	cmd.Initialize
@@ -285,6 +291,8 @@ Sub Activity_Create(FirstTime As Boolean)
 	reqManager.Initialize(Me, DBRS_1781)
 	cmd.Name = "select_almacenes_Mards"
 	reqManager.ExecuteQuery(cmd , 0, "almacenesMards", 0)
+	cmd.Name = "select_almacenes_Intmex"
+	reqManager.ExecuteQuery(cmd , 0, "almacenesIntmex", 0)
 	kb.Initialize("kb")
 	gv_gato.SetGif(File.DirAssets, "cat.gif")
 	gv_bicho.SetGif(File.DirAssets, "ew.gif")
@@ -433,6 +441,7 @@ Sub WobbleMenu1_Tab5Click 'Borrar Venta
 '	Subs.centraBotonEnPanel(b_borrarVenta3, Panel3)
 '	Subs.centraBotonEnPanel(b_forzarVenta3, Panel3)
 	Subs.centraPanelEnPanel(p_botonesMards, p_borrarVenta)
+	Subs.centraBotonEnPanel(b_abrirAvion, p_borrarVenta)
 	s_empresaBV.SelectedIndex = 0
 	s_almacenBV.SelectedIndex = 0
 End Sub
@@ -858,6 +867,15 @@ Sub JobDone(Job As HttpJob)
 					s_almacenMards.Add(records(result.Columns.Get("CAT_AG_NOMBRE")))
 					spinnerMardsMap.Put(records(result.Columns.Get("CAT_AG_NOMBRE")), records(result.Columns.Get("CAT_AG_ID")))
 					empresasMap.Put("Mards", spinnerMardsMap)
+'					Log(spinnerMardsMap)
+				Next
+			End If
+			If result.Tag = "almacenesIntmex" Then 'query tag
+				s_almacenAA.Add("-= Selecciona =-")
+				For Each records() As Object In result.Rows
+'					s_almacenAA.Add(records(result.Columns.Get("CAT_AG_NOMBRE")))
+					spinnerIntmexMap.Put(records(result.Columns.Get("CAT_AG_NOMBRE")), records(result.Columns.Get("CAT_AG_ID")))
+					empresasMap.Put("Intmex", spinnerIntmexMap)
 '					Log(spinnerMardsMap)
 				Next
 			End If
@@ -1243,7 +1261,7 @@ Sub JobDone(Job As HttpJob)
 				b_pasarInfoMovilKellogs.Text = $"PasarInfoMovil Kelloggs"$
 				Toast("Corriendo PasarInfoMovil Kelloggs.", 0)
 			End If
-			If result.Tag = "revisaArqueoYLiquidacion_Kelloggs" or result.Tag = "revisaArqueoYLiquidacion_Durakelo" Then
+			If result.Tag = "revisaArqueoYLiquidacion_Kelloggs" Or result.Tag = "revisaArqueoYLiquidacion_Durakelo" Then
 				b_revisaVenta2.text = "Revisar Venta"
 				Subs.logJobDoneResultados(result)
 				For Each records() As Object In result.Rows
@@ -1673,7 +1691,7 @@ Private Sub s_empresaBV_ItemClick (Position As Int, Value As Object)
 		s_tipoVentaBV.Visible = False
 		p_tipoVentaBV.Visible = False
 	End If
-	If laEmpresa = "Mards" Or laEmpresa = "Kelloggs" Or laEmpresa = "Durakelo" Or laEmpresa = "Salma" Then
+	If laEmpresa = "Mards" Or laEmpresa = "Kelloggs" Or laEmpresa = "Durakelo" Or laEmpresa = "Salma" Or laEmpresa = "Intmex" Then
 		reqManager.Initialize(Me, DBRS_1781)
 		Log("Mards o Kelloggs")
 	Else 
@@ -1755,4 +1773,56 @@ Private Sub b_resDuplicadosKell_Click
 	Log($"mandamos QUITAR duplicados: ruta=${laRuta}, almacen=${almacenEmpresa}"$)
 	reqManager.ExecuteCommand(cmd, $"quitarDuplicados_${laEmpresa}"$)
 	Log($"################  QUITAMOS DUPLICADOS ${laEmpresa}, ${almacenEmpresa}, ${laRuta}   ########################"$)
+End Sub
+
+Private Sub s_empresaAA_ItemClick (Position As Int, Value As Object)
+	laEmpresa = Value
+'	If laEmpresa = "Kelloggs" Or laEmpresa = "Durakelo" Then
+'		l_tipoVentaBV.Visible = True
+'		s_tipoVentaBV.Visible = True
+'		p_tipoVentaBV.Visible = True
+'	Else
+'		l_tipoVentaBV.Visible = False
+'		s_tipoVentaBV.Visible = False
+'		p_tipoVentaBV.Visible = False
+'	End If
+	If laEmpresa = "Mards" Or laEmpresa = "Kelloggs" Or laEmpresa = "Durakelo" Or laEmpresa = "Salma" Or laEmpresa = "Intmex" Then
+		reqManager.Initialize(Me, DBRS_1781)
+		Log("Mards o Kelloggs")
+	Else 
+		reqManager.Initialize(Me, DBRS_1782)
+	End If
+	spinnerEmpresaMap = empresasMap.Get(Value)
+'	Log(empresasMap & "|" & Value)
+'	Log($"${spinnerEmpresaMap}"$)
+	s_almacenAA.Clear
+	s_almacenAA.Add("-= Seleccione =-")
+	For Each e In empresasMap.Get(Value).As(Map).Keys
+'		Log(e)
+		s_almacenAA.Add(e)
+	Next
+	empresaAA = Value
+	s_almacenAA.SelectedIndex = 0
+	Log($"Empresa seleccionada: ${Value}"$ )
+End Sub
+
+Private Sub s_almacenAA_ItemClick (Position As Int, Value As Object)
+	almacenEmpresa = spinnerEmpresaMap.Get(Value)
+	almacenDeRuta = Value
+	Log(Value)
+	almacenAA = almacenEmpresa
+	Log($"Almacén ${almacenEmpresa} de ${laEmpresa} seleccionado"$ )
+End Sub
+
+Private Sub b_abrirAvion_Click
+	Log(empresaAA)
+	Log(almacenAA)
+	Log(et_rutaAA.text)
+	reqManager.Initialize(Me, DBRS_1781)
+	cmd.Name = $"abrirAvion1_${empresaAA}"$
+	cmd.Parameters = Array As Object(almacenAA, et_rutaAA.text)
+	reqManager.ExecuteCommand(cmd, $"abrirAvion1_${empresaAA}"$)
+	cmd.Name = $"abrirAvion2_${empresaAA}"$
+	cmd.Parameters = Array As Object(et_rutaAA.text, almacenAA)
+	reqManager.ExecuteCommand(cmd, $"abrirAvion2_${empresaAA}"$)
 End Sub
\ No newline at end of file
diff --git a/soporteKMS.b4a.meta b/soporteKMS.b4a.meta
index f7a3858..536e163 100644
--- a/soporteKMS.b4a.meta
+++ b/soporteKMS.b4a.meta
@@ -10,6 +10,6 @@ ModuleClosedNodes0=2
 ModuleClosedNodes1=
 ModuleClosedNodes2=1
 ModuleClosedNodes3=1,9,11
-NavigationStack=Main,borrarVentaForzadaGuna,616,1,Main,Process_Globals,33,0,Main,s_empresaBV_ItemClick,1643,0,Visual Designer,layout1.bal,-100,4,Main,b_borrarVentaBV_Click,1565,0,Main,JobDone,870,6,Main,borrarVentaForzadaDurakelo,598,0,Main,b_forzarVentaBV_Click,1523,0,Main,s_almacenBV_ItemClick,1623,0,Main,b_revisarVentaBV_Click,1587,2
+NavigationStack=Main,b_desbloquea_Click,489,0,Main,s_almacenBV_ItemClick,1640,0,Main,et_rutaBV_TextChanged,1639,0,Main,b_borrarVentaBV_Click,1549,0,Main,JobDone,842,0,Main,Globals,171,5,Main,s_empresaAA_ItemClick,1769,2,Diseñador Visual,layout1.bal,-100,1,Main,b_abrirAvion_Click,1788,6,Main,s_almacenAA_ItemClick,1778,2
 SelectedBuild=0
 VisibleModules=2,3,1