From 09aee86ea40a80b2791d1627b8df2cd143b3ee1a Mon Sep 17 00:00:00 2001 From: Jose Alberto Guerra Ugalde Date: Wed, 22 Nov 2023 10:39:09 -0600 Subject: [PATCH] =?UTF-8?q?22/11/23=20-=20Se=20agreg=C3=B3=20etiqueta=20co?= =?UTF-8?q?n=20versi=C3=B3n=20en=20seleccion=20y=20mapa=5Fruta.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Files/mapa_rutas.bal | Bin 5796 -> 6211 bytes Files/seleccion.bal | Bin 50306 -> 50727 bytes MAPA_RUTAS.bas | 6 +- colonia2.bas | 2 +- durakelo.b4a | 998 ++++++++++++++++++++++++++++--------------- durakelo.b4a.meta | 10 +- seleccion.bas | 28 +- 7 files changed, 679 insertions(+), 365 deletions(-) diff --git a/Files/mapa_rutas.bal b/Files/mapa_rutas.bal index da1d154aad7b3c50585c218279c23ccbad20461f..d769f3c395690cda92829aeb6b6633ab94f3cc91 100644 GIT binary patch delta 689 zcmb7>ze_?<6vyAGG~U&x*Pl%p#qf()3h`#qoA=I+G=^6rj{C9 zoQ1Y1XpY99sehm$`UC1*tsp_F;e6k@U+y`dbM9*f??Q@6lB5TaBt~DSp;Q!^l3MPd zw6|ZW?-&h@naP;T7fQ7$<2(bh@s=`)I}GEXf&&+!3ft`)XqxmNrK0gdayGF<&84u0 z_n@{L!>49Q;E6Se7Zx90atEfE8`2oEYmp4y(qd|$3V|+)t=p|eV8?3o_zqj5`cjK delta 498 zcmX?Xutb-am4Sg_8zTb)7mya5$eYQ<24wgoCZ*<>Okx*h1+ykDk6`4O#ON=`1C-+h zVm=_|2V#NAIgHti*_&@LE@5Q@8p2>CHF+bm_~!NOJ#3R#^K(gr1I3tun1M3_NHBpI zkwAiV@;_lQ#+bzLML@0(6q1>IQN)HZZ8D!I%m-;WEJ+7jQpdwN`I)GZL4~GxKr+Svm1#sYS(^`FWcon2#|rmTs13YiFs~ z1j=ZEWPz9&h*^L*7l`wKI3I`$kl2Mt>>?y~F%r83iCv1sE<<9M1KAZoT*<(o#88Fc zFjONcssXaW4w~%FEzb&e=HzT{c}|!kn>V*}KVxLH-kis)Dj>rIRBddG;!RK}1bMo9 zglwKHdw&^|1>@w2DbAAvI(R1^h?ZosWSs2aBFSXMI5{w0WO9HS>tuse&dH0tg+MYB lU34cqxN$MBT)A>G<7`{TUz6)?r6xyPDohSI%*VvY004n3L?ZwI delta 267 zcmZ49!`#%#%*)Eaz>vzzz`zBhn>X@$GjC31KE}jYvRQ|%ou!@`D9QrFIY68X#CbrR zkHjuOVizK@i;&pGNbC|Mb}16O49G4A;tC+HM6lf$s(>7r#nnJI%t19kwk8m30dXx7 tyAFw64`hSYPp;sW-@KUnF(aeJ=5}6Hfz2mm?=PF2Q^CasRKdW=000IKB*p*$ diff --git a/MAPA_RUTAS.bas b/MAPA_RUTAS.bas index 5b95a69..721878f 100644 --- a/MAPA_RUTAS.bas +++ b/MAPA_RUTAS.bas @@ -56,8 +56,7 @@ Sub Globals Dim GoogleMapEXTRA As GoogleMapsExtras Dim CODIGO As String Private SEMANA As String - - + Private l_version As Label End Sub Sub Activity_Create(FirstTime As Boolean) @@ -108,7 +107,8 @@ Sub Activity_Create(FirstTime As Boolean) ' c.Close ' End If - + l_version.Text = Application.VersionName + l_version.Left = Activity.Width - l_version.Width - 10dip End Sub Sub MapFragment1_Ready diff --git a/colonia2.bas b/colonia2.bas index b282301..6d4bd81 100644 --- a/colonia2.bas +++ b/colonia2.bas @@ -474,7 +474,7 @@ ELSE IF PERFIL = "V-ESPECIAL" Then label2 = LV_PRECIOS.TwoLinesLayout.SecondLabel label2.TextSize = 10 label2.TextColor = Colors.Black - + If c.RowCount>0 Then For i=0 To c.RowCount -1 c.Position=i diff --git a/durakelo.b4a b/durakelo.b4a index a988777..510bd25 100644 --- a/durakelo.b4a +++ b/durakelo.b4a @@ -1,361 +1,513 @@ Build1=Default,durakelo.keymon.com.mx File1=alcancia.png File10=detalle_promo.bal -File100=marker-azul-69.png -File101=marker-azul-7.png -File102=marker-azul-70.png -File103=marker-azul-71.png -File104=marker-azul-72.png -File105=marker-azul-73.png -File106=marker-azul-74.png -File107=marker-azul-75.png -File108=marker-azul-76.png -File109=marker-azul-77.png +File100=marker-azul-20.png +File101=marker-azul-21.png +File102=marker-azul-22.png +File103=marker-azul-23.png +File104=marker-azul-24.png +File105=marker-azul-25.png +File106=marker-azul-26.png +File107=marker-azul-27.png +File108=marker-azul-28.png +File109=marker-azul-29.png File11=durakelo.png -File110=marker-azul-78.png -File111=marker-azul-79.png -File112=marker-azul-8.png -File113=marker-azul-80.png -File114=marker-azul-81.png -File115=marker-azul-82.png -File116=marker-azul-83.png -File117=marker-azul-84.png -File118=marker-azul-85.png -File119=marker-azul-86.png -File12=durakelo1.png -File120=marker-azul-87.png -File121=marker-azul-88.png -File122=marker-azul-89.png -File123=marker-azul-9.png -File124=marker-azul-90.png -File125=marker-azul-91.png -File126=marker-azul-92.png -File127=marker-azul-93.png -File128=marker-azul-94.png -File129=marker-azul-95.png -File13=engrane.jpg -File130=marker-azul-96.png -File131=marker-azul-97.png -File132=marker-azul-98.png -File133=marker-azul-99.png -File134=marker-rojo-0.png -File135=marker-rojo-1.png -File136=marker-rojo-10.png -File137=marker-rojo-100.png -File138=marker-rojo-11.png -File139=marker-rojo-12.png -File14=espera.gif -File140=marker-rojo-13.png -File141=marker-rojo-14.png -File142=marker-rojo-15.png -File143=marker-rojo-16.png -File144=marker-rojo-17.png -File145=marker-rojo-18.png -File146=marker-rojo-19.png -File147=marker-rojo-2.png -File148=marker-rojo-20.png -File149=marker-rojo-21.png -File15=fila.bal -File150=marker-rojo-22.png -File151=marker-rojo-23.png -File152=marker-rojo-24.png -File153=marker-rojo-25.png -File154=marker-rojo-26.png -File155=marker-rojo-27.png -File156=marker-rojo-28.png -File157=marker-rojo-29.png -File158=marker-rojo-3.png -File159=marker-rojo-30.png -File16=fondo_kmt.jpg -File160=marker-rojo-31.png -File161=marker-rojo-32.png -File162=marker-rojo-33.png -File163=marker-rojo-34.png -File164=marker-rojo-35.png -File165=marker-rojo-36.png -File166=marker-rojo-37.png -File167=marker-rojo-38.png -File168=marker-rojo-39.png -File169=marker-rojo-4.png -File17=foto.bal -File170=marker-rojo-40.png -File171=marker-rojo-41.png -File172=marker-rojo-42.png -File173=marker-rojo-43.png -File174=marker-rojo-44.png -File175=marker-rojo-45.png -File176=marker-rojo-46.png -File177=marker-rojo-47.png -File178=marker-rojo-48.png -File179=marker-rojo-49.png -File18=guardagestion.bal -File180=marker-rojo-5.png -File181=marker-rojo-50.png -File182=marker-rojo-51.png -File183=marker-rojo-52.png -File184=marker-rojo-53.png -File185=marker-rojo-54.png -File186=marker-rojo-55.png -File187=marker-rojo-56.png -File188=marker-rojo-57.png -File189=marker-rojo-58.png -File19=guna_viejo.png -File190=marker-rojo-59.png -File191=marker-rojo-6.png -File192=marker-rojo-60.png -File193=marker-rojo-61.png -File194=marker-rojo-62.png -File195=marker-rojo-63.png -File196=marker-rojo-64.png -File197=marker-rojo-65.png -File198=marker-rojo-66.png -File199=marker-rojo-67.png +File110=marker-azul-3.png +File111=marker-azul-30.png +File112=marker-azul-31.png +File113=marker-azul-32.png +File114=marker-azul-33.png +File115=marker-azul-34.png +File116=marker-azul-35.png +File117=marker-azul-36.png +File118=marker-azul-37.png +File119=marker-azul-38.png +File12=durakelo_192x192.png +File120=marker-azul-39.png +File121=marker-azul-4.png +File122=marker-azul-40.png +File123=marker-azul-41.png +File124=marker-azul-42.png +File125=marker-azul-43.png +File126=marker-azul-44.png +File127=marker-azul-45.png +File128=marker-azul-46.png +File129=marker-azul-47.png +File13=durakelo1.png +File130=marker-azul-48.png +File131=marker-azul-49.png +File132=marker-azul-5.png +File133=marker-azul-50.png +File134=marker-azul-51.png +File135=marker-azul-52.png +File136=marker-azul-53.png +File137=marker-azul-54.png +File138=marker-azul-55.png +File139=marker-azul-56.png +File14=engrane.jpg +File140=marker-azul-57.png +File141=marker-azul-58.png +File142=marker-azul-59.png +File143=marker-azul-6.png +File144=marker-azul-60.png +File145=marker-azul-61.png +File146=marker-azul-62.png +File147=marker-azul-63.png +File148=marker-azul-64.png +File149=marker-azul-65.png +File15=engrane3.png +File150=marker-azul-66.png +File151=marker-azul-67.png +File152=marker-azul-68.png +File153=marker-azul-69.png +File154=marker-azul-7.png +File155=marker-azul-70.png +File156=marker-azul-71.png +File157=marker-azul-72.png +File158=marker-azul-73.png +File159=marker-azul-74.png +File16=espera.gif +File160=marker-azul-75.png +File161=marker-azul-76.png +File162=marker-azul-77.png +File163=marker-azul-78.png +File164=marker-azul-79.png +File165=marker-azul-8.png +File166=marker-azul-80.png +File167=marker-azul-81.png +File168=marker-azul-82.png +File169=marker-azul-83.png +File17=fila.bal +File170=marker-azul-84.png +File171=marker-azul-85.png +File172=marker-azul-86.png +File173=marker-azul-87.png +File174=marker-azul-88.png +File175=marker-azul-89.png +File176=marker-azul-9.png +File177=marker-azul-90.png +File178=marker-azul-91.png +File179=marker-azul-92.png +File18=fondo_kmt.jpg +File180=marker-azul-93.png +File181=marker-azul-94.png +File182=marker-azul-95.png +File183=marker-azul-96.png +File184=marker-azul-97.png +File185=marker-azul-98.png +File186=marker-azul-99.png +File187=marker-rojo-0.png +File188=marker-rojo-1.png +File189=marker-rojo-10.png +File19=foto.bal +File190=marker-rojo-100.png +File191=marker-rojo-101.png +File192=marker-rojo-102.png +File193=marker-rojo-103.png +File194=marker-rojo-104.png +File195=marker-rojo-105.png +File196=marker-rojo-106.png +File197=marker-rojo-107.png +File198=marker-rojo-108.png +File199=marker-rojo-109.png File2=alert2.png -File20=info_gral.bal -File200=marker-rojo-68.png -File201=marker-rojo-69.png -File202=marker-rojo-7.png -File203=marker-rojo-70.png -File204=marker-rojo-71.png -File205=marker-rojo-72.png -File206=marker-rojo-73.png -File207=marker-rojo-74.png -File208=marker-rojo-75.png -File209=marker-rojo-76.png -File21=infonavit1.jpg -File210=marker-rojo-77.png -File211=marker-rojo-78.png -File212=marker-rojo-79.png -File213=marker-rojo-8.png -File214=marker-rojo-80.png -File215=marker-rojo-81.png -File216=marker-rojo-82.png -File217=marker-rojo-83.png -File218=marker-rojo-84.png -File219=marker-rojo-85.png -File22=itembuttonblue.png -File220=marker-rojo-86.png -File221=marker-rojo-87.png -File222=marker-rojo-88.png -File223=marker-rojo-89.png -File224=marker-rojo-9.png -File225=marker-rojo-90.png -File226=marker-rojo-91.png -File227=marker-rojo-92.png -File228=marker-rojo-93.png -File229=marker-rojo-94.png -File23=k.png -File230=marker-rojo-95.png -File231=marker-rojo-96.png -File232=marker-rojo-97.png -File233=marker-rojo-98.png -File234=marker-rojo-99.png -File235=marker-verde-0.png -File236=marker-verde-1.png -File237=marker-verde-10.png -File238=marker-verde-100.png -File239=marker-verde-11.png -File24=kelloggs.png -File240=marker-verde-12.png -File241=marker-verde-13.png -File242=marker-verde-14.png -File243=marker-verde-15.png -File244=marker-verde-16.png -File245=marker-verde-17.png -File246=marker-verde-18.png -File247=marker-verde-19.png -File248=marker-verde-2.png -File249=marker-verde-20.png -File25=keymon_logo.png -File250=marker-verde-21.png -File251=marker-verde-22.png -File252=marker-verde-23.png -File253=marker-verde-24.png -File254=marker-verde-25.png -File255=marker-verde-26.png -File256=marker-verde-27.png -File257=marker-verde-28.png -File258=marker-verde-29.png -File259=marker-verde-3.png -File26=kmt.db -File260=marker-verde-30.png -File261=marker-verde-31.png -File262=marker-verde-32.png -File263=marker-verde-33.png -File264=marker-verde-34.png -File265=marker-verde-35.png -File266=marker-verde-36.png -File267=marker-verde-37.png -File268=marker-verde-38.png -File269=marker-verde-39.png -File27=login.bal -File270=marker-verde-4.png -File271=marker-verde-40.png -File272=marker-verde-41.png -File273=marker-verde-42.png -File274=marker-verde-43.png -File275=marker-verde-44.png -File276=marker-verde-45.png -File277=marker-verde-46.png -File278=marker-verde-47.png -File279=marker-verde-48.png -File28=logo sanfer.jpg -File280=marker-verde-49.png -File281=marker-verde-5.png -File282=marker-verde-50.png -File283=marker-verde-51.png -File284=marker-verde-52.png -File285=marker-verde-53.png -File286=marker-verde-54.png -File287=marker-verde-55.png -File288=marker-verde-56.png -File289=marker-verde-57.png -File29=logo_exitus1.jpg -File290=marker-verde-58.png -File291=marker-verde-59.png -File292=marker-verde-6.png -File293=marker-verde-60.png -File294=marker-verde-61.png -File295=marker-verde-62.png -File296=marker-verde-63.png -File297=marker-verde-64.png -File298=marker-verde-65.png -File299=marker-verde-66.png +File20=guardagestion.bal +File200=marker-rojo-11.png +File201=marker-rojo-110.png +File202=marker-rojo-111.png +File203=marker-rojo-112.png +File204=marker-rojo-113.png +File205=marker-rojo-114.png +File206=marker-rojo-115.png +File207=marker-rojo-116.png +File208=marker-rojo-117.png +File209=marker-rojo-118.png +File21=guna_viejo.png +File210=marker-rojo-119.png +File211=marker-rojo-12.png +File212=marker-rojo-120.png +File213=marker-rojo-121.png +File214=marker-rojo-122.png +File215=marker-rojo-123.png +File216=marker-rojo-124.png +File217=marker-rojo-125.png +File218=marker-rojo-126.png +File219=marker-rojo-127.png +File22=info_gral.bal +File220=marker-rojo-128.png +File221=marker-rojo-129.png +File222=marker-rojo-13.png +File223=marker-rojo-130.png +File224=marker-rojo-131.png +File225=marker-rojo-132.png +File226=marker-rojo-133.png +File227=marker-rojo-134.png +File228=marker-rojo-135.png +File229=marker-rojo-136.png +File23=infonavit1.jpg +File230=marker-rojo-137.png +File231=marker-rojo-138.png +File232=marker-rojo-139.png +File233=marker-rojo-14.png +File234=marker-rojo-140.png +File235=marker-rojo-141.png +File236=marker-rojo-142.png +File237=marker-rojo-143.png +File238=marker-rojo-144.png +File239=marker-rojo-145.png +File24=itembuttonblue.png +File240=marker-rojo-146.png +File241=marker-rojo-147.png +File242=marker-rojo-148.png +File243=marker-rojo-149.png +File244=marker-rojo-15.png +File245=marker-rojo-150.png +File246=marker-rojo-16.png +File247=marker-rojo-17.png +File248=marker-rojo-18.png +File249=marker-rojo-19.png +File25=k.png +File250=marker-rojo-20.png +File251=marker-rojo-21.png +File252=marker-rojo-22.png +File253=marker-rojo-23.png +File254=marker-rojo-24.png +File255=marker-rojo-25.png +File256=marker-rojo-26.png +File257=marker-rojo-27.png +File258=marker-rojo-28.png +File259=marker-rojo-29.png +File26=K-b27c0809.png +File260=marker-rojo-3.png +File261=marker-rojo-30.png +File262=marker-rojo-31.png +File263=marker-rojo-32.png +File264=marker-rojo-33.png +File265=marker-rojo-34.png +File266=marker-rojo-35.png +File267=marker-rojo-36.png +File268=marker-rojo-37.png +File269=marker-rojo-38.png +File27=kelloggs.png +File270=marker-rojo-39.png +File271=marker-rojo-4.png +File272=marker-rojo-40.png +File273=marker-rojo-41.png +File274=marker-rojo-42.png +File275=marker-rojo-43.png +File276=marker-rojo-44.png +File277=marker-rojo-45.png +File278=marker-rojo-46.png +File279=marker-rojo-47.png +File28=keymon_logo.png +File280=marker-rojo-48.png +File281=marker-rojo-49.png +File282=marker-rojo-5.png +File283=marker-rojo-50.png +File284=marker-rojo-51.png +File285=marker-rojo-52.png +File286=marker-rojo-53.png +File287=marker-rojo-54.png +File288=marker-rojo-55.png +File289=marker-rojo-56.png +File29=kmt.db +File290=marker-rojo-57.png +File291=marker-rojo-58.png +File292=marker-rojo-59.png +File293=marker-rojo-6.png +File294=marker-rojo-60.png +File295=marker-rojo-61.png +File296=marker-rojo-62.png +File297=marker-rojo-63.png +File298=marker-rojo-64.png +File299=marker-rojo-65.png File3=alerta.jpg -File30=Malo.jpg -File300=marker-verde-67.png -File301=marker-verde-68.png -File302=marker-verde-69.png -File303=marker-verde-7.png -File304=marker-verde-70.png -File305=marker-verde-71.png -File306=marker-verde-72.png -File307=marker-verde-73.png -File308=marker-verde-74.png -File309=marker-verde-75.png -File31=mapa.bal -File310=marker-verde-76.png -File311=marker-verde-77.png -File312=marker-verde-78.png -File313=marker-verde-79.png -File314=marker-verde-8.png -File315=marker-verde-80.png -File316=marker-verde-81.png -File317=marker-verde-82.png -File318=marker-verde-83.png -File319=marker-verde-84.png -File32=mapa_rutas.bal -File320=marker-verde-85.png -File321=marker-verde-86.png -File322=marker-verde-87.png -File323=marker-verde-88.png -File324=marker-verde-89.png -File325=marker-verde-9.png -File326=marker-verde-90.png -File327=marker-verde-91.png -File328=marker-verde-92.png -File329=marker-verde-93.png -File33=marker-azul-0.png -File330=marker-verde-94.png -File331=marker-verde-95.png -File332=marker-verde-96.png -File333=marker-verde-97.png -File334=marker-verde-98.png -File335=marker-verde-99.png -File336=nopago.bal -File337=nuevocliente.bal -File338=palomita_verde.png -File339=pedido.bal -File34=marker-azul-1.png -File340=planfia_logo.png -File341=planfia_logo_old.png -File342=planfia_logo_old2.png -File343=productos.bal -File344=qr.bal -File345=rechazo.jpg -File346=rojo.png -File347=salma.jpg -File348=salma.png -File349=seleccion.bal -File35=marker-azul-10.png -File350=senial.jpg -File351=sync.png -File352=tache_rojo.png -File353=tarjeta.bal -File354=telefonos.bal -File355=Tiendita.jpg -File356=unilever.jpg -File357=verde.png -File36=marker-azul-100.png -File37=marker-azul-11.png -File38=marker-azul-12.png -File39=marker-azul-13.png +File30=login.bal +File300=marker-rojo-66.png +File301=marker-rojo-67.png +File302=marker-rojo-68.png +File303=marker-rojo-69.png +File304=marker-rojo-7.png +File305=marker-rojo-70.png +File306=marker-rojo-71.png +File307=marker-rojo-72.png +File308=marker-rojo-73.png +File309=marker-rojo-74.png +File31=logo sanfer.jpg +File310=marker-rojo-75.png +File311=marker-rojo-76.png +File312=marker-rojo-77.png +File313=marker-rojo-78.png +File314=marker-rojo-79.png +File315=marker-rojo-8.png +File316=marker-rojo-80.png +File317=marker-rojo-81.png +File318=marker-rojo-82.png +File319=marker-rojo-83.png +File32=logo_exitus1.jpg +File320=marker-rojo-84.png +File321=marker-rojo-85.png +File322=marker-rojo-86.png +File323=marker-rojo-87.png +File324=marker-rojo-88.png +File325=marker-rojo-89.png +File326=marker-rojo-9.png +File327=marker-rojo-90.png +File328=marker-rojo-91.png +File329=marker-rojo-92.png +File33=Malo.jpg +File330=marker-rojo-93.png +File331=marker-rojo-94.png +File332=marker-rojo-95.png +File333=marker-rojo-96.png +File334=marker-rojo-97.png +File335=marker-rojo-98.png +File336=marker-rojo-99.png +File337=marker-verde-0.png +File338=marker-verde-1.png +File339=marker-verde-10.png +File34=mapa.bal +File340=marker-verde-100.png +File341=marker-verde-101.png +File342=marker-verde-102.png +File343=marker-verde-103.png +File344=marker-verde-104.png +File345=marker-verde-105.png +File346=marker-verde-106.png +File347=marker-verde-107.png +File348=marker-verde-108.png +File349=marker-verde-109.png +File35=mapa_rutas.bal +File350=marker-verde-11.png +File351=marker-verde-110.png +File352=marker-verde-111.png +File353=marker-verde-112.png +File354=marker-verde-113.png +File355=marker-verde-114.png +File356=marker-verde-115.png +File357=marker-verde-116.png +File358=marker-verde-117.png +File359=marker-verde-118.png +File36=marker-azul-0.png +File360=marker-verde-119.png +File361=marker-verde-12.png +File362=marker-verde-120.png +File363=marker-verde-121.png +File364=marker-verde-122.png +File365=marker-verde-123.png +File366=marker-verde-124.png +File367=marker-verde-125.png +File368=marker-verde-126.png +File369=marker-verde-127.png +File37=marker-azul-1.png +File370=marker-verde-128.png +File371=marker-verde-129.png +File372=marker-verde-13.png +File373=marker-verde-130.png +File374=marker-verde-131.png +File375=marker-verde-132.png +File376=marker-verde-133.png +File377=marker-verde-134.png +File378=marker-verde-135.png +File379=marker-verde-136.png +File38=marker-azul-10.png +File380=marker-verde-137.png +File381=marker-verde-138.png +File382=marker-verde-139.png +File383=marker-verde-14.png +File384=marker-verde-140.png +File385=marker-verde-141.png +File386=marker-verde-142.png +File387=marker-verde-143.png +File388=marker-verde-144.png +File389=marker-verde-145.png +File39=marker-azul-100.png +File390=marker-verde-146.png +File391=marker-verde-147.png +File392=marker-verde-148.png +File393=marker-verde-149.png +File394=marker-verde-15.png +File395=marker-verde-150.png +File396=marker-verde-16.png +File397=marker-verde-17.png +File398=marker-verde-18.png +File399=marker-verde-19.png File4=alerta_amarilla.png -File40=marker-azul-14.png -File41=marker-azul-15.png -File42=marker-azul-16.png -File43=marker-azul-17.png -File44=marker-azul-18.png -File45=marker-azul-19.png -File46=marker-azul-2.png -File47=marker-azul-20.png -File48=marker-azul-21.png -File49=marker-azul-22.png +File40=marker-azul-101.png +File400=marker-verde-2.png +File401=marker-verde-20.png +File402=marker-verde-21.png +File403=marker-verde-22.png +File404=marker-verde-23.png +File405=marker-verde-24.png +File406=marker-verde-25.png +File407=marker-verde-26.png +File408=marker-verde-27.png +File409=marker-verde-28.png +File41=marker-azul-102.png +File410=marker-verde-29.png +File411=marker-verde-3.png +File412=marker-verde-30.png +File413=marker-verde-31.png +File414=marker-verde-32.png +File415=marker-verde-33.png +File416=marker-verde-34.png +File417=marker-verde-35.png +File418=marker-verde-36.png +File419=marker-verde-37.png +File42=marker-azul-103.png +File420=marker-verde-38.png +File421=marker-verde-39.png +File422=marker-verde-4.png +File423=marker-verde-40.png +File424=marker-verde-41.png +File425=marker-verde-42.png +File426=marker-verde-43.png +File427=marker-verde-44.png +File428=marker-verde-45.png +File429=marker-verde-46.png +File43=marker-azul-104.png +File430=marker-verde-47.png +File431=marker-verde-48.png +File432=marker-verde-49.png +File433=marker-verde-5.png +File434=marker-verde-50.png +File435=marker-verde-51.png +File436=marker-verde-52.png +File437=marker-verde-53.png +File438=marker-verde-54.png +File439=marker-verde-55.png +File44=marker-azul-105.png +File440=marker-verde-56.png +File441=marker-verde-57.png +File442=marker-verde-58.png +File443=marker-verde-59.png +File444=marker-verde-6.png +File445=marker-verde-60.png +File446=marker-verde-61.png +File447=marker-verde-62.png +File448=marker-verde-63.png +File449=marker-verde-64.png +File45=marker-azul-106.png +File450=marker-verde-65.png +File451=marker-verde-66.png +File452=marker-verde-67.png +File453=marker-verde-68.png +File454=marker-verde-69.png +File455=marker-verde-7.png +File456=marker-verde-70.png +File457=marker-verde-71.png +File458=marker-verde-72.png +File459=marker-verde-73.png +File46=marker-azul-107.png +File460=marker-verde-74.png +File461=marker-verde-75.png +File462=marker-verde-76.png +File463=marker-verde-77.png +File464=marker-verde-78.png +File465=marker-verde-79.png +File466=marker-verde-8.png +File467=marker-verde-80.png +File468=marker-verde-81.png +File469=marker-verde-82.png +File47=marker-azul-108.png +File470=marker-verde-83.png +File471=marker-verde-84.png +File472=marker-verde-85.png +File473=marker-verde-86.png +File474=marker-verde-87.png +File475=marker-verde-88.png +File476=marker-verde-89.png +File477=marker-verde-9.png +File478=marker-verde-90.png +File479=marker-verde-91.png +File48=marker-azul-109.png +File480=marker-verde-92.png +File481=marker-verde-93.png +File482=marker-verde-94.png +File483=marker-verde-95.png +File484=marker-verde-96.png +File485=marker-verde-97.png +File486=marker-verde-98.png +File487=marker-verde-99.png +File488=nopago.bal +File489=nuevocliente.bal +File49=marker-azul-11.png +File490=palomita_verde.png +File491=pedido.bal +File492=planfia_logo.png +File493=planfia_logo_old.png +File494=planfia_logo_old2.png +File495=productos.bal +File496=qr.bal +File497=rechazo.jpg +File498=rojo.png +File499=salma.jpg File5=amarillo.png -File50=marker-azul-23.png -File51=marker-azul-24.png -File52=marker-azul-25.png -File53=marker-azul-26.png -File54=marker-azul-27.png -File55=marker-azul-28.png -File56=marker-azul-29.png -File57=marker-azul-3.png -File58=marker-azul-30.png -File59=marker-azul-31.png +File50=marker-azul-110.png +File500=salma.png +File501=seleccion.bal +File502=senial.jpg +File503=sync.png +File504=tache_rojo.png +File505=tarjeta.bal +File506=telefonos.bal +File507=Tiendita.jpg +File508=unilever.jpg +File509=verde.png +File51=marker-azul-111.png +File52=marker-azul-112.png +File53=marker-azul-113.png +File54=marker-azul-114.png +File55=marker-azul-115.png +File56=marker-azul-116.png +File57=marker-azul-117.png +File58=marker-azul-118.png +File59=marker-azul-119.png File6=anterior.jpg -File60=marker-azul-32.png -File61=marker-azul-33.png -File62=marker-azul-34.png -File63=marker-azul-35.png -File64=marker-azul-36.png -File65=marker-azul-37.png -File66=marker-azul-38.png -File67=marker-azul-39.png -File68=marker-azul-4.png -File69=marker-azul-40.png +File60=marker-azul-12.png +File61=marker-azul-120.png +File62=marker-azul-121.png +File63=marker-azul-122.png +File64=marker-azul-123.png +File65=marker-azul-124.png +File66=marker-azul-125.png +File67=marker-azul-126.png +File68=marker-azul-127.png +File69=marker-azul-128.png File7=buscar.bal -File70=marker-azul-41.png -File71=marker-azul-42.png -File72=marker-azul-43.png -File73=marker-azul-44.png -File74=marker-azul-45.png -File75=marker-azul-46.png -File76=marker-azul-47.png -File77=marker-azul-48.png -File78=marker-azul-49.png -File79=marker-azul-5.png +File70=marker-azul-129.png +File71=marker-azul-13.png +File72=marker-azul-130.png +File73=marker-azul-131.png +File74=marker-azul-132.png +File75=marker-azul-133.png +File76=marker-azul-134.png +File77=marker-azul-135.png +File78=marker-azul-136.png +File79=marker-azul-137.png File8=carrito.png -File80=marker-azul-50.png -File81=marker-azul-51.png -File82=marker-azul-52.png -File83=marker-azul-53.png -File84=marker-azul-54.png -File85=marker-azul-55.png -File86=marker-azul-56.png -File87=marker-azul-57.png -File88=marker-azul-58.png -File89=marker-azul-59.png +File80=marker-azul-138.png +File81=marker-azul-139.png +File82=marker-azul-14.png +File83=marker-azul-140.png +File84=marker-azul-141.png +File85=marker-azul-142.png +File86=marker-azul-143.png +File87=marker-azul-144.png +File88=marker-azul-145.png +File89=marker-azul-146.png File9=celltitle.bal -File90=marker-azul-6.png -File91=marker-azul-60.png -File92=marker-azul-61.png -File93=marker-azul-62.png -File94=marker-azul-63.png -File95=marker-azul-64.png -File96=marker-azul-65.png -File97=marker-azul-66.png -File98=marker-azul-67.png -File99=marker-azul-68.png +File90=marker-azul-147.png +File91=marker-azul-148.png +File92=marker-azul-149.png +File93=marker-azul-15.png +File94=marker-azul-150.png +File95=marker-azul-16.png +File96=marker-azul-17.png +File97=marker-azul-18.png +File98=marker-azul-19.png +File99=marker-azul-2.png FileGroup1=Default Group FileGroup10=Default Group FileGroup100=Default Group @@ -643,23 +795,175 @@ FileGroup354=Default Group FileGroup355=Default Group FileGroup356=Default Group FileGroup357=Default Group +FileGroup358=Default Group +FileGroup359=Default Group FileGroup36=Default Group +FileGroup360=Default Group +FileGroup361=Default Group +FileGroup362=Default Group +FileGroup363=Default Group +FileGroup364=Default Group +FileGroup365=Default Group +FileGroup366=Default Group +FileGroup367=Default Group +FileGroup368=Default Group +FileGroup369=Default Group FileGroup37=Default Group +FileGroup370=Default Group +FileGroup371=Default Group +FileGroup372=Default Group +FileGroup373=Default Group +FileGroup374=Default Group +FileGroup375=Default Group +FileGroup376=Default Group +FileGroup377=Default Group +FileGroup378=Default Group +FileGroup379=Default Group FileGroup38=Default Group +FileGroup380=Default Group +FileGroup381=Default Group +FileGroup382=Default Group +FileGroup383=Default Group +FileGroup384=Default Group +FileGroup385=Default Group +FileGroup386=Default Group +FileGroup387=Default Group +FileGroup388=Default Group +FileGroup389=Default Group FileGroup39=Default Group +FileGroup390=Default Group +FileGroup391=Default Group +FileGroup392=Default Group +FileGroup393=Default Group +FileGroup394=Default Group +FileGroup395=Default Group +FileGroup396=Default Group +FileGroup397=Default Group +FileGroup398=Default Group +FileGroup399=Default Group FileGroup4=Default Group FileGroup40=Default Group +FileGroup400=Default Group +FileGroup401=Default Group +FileGroup402=Default Group +FileGroup403=Default Group +FileGroup404=Default Group +FileGroup405=Default Group +FileGroup406=Default Group +FileGroup407=Default Group +FileGroup408=Default Group +FileGroup409=Default Group FileGroup41=Default Group +FileGroup410=Default Group +FileGroup411=Default Group +FileGroup412=Default Group +FileGroup413=Default Group +FileGroup414=Default Group +FileGroup415=Default Group +FileGroup416=Default Group +FileGroup417=Default Group +FileGroup418=Default Group +FileGroup419=Default Group FileGroup42=Default Group +FileGroup420=Default Group +FileGroup421=Default Group +FileGroup422=Default Group +FileGroup423=Default Group +FileGroup424=Default Group +FileGroup425=Default Group +FileGroup426=Default Group +FileGroup427=Default Group +FileGroup428=Default Group +FileGroup429=Default Group FileGroup43=Default Group +FileGroup430=Default Group +FileGroup431=Default Group +FileGroup432=Default Group +FileGroup433=Default Group +FileGroup434=Default Group +FileGroup435=Default Group +FileGroup436=Default Group +FileGroup437=Default Group +FileGroup438=Default Group +FileGroup439=Default Group FileGroup44=Default Group +FileGroup440=Default Group +FileGroup441=Default Group +FileGroup442=Default Group +FileGroup443=Default Group +FileGroup444=Default Group +FileGroup445=Default Group +FileGroup446=Default Group +FileGroup447=Default Group +FileGroup448=Default Group +FileGroup449=Default Group FileGroup45=Default Group +FileGroup450=Default Group +FileGroup451=Default Group +FileGroup452=Default Group +FileGroup453=Default Group +FileGroup454=Default Group +FileGroup455=Default Group +FileGroup456=Default Group +FileGroup457=Default Group +FileGroup458=Default Group +FileGroup459=Default Group FileGroup46=Default Group +FileGroup460=Default Group +FileGroup461=Default Group +FileGroup462=Default Group +FileGroup463=Default Group +FileGroup464=Default Group +FileGroup465=Default Group +FileGroup466=Default Group +FileGroup467=Default Group +FileGroup468=Default Group +FileGroup469=Default Group FileGroup47=Default Group +FileGroup470=Default Group +FileGroup471=Default Group +FileGroup472=Default Group +FileGroup473=Default Group +FileGroup474=Default Group +FileGroup475=Default Group +FileGroup476=Default Group +FileGroup477=Default Group +FileGroup478=Default Group +FileGroup479=Default Group FileGroup48=Default Group +FileGroup480=Default Group +FileGroup481=Default Group +FileGroup482=Default Group +FileGroup483=Default Group +FileGroup484=Default Group +FileGroup485=Default Group +FileGroup486=Default Group +FileGroup487=Default Group +FileGroup488=Default Group +FileGroup489=Default Group FileGroup49=Default Group +FileGroup490=Default Group +FileGroup491=Default Group +FileGroup492=Default Group +FileGroup493=Default Group +FileGroup494=Default Group +FileGroup495=Default Group +FileGroup496=Default Group +FileGroup497=Default Group +FileGroup498=Default Group +FileGroup499=Default Group FileGroup5=Default Group FileGroup50=Default Group +FileGroup500=Default Group +FileGroup501=Default Group +FileGroup502=Default Group +FileGroup503=Default Group +FileGroup504=Default Group +FileGroup505=Default Group +FileGroup506=Default Group +FileGroup507=Default Group +FileGroup508=Default Group +FileGroup509=Default Group FileGroup51=Default Group FileGroup52=Default Group FileGroup53=Default Group @@ -769,7 +1073,7 @@ Module6=DBRequestManager Module7=detalle_promo Module8=EscPosPrinter Module9=fila -NumberOfFiles=357 +NumberOfFiles=509 NumberOfLibraries=30 NumberOfModules=24 Version=12.5 diff --git a/durakelo.b4a.meta b/durakelo.b4a.meta index 0c20abb..1630ab5 100644 --- a/durakelo.b4a.meta +++ b/durakelo.b4a.meta @@ -54,14 +54,14 @@ ModuleClosedNodes10= ModuleClosedNodes11=5,6,7,10 ModuleClosedNodes12= ModuleClosedNodes13=2,6,8,9 -ModuleClosedNodes14= +ModuleClosedNodes14=3 ModuleClosedNodes15= ModuleClosedNodes16= ModuleClosedNodes17= ModuleClosedNodes18=6 ModuleClosedNodes19=4,5,6,7,8,9,10 ModuleClosedNodes2=2,6,7 -ModuleClosedNodes20=5 +ModuleClosedNodes20= ModuleClosedNodes21= ModuleClosedNodes22= ModuleClosedNodes23= @@ -72,7 +72,7 @@ ModuleClosedNodes5=2,3,6,7,8,9 ModuleClosedNodes6= ModuleClosedNodes7= ModuleClosedNodes8= -ModuleClosedNodes9=2,5,6,8,10,11,12,13,22,24,36,37 -NavigationStack=Main,ImageView4_Click,506,0,DBRequestManager,HandleJob,195,0,seleccion,connecta_Click,2009,0,MAPA_RUTAS,MapFragment1_Ready,135,0,DBRequestManager,Initialize,20,0,DBRequestManager,PrintTable,267,0,DBRequestManager,Class_Globals,12,0,seleccion,Subir_Click,862,0,seleccion,JobDone,1105,6,seleccion,cargar_Click,924,5 +ModuleClosedNodes9=2,5,6,8,10,11,12,13,24,36,37 +NavigationStack=Starter,ENVIA_ULTIMA_GPS,98,0,fila,B_IMP_Click,699,0,colonia2,HACER_PEDIDO,455,0,seleccion,Globals,164,0,seleccion,IsConnectedToInternet,266,0,seleccion,Activity_Create,184,6,Visual Designer,seleccion.bal,-100,4,Visual Designer,mapa_rutas.bal,-100,3,MAPA_RUTAS,Process_Globals,15,0,MAPA_RUTAS,Globals,16,0,MAPA_RUTAS,Activity_Create,98,6 SelectedBuild=0 -VisibleModules=21,20,12,4,5,9,8,24,6,14 +VisibleModules=21,20,24,14 diff --git a/seleccion.bas b/seleccion.bas index a962b24..20a4b79 100644 --- a/seleccion.bas +++ b/seleccion.bas @@ -167,6 +167,7 @@ Sub Globals Private cuantos_exib As String Dim ime As IME Private l_monto_kc As Label + Private l_version As Label End Sub Sub Activity_Create(FirstTime As Boolean) @@ -185,7 +186,9 @@ Sub Activity_Create(FirstTime As Boolean) ' valido donde escribo el archivo de la base de datos de kmt ruta = File.DirInternal -Log(SERVER) + l_version.Text = Application.VersionName + l_version.Left = Activity.Width - l_version.Width - 10dip + Log(SERVER) ' se crea o no el archivo de la base de ddatos de kmt 'NOTAS SI SE MODIFICA LA ESTRUCTURA SE QUITA EL IF Y SE VA DIRECTO A LA SENTENCIA FILE.COPY PARA QUE 'TOME LA NUEVA ESTRUCTURA ES MUY IMPORTANTE TENER EL IF DE LO CONTRARIO SOLO LO ESCRIBE UNA VEZ Y LO BORRA @@ -264,15 +267,12 @@ End Sub Sub IsConnectedToInternet As Boolean Dim r As Reflector - r.Target = r.GetContext r.Target = r.RunMethod2("getSystemService", "connectivity", "java.lang.String") r.Target = r.RunMethod("getActiveNetworkInfo") - If r.Target <> Null Then Return r.RunMethod("isConnectedOrConnecting") End If - Return False End Sub @@ -1295,6 +1295,7 @@ Sub JobDone(Job As HttpJob) Dim RESULT As DBResult = reqManager.HandleJob(Job) If RESULT.Tag = "gunaprod" Then 'query tag S_CP.Text = "CARGANDO" + skmt.BeginTransaction For Each records() As Object In RESULT.Rows Dim CAT_GP_ID As String = records(RESULT.Columns.Get("CAT_GP_ID")) @@ -1317,6 +1318,8 @@ Sub JobDone(Job As HttpJob) skmt.ExecNonQuery2("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_TIPOPROD,CAT_GP_INICIATIVA,CAT_GP_DEV,CAT_GP_CODPROMO) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,0)", Array As Object (CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG, CAT_GP_ALMACEN,CAT_GP_TIPOPROD, CAT_GP_INICIATIVA,CAT_GP_DEV)) Next + skmt.TransactionSuccessful + skmt.EndTransaction ' c=skmt.ExecQuery("select CAT_GP_CLASIF, COUNT(*) AS CUANTOS from CAT_GUNAPROD GROUP BY CAT_GP_CLASIF order by CAT_GP_CLASIF asc") ' c.Position=0 ' skmt.ExecNonQuery("DELETE FROM COUNT_GUNAPROD") @@ -1535,6 +1538,7 @@ Sub JobDone(Job As HttpJob) If Job.JobName = "DBRequest" Then Dim RESULT As DBResult = reqManager.HandleJob(Job) If RESULT.Tag = "detallepaq" Then 'query tag + skmt.BeginTransaction For Each records() As Object In RESULT.Rows Dim CAT_DP_ALMACEN As String = records(RESULT.Columns.Get("CAT_DP_ALMACEN")) @@ -1556,6 +1560,8 @@ Sub JobDone(Job As HttpJob) Next + skmt.TransactionSuccessful + skmt.EndTransaction If PB2.Progress = 0 Then PB2.Progress = 30 @@ -1585,7 +1591,7 @@ Sub JobDone(Job As HttpJob) If Job.JobName = "DBRequest" Then Dim RESULT As DBResult = reqManager.HandleJob(Job) If RESULT.Tag = "hist_datos" Then 'query tag - + skmt.BeginTransaction For Each records() As Object In RESULT.Rows Dim HVD_CLIENTE As String = records(RESULT.Columns.Get("HVD_CLIENTE")) @@ -1597,6 +1603,8 @@ Sub JobDone(Job As HttpJob) Next + skmt.TransactionSuccessful + skmt.EndTransaction Listo3 =1 If PB1.Progress = 0 Then @@ -1650,17 +1658,16 @@ Sub JobDone(Job As HttpJob) If Job.JobName = "DBRequest" Then Dim RESULT As DBResult = reqManager.HandleJob(Job) If RESULT.Tag = "hist_rmi" Then 'query tag - + skmt.BeginTransaction For Each records() As Object In RESULT.Rows - Dim HVD_CLIENTE As String = records(RESULT.Columns.Get("HVD_CLIENTE")) Dim HVD_PRONOMBRE As String = records(RESULT.Columns.Get("HVD_PRONOMBRE")) Dim HVD_CANT As String = records(RESULT.Columns.Get("HVD_CANT")) Dim HVD_PROID As String = records(RESULT.Columns.Get("HVD_PROID")) skmt.ExecNonQuery2("INSERT INTO HIST_RMI(HR_CLIENTE,HR_PRONOMBRE,HR_PROID, HR_CANT) VALUES (?,?,?,?)", Array As Object (HVD_CLIENTE,HVD_PRONOMBRE,HVD_PROID, HVD_CANT)) - - Next + skmt.TransactionSuccessful + skmt.EndTransaction Listo3 =1 If PB1.Progress = 0 Then @@ -1955,6 +1962,7 @@ Sub JobDone(Job As HttpJob) If Job.JobName = "DBRequest" Then Dim RESULT As DBResult = reqManager.HandleJob(Job) If RESULT.Tag = "precios" Then 'query tag + skmt.BeginTransaction For Each records() As Object In RESULT.Rows Dim CAT_GP_ID As String = records(RESULT.Columns.Get("CAT_GP_ID")) @@ -1974,6 +1982,8 @@ Sub JobDone(Job As HttpJob) skmt.ExecNonQuery2("INSERT INTO CAT_PRECIOS(CAT_GP_ID,CAT_GP_PRECIO, CAT_GP_PRECIO1,CAT_GP_PRECIO2,CAT_GP_PRECIO3,CAT_GP_PRECIO4,CAT_GP_PRECIO5,CAT_GP_PRECIO6,CAT_GP_PRECIO7,CAT_GP_PRECIO8,CAT_GP_PRECIO9, CAT_GP_PRECIO10) VALUES (?,?,?,?,?,?,?,?,?,?,?,?)", Array As Object (CAT_GP_ID,CAT_GP_PRECIO, CAT_GP_PRECIO1,CAT_GP_PRECIO2,CAT_GP_PRECIO3,CAT_GP_PRECIO4,CAT_GP_PRECIO5,CAT_GP_PRECIO6,CAT_GP_PRECIO7,CAT_GP_PRECIO8,CAT_GP_PRECIO9,CAT_GP_PRECIO10)) Next + skmt.TransactionSuccessful + skmt.EndTransaction skmt.ExecNonQuery("delete from LISTA_PRECIOS") skmt.ExecNonQuery(" insert into LISTA_PRECIOS(PRECIO, CAT_GP_ID, NLISTA) select cat_gp_precio as precio, cat_gp_id, '1' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO1 As precio, CAT_GP_ID, '2' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO2 As precio, CAT_GP_ID, '3' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO3 As precio, CAT_GP_ID, '4' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO4 As precio, CAT_GP_ID, '5' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO5 As precio, CAT_GP_ID, '6' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO6 As precio, CAT_GP_ID, '7' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO7 As precio, CAT_GP_ID, '8' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO8 As precio, CAT_GP_ID, '9' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO9 As precio, CAT_GP_ID, '10' as NLISTA from CAT_PRECIOS union Select CAT_GP_PRECIO10 As precio, CAT_GP_ID, '11' as NLISTA from CAT_PRECIOS")