Version: 5.04.18_V2

Se corigue Query del JobDone del tag "marcas_rutas"
This commit is contained in:
IsR0d
2025-04-22 13:10:58 -06:00
parent d94b5462ce
commit f0b4a1d395
495 changed files with 1878 additions and 1869 deletions

View File

@@ -42,16 +42,16 @@ int _difcant = 0;
anywheresoftware.b4a.sql.SQL.CursorWrapper _pe = null;
//BA.debugLineNum = 808;BA.debugLine="Sub actualizaProducto(cedis As String, costoU As S";
//BA.debugLineNum = 809;BA.debugLine="Log(\"Entramos a actualiza producto\")";
anywheresoftware.b4a.keywords.Common.LogImpl("758523649","Entramos a actualiza producto",0);
anywheresoftware.b4a.keywords.Common.LogImpl("538469633","Entramos a actualiza producto",0);
//BA.debugLineNum = 810;BA.debugLine="Private c As Cursor=B4XPages.MainPage.skmt.ExecQu";
_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper();
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select * from pedido where pe_cedis = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+"' and pe_proid = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+"' and pe_cliente = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+"' AND PE_FOLIO = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._tipo_venta /*String*/ ))+"'"))));
//BA.debugLineNum = 812;BA.debugLine="LogColor($\"actualizaProducto, c=${clienteId}, p=$";
anywheresoftware.b4a.keywords.Common.LogImpl("758523652",("actualizaProducto, c="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+", p="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+", nombre="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_nombre))+", cant="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cant))+", cedis="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+", tipo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipoventa))+""),anywheresoftware.b4a.keywords.Common.Colors.Magenta);
anywheresoftware.b4a.keywords.Common.LogImpl("538469636",("actualizaProducto, c="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+", p="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+", nombre="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_nombre))+", cant="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cant))+", cedis="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+", tipo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipoventa))+""),anywheresoftware.b4a.keywords.Common.Colors.Magenta);
//BA.debugLineNum = 813;BA.debugLine="If c.RowCount > 0 Then";
if (_c.getRowCount()>0) {
//BA.debugLineNum = 814;BA.debugLine="Log(\"----->1<--------------\")";
anywheresoftware.b4a.keywords.Common.LogImpl("758523654","----->1<--------------",0);
anywheresoftware.b4a.keywords.Common.LogImpl("538469638","----->1<--------------",0);
//BA.debugLineNum = 815;BA.debugLine="c.Position=0";
_c.setPosition((int) (0));
//BA.debugLineNum = 816;BA.debugLine="Private antCant As Int = 0";
@@ -70,7 +70,7 @@ mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._s
//BA.debugLineNum = 825;BA.debugLine="If cant = 0 Then";
if (_cant==0) {
//BA.debugLineNum = 826;BA.debugLine="Log(\"BORRAMOS PROD\")";
anywheresoftware.b4a.keywords.Common.LogImpl("758523666","BORRAMOS PROD",0);
anywheresoftware.b4a.keywords.Common.LogImpl("538469650","BORRAMOS PROD",0);
//BA.debugLineNum = 827;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"delete fr";
mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("delete from pedido where pe_cedis = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+"' and pe_proid = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+"' and pe_cliente = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+"' AND PE_FOLIO = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._tipo_venta /*String*/ ))+"'"));
//BA.debugLineNum = 828;BA.debugLine="Private pe As Cursor = B4XPages.MainPage.skmt.E";
@@ -84,7 +84,7 @@ mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._s
};
}else {
//BA.debugLineNum = 833;BA.debugLine="Log(\"----->2<--------------\")";
anywheresoftware.b4a.keywords.Common.LogImpl("758523673","----->2<--------------",0);
anywheresoftware.b4a.keywords.Common.LogImpl("538469657","----->2<--------------",0);
//BA.debugLineNum = 835;BA.debugLine="If cant <> 0 Then guardaProductoSinGestion(cedis";
if (_cant!=0) {
_guardaproductosingestion(_ba,_cedis,_costou,BA.NumberToString(_cant),_nombre,_prodid,_clienteid,_fecha,_usuario,_rutav,_preciosin,_tipoventa,_cantc,_bcajas);};
@@ -104,7 +104,7 @@ anywheresoftware.b4a.sql.SQL.CursorWrapper _pe = null;
_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper();
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select * from pedido where pe_cedis = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+"' and pe_proid = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+"' and pe_cliente = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+"' AND PE_FOLIO = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._tipo_venta /*String*/ ))+"'"))));
//BA.debugLineNum = 856;BA.debugLine="LogColor($\"actualizaProducto, c=${clienteId}, p=$";
anywheresoftware.b4a.keywords.Common.LogImpl("758654723",("actualizaProducto, c="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+", p="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+", nombre="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_nombre))+", cant="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cant))+", cedis="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+", tipo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipoventa))+""),anywheresoftware.b4a.keywords.Common.Colors.Magenta);
anywheresoftware.b4a.keywords.Common.LogImpl("538600707",("actualizaProducto, c="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+", p="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+", nombre="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_nombre))+", cant="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cant))+", cedis="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+", tipo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipoventa))+""),anywheresoftware.b4a.keywords.Common.Colors.Magenta);
//BA.debugLineNum = 858;BA.debugLine="If c.RowCount > 0 Then";
if (_c.getRowCount()>0) {
//BA.debugLineNum = 859;BA.debugLine="c.Position=0";
@@ -125,7 +125,7 @@ mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._s
//BA.debugLineNum = 868;BA.debugLine="If cant = 0 Then";
if (_cant==0) {
//BA.debugLineNum = 869;BA.debugLine="Log(\"BORRAMOS PROD\")";
anywheresoftware.b4a.keywords.Common.LogImpl("758654736","BORRAMOS PROD",0);
anywheresoftware.b4a.keywords.Common.LogImpl("538600720","BORRAMOS PROD",0);
//BA.debugLineNum = 870;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"delete fr";
mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("delete from pedido where pe_cedis = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+"' and pe_proid = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+"' and pe_cliente = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+"' AND PE_FOLIO = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._tipo_venta /*String*/ ))+"'"));
//BA.debugLineNum = 871;BA.debugLine="Private pe As Cursor = B4XPages.MainPage.skmt.E";
@@ -202,11 +202,11 @@ mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._s
try { //BA.debugLineNum = 1527;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"ALTER TAB";
mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("ALTER TABLE "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+" ADD COLUMN "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+""));
//BA.debugLineNum = 1528;BA.debugLine="Log($\"Columna \"${columna} ${tipo}\", agregada a";
anywheresoftware.b4a.keywords.Common.LogImpl("760293131",("Columna \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"\", agregada a \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+"\".."),0);
anywheresoftware.b4a.keywords.Common.LogImpl("540239115",("Columna \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"\", agregada a \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+"\".."),0);
}
catch (Exception e12) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e12); //BA.debugLineNum = 1530;BA.debugLine="Log(LastException)";
anywheresoftware.b4a.keywords.Common.LogImpl("760293133",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
anywheresoftware.b4a.keywords.Common.LogImpl("540239117",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
};
};
//BA.debugLineNum = 1533;BA.debugLine="End Sub";
@@ -229,7 +229,7 @@ boolean _res2 = false;
_thislog = anywheresoftware.b4a.keywords.Common.False;
//BA.debugLineNum = 1108;BA.debugLine="If thisLog Then LogColor(\"Inventario inicial: \"&i";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759244546","Inventario inicial: "+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Gray);};
anywheresoftware.b4a.keywords.Common.LogImpl("539190530","Inventario inicial: "+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Gray);};
//BA.debugLineNum = 1109;BA.debugLine="Private totalProdsVariables As Int = 0";
_totalprodsvariables = (int) (0);
//BA.debugLineNum = 1110;BA.debugLine="Private totalProdsVariables2 As Int = 0";
@@ -256,7 +256,7 @@ _p2 = BA.ObjectToString(_inventariosinfijos.Get((Object)(_t)));
_totalprodsvariables = (int) (_totalprodsvariables+(double)(Double.parseDouble(_p2)));
//BA.debugLineNum = 1122;BA.debugLine="If thisLog Then Log($\"prod ${t}, hay: ${p2}\"$)";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759244560",("prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", hay: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_p2))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539190544",("prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", hay: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_p2))+""),0);};
};
}
};
@@ -276,16 +276,16 @@ _p2 = BA.ObjectToString(_inventariosinfijos.Get((Object)(_t)));
_totalprodsvariables2 = (int) (_totalprodsvariables2+(double)(Double.parseDouble(_p2)));
//BA.debugLineNum = 1130;BA.debugLine="If thisLog Then Log($\"prod ${t}, hay: ${p2}\"$)";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759244568",("prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", hay: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_p2))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539190552",("prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", hay: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_p2))+""),0);};
};
}
};
//BA.debugLineNum = 1133;BA.debugLine="If thisLog Then Log(\"Total prods variables=\" & to";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759244571","Total prods variables="+BA.NumberToString(_totalprodsvariables)+", requeridos="+BA.ObjectToString(_promomap.Get((Object)("prodsVariablesRequeridos"))),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539190555","Total prods variables="+BA.NumberToString(_totalprodsvariables)+", requeridos="+BA.ObjectToString(_promomap.Get((Object)("prodsVariablesRequeridos"))),0);};
//BA.debugLineNum = 1134;BA.debugLine="If thisLog Then Log(\"Total prods variables2=\" & t";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759244572","Total prods variables2="+BA.NumberToString(_totalprodsvariables2)+", requeridos2="+BA.ObjectToString(_promomap.Get((Object)("prodsVariables2Requeridos"))),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539190556","Total prods variables2="+BA.NumberToString(_totalprodsvariables2)+", requeridos2="+BA.ObjectToString(_promomap.Get((Object)("prodsVariables2Requeridos"))),0);};
//BA.debugLineNum = 1135;BA.debugLine="Private res As Boolean = False";
_res = anywheresoftware.b4a.keywords.Common.False;
//BA.debugLineNum = 1136;BA.debugLine="Private res1 As Boolean = False";
@@ -309,7 +309,7 @@ _res2 = anywheresoftware.b4a.keywords.Common.True;
if (((int)(BA.ObjectToNumber(_promomap.Get((Object)("prodsVariables2Requeridos")))))==0) {
_res2 = anywheresoftware.b4a.keywords.Common.True;};
//BA.debugLineNum = 1150;BA.debugLine="Log(res1&\" ________________________\" & res2)";
anywheresoftware.b4a.keywords.Common.LogImpl("759244588",BA.ObjectToString(_res1)+" ________________________"+BA.ObjectToString(_res2),0);
anywheresoftware.b4a.keywords.Common.LogImpl("539190572",BA.ObjectToString(_res1)+" ________________________"+BA.ObjectToString(_res2),0);
//BA.debugLineNum = 1151;BA.debugLine="If res1 And res2 Then 'Solo si son verdadero los";
if (_res1 && _res2) {
//BA.debugLineNum = 1152;BA.debugLine="res = True";
@@ -328,13 +328,13 @@ public static String _borraarribade100errores(anywheresoftware.b4a.BA _ba) thro
//BA.debugLineNum = 467;BA.debugLine="revisaBD";
_revisabd(_ba);
//BA.debugLineNum = 468;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)";
anywheresoftware.b4a.keywords.Common.LogImpl("756885250","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta);
anywheresoftware.b4a.keywords.Common.LogImpl("536831234","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta);
//BA.debugLineNum = 469;BA.debugLine="errorLog.ExecNonQuery(\"DELETE FROM errores WHERE";
_errorlog.ExecNonQuery("DELETE FROM errores WHERE fecha NOT in (SELECT fecha FROM errores ORDER BY fecha desc LIMIT 99 )");
//BA.debugLineNum = 470;BA.debugLine="errorLog.ExecNonQuery(\"vacuum;\")";
_errorlog.ExecNonQuery("vacuum;");
//BA.debugLineNum = 471;BA.debugLine="Log(\"Borramos mas de 100 de errorLog\")";
anywheresoftware.b4a.keywords.Common.LogImpl("756885253","Borramos mas de 100 de errorLog",0);
anywheresoftware.b4a.keywords.Common.LogImpl("536831237","Borramos mas de 100 de errorLog",0);
//BA.debugLineNum = 472;BA.debugLine="End Sub";
return "";
}
@@ -343,20 +343,20 @@ public static String _borraarribade600renglonesbitacora(anywheresoftware.b4a.BA
//BA.debugLineNum = 476;BA.debugLine="revisaBD";
_revisabd(_ba);
//BA.debugLineNum = 477;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)";
anywheresoftware.b4a.keywords.Common.LogImpl("756950786","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta);
anywheresoftware.b4a.keywords.Common.LogImpl("536896770","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta);
//BA.debugLineNum = 478;BA.debugLine="kmt.ExecNonQuery(\"DELETE FROM bitacora WHERE fech";
_kmt.ExecNonQuery("DELETE FROM bitacora WHERE fecha NOT in (SELECT fecha FROM bitacora ORDER BY fecha desc LIMIT 599 )");
//BA.debugLineNum = 479;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")";
_kmt.ExecNonQuery("vacuum;");
//BA.debugLineNum = 480;BA.debugLine="Log(\"Borramos mas de 600 de bitacora\")";
anywheresoftware.b4a.keywords.Common.LogImpl("756950789","Borramos mas de 600 de bitacora",0);
anywheresoftware.b4a.keywords.Common.LogImpl("536896773","Borramos mas de 600 de bitacora",0);
//BA.debugLineNum = 481;BA.debugLine="End Sub";
return "";
}
public static String _borralogdb(anywheresoftware.b4a.BA _ba) throws Exception{
//BA.debugLineNum = 350;BA.debugLine="Sub borraLogDB 'ignore";
//BA.debugLineNum = 351;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)";
anywheresoftware.b4a.keywords.Common.LogImpl("756688641","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta);
anywheresoftware.b4a.keywords.Common.LogImpl("536634625","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta);
//BA.debugLineNum = 352;BA.debugLine="kmt.ExecNonQuery(\"delete from bitacora\")";
_kmt.ExecNonQuery("delete from bitacora");
//BA.debugLineNum = 353;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")";
@@ -406,7 +406,7 @@ mostCurrent._starter._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("upda
//BA.debugLineNum = 1473;BA.debugLine="Starter.skmt.ExecNonQuery($\"update CAT_GUNAPROD";
mostCurrent._starter._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("update CAT_GUNAPROD2 set cat_gp_almacen = cat_gp_almacen + "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_thisc.GetString("PE_CANT")))+" where cat_gp_id = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_thisc.GetString("PE_PROID")))+"'"));
//BA.debugLineNum = 1474;BA.debugLine="LogColor($\"update ${traeTablaProds(thisC.GetStr";
anywheresoftware.b4a.keywords.Common.LogImpl("760030999",("update "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_traetablaprods(_ba,_thisc.GetString("PE_FOLIO"))))+" set cat_gp_almacen = cat_gp_almacen + "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_thisc.GetString("PE_CANT")))+" where cat_gp_id = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_thisc.GetString("PE_PROID")))+"'"),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("539976983",("update "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_traetablaprods(_ba,_thisc.GetString("PE_FOLIO"))))+" set cat_gp_almacen = cat_gp_almacen + "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_thisc.GetString("PE_CANT")))+" where cat_gp_id = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_thisc.GetString("PE_PROID")))+"'"),anywheresoftware.b4a.keywords.Common.Colors.Red);
}
};
};
@@ -485,7 +485,7 @@ _compressed = _gzip.compress(_str);
//BA.debugLineNum = 50;BA.debugLine="Dim base64 As String = su.EncodeBase64(compressed";
_base64 = _su.EncodeBase64(_compressed);
//BA.debugLineNum = 51;BA.debugLine="Log($\"Comprimido: ${base64.Length}\"$)";
anywheresoftware.b4a.keywords.Common.LogImpl("755443462",("Comprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_base64.length()))+""),0);
anywheresoftware.b4a.keywords.Common.LogImpl("535389446",("Comprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_base64.length()))+""),0);
//BA.debugLineNum = 53;BA.debugLine="Return base64";
if (true) return _base64;
//BA.debugLineNum = 54;BA.debugLine="End Sub";
@@ -534,11 +534,11 @@ anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("B
anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("No se pudo hacer la copia: "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba))),anywheresoftware.b4a.keywords.Common.True);
};
//BA.debugLineNum = 581;BA.debugLine="Log(\"rootExternal=\"&p)";
anywheresoftware.b4a.keywords.Common.LogImpl("757278489","rootExternal="+_p,0);
anywheresoftware.b4a.keywords.Common.LogImpl("537224473","rootExternal="+_p,0);
//BA.debugLineNum = 582;BA.debugLine="Log(\"File.DirInternal=\"&File.DirInternal)";
anywheresoftware.b4a.keywords.Common.LogImpl("757278490","File.DirInternal="+anywheresoftware.b4a.keywords.Common.File.getDirInternal(),0);
anywheresoftware.b4a.keywords.Common.LogImpl("537224474","File.DirInternal="+anywheresoftware.b4a.keywords.Common.File.getDirInternal(),0);
//BA.debugLineNum = 583;BA.debugLine="Log(\"File.DirInternal=\"&File.DirInternal)";
anywheresoftware.b4a.keywords.Common.LogImpl("757278491","File.DirInternal="+anywheresoftware.b4a.keywords.Common.File.getDirInternal(),0);
anywheresoftware.b4a.keywords.Common.LogImpl("537224475","File.DirInternal="+anywheresoftware.b4a.keywords.Common.File.getDirInternal(),0);
}else {
//BA.debugLineNum = 585;BA.debugLine="ToastMessageShow(\"Sin permisos\", False)";
anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("Sin permisos"),anywheresoftware.b4a.keywords.Common.False);
@@ -561,7 +561,7 @@ anywheresoftware.b4a.objects.collections.Map _m = null;
anywheresoftware.b4a.objects.collections.Map _m2 = null;
//BA.debugLineNum = 494;BA.debugLine="Sub dameErroresJSON(SQL As SQL, maxErrores As Int,";
//BA.debugLineNum = 495;BA.debugLine="Log(\"dameErroresJSON\")";
anywheresoftware.b4a.keywords.Common.LogImpl("757081857","dameErroresJSON",0);
anywheresoftware.b4a.keywords.Common.LogImpl("537027841","dameErroresJSON",0);
//BA.debugLineNum = 496;BA.debugLine="Private j As JSONGenerator";
_j = new anywheresoftware.b4a.objects.collections.JSONParser.JSONGenerator();
//BA.debugLineNum = 497;BA.debugLine="Private lim As String";
@@ -605,7 +605,7 @@ _cur.Close();
//BA.debugLineNum = 514;BA.debugLine="j.Initialize(m2)";
_j.Initialize(_m2);
//BA.debugLineNum = 515;BA.debugLine="Log(j.ToString)";
anywheresoftware.b4a.keywords.Common.LogImpl("757081877",_j.ToString(),0);
anywheresoftware.b4a.keywords.Common.LogImpl("537027861",_j.ToString(),0);
//BA.debugLineNum = 516;BA.debugLine="If comprimido Then";
if (_comprimido) {
//BA.debugLineNum = 517;BA.debugLine="Return compress(j.ToString)";
@@ -637,7 +637,7 @@ _fechainicio = _fechainiciohoy(_ba);
};
//BA.debugLineNum = 147;BA.debugLine="If subsLogs Then Log(\"fechaInicio: \"&fechaInicio&";
if (_subslogs) {
anywheresoftware.b4a.keywords.Common.LogImpl("755902219","fechaInicio: "+_fechainicio+" | rutaHrsAtras="+BA.NumberToString(_rutahrsatras),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("535848203","fechaInicio: "+_fechainicio+" | rutaHrsAtras="+BA.NumberToString(_rutahrsatras),0);};
//BA.debugLineNum = 148;BA.debugLine="Dim c As Cursor";
_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper();
//BA.debugLineNum = 149;BA.debugLine="If kmt.IsInitialized = False Then kmt.Initialize(";
@@ -645,7 +645,7 @@ if (_kmt.IsInitialized()==anywheresoftware.b4a.keywords.Common.False) {
_kmt.Initialize(mostCurrent._starter._ruta /*String*/ ,"kmt.db",anywheresoftware.b4a.keywords.Common.True);};
//BA.debugLineNum = 150;BA.debugLine="If subsLogs Then Log(\"select FECHA, LAT, LON from";
if (_subslogs) {
anywheresoftware.b4a.keywords.Common.LogImpl("755902222","select FECHA, LAT, LON from "+_origenruta+" where FECHA > "+_fechainicio+" order by FECHA desc limit "+BA.NumberToString(_rutamaxpoints),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("535848206","select FECHA, LAT, LON from "+_origenruta+" where FECHA > "+_fechainicio+" order by FECHA desc limit "+BA.NumberToString(_rutamaxpoints),0);};
//BA.debugLineNum = 151;BA.debugLine="c = kmt.ExecQuery(\"select FECHA, LAT, LON from \"&";
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_kmt.ExecQuery("select FECHA, LAT, LON from "+_origenruta+" where FECHA > "+_fechainicio+" order by FECHA desc limit "+BA.NumberToString(_rutamaxpoints))));
//BA.debugLineNum = 152;BA.debugLine="c.Position = 0";
@@ -713,7 +713,7 @@ _bc = new anywheresoftware.b4a.agraham.byteconverter.ByteConverter();
//BA.debugLineNum = 61;BA.debugLine="Dim uncompressed As String = bc.StringFromBytes(d";
_uncompressed = _bc.StringFromBytes(_decompressedbytes,"UTF8");
//BA.debugLineNum = 62;BA.debugLine="Log($\"Descomprimido: ${uncompressed.Length}\"$)";
anywheresoftware.b4a.keywords.Common.LogImpl("755508997",("Descomprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_uncompressed.length()))+""),0);
anywheresoftware.b4a.keywords.Common.LogImpl("535454981",("Descomprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_uncompressed.length()))+""),0);
//BA.debugLineNum = 64;BA.debugLine="Return uncompressed";
if (true) return _uncompressed;
//BA.debugLineNum = 65;BA.debugLine="End Sub";
@@ -754,7 +754,7 @@ _h = anywheresoftware.b4a.keywords.Common.DateTime.Date(anywheresoftware.b4a.key
//BA.debugLineNum = 313;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig";
anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat);
//BA.debugLineNum = 314;BA.debugLine="Log(\"Hoy=\"&h)";
anywheresoftware.b4a.keywords.Common.LogImpl("756426501","Hoy="+_h,0);
anywheresoftware.b4a.keywords.Common.LogImpl("536372485","Hoy="+_h,0);
//BA.debugLineNum = 315;BA.debugLine="Return h";
if (true) return _h;
//BA.debugLineNum = 316;BA.debugLine="End Sub";
@@ -804,16 +804,16 @@ anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat);
if (true) return _ticks;
}else {
//BA.debugLineNum = 536;BA.debugLine="Log(\"Formato de fecha incorrecto, debe de ser '";
anywheresoftware.b4a.keywords.Common.LogImpl("757147404","Formato de fecha incorrecto, debe de ser 'YYMMDDHHMMSS', no '"+_fkmt+"' largo="+BA.NumberToString(_fkmt.length()),0);
anywheresoftware.b4a.keywords.Common.LogImpl("537093388","Formato de fecha incorrecto, debe de ser 'YYMMDDHHMMSS', no '"+_fkmt+"' largo="+BA.NumberToString(_fkmt.length()),0);
//BA.debugLineNum = 537;BA.debugLine="Return 0";
if (true) return (long) (0);
};
}
catch (Exception e16) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e16); //BA.debugLineNum = 540;BA.debugLine="Log(LastException)";
anywheresoftware.b4a.keywords.Common.LogImpl("757147408",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
anywheresoftware.b4a.keywords.Common.LogImpl("537093392",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
//BA.debugLineNum = 541;BA.debugLine="LogColor($\"Fecha dada: ${fKMT}, Parte Fecha: ${p";
anywheresoftware.b4a.keywords.Common.LogImpl("757147409",("Fecha dada: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fkmt))+", Parte Fecha: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_partefecha))+", Parte Hora: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_partehora))+""),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("537093393",("Fecha dada: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fkmt))+", Parte Fecha: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_partefecha))+", Parte Hora: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_partehora))+""),anywheresoftware.b4a.keywords.Common.Colors.Red);
//BA.debugLineNum = 542;BA.debugLine="Return 0";
if (true) return (long) (0);
};
@@ -924,7 +924,7 @@ public static String _guardainfoenbd(anywheresoftware.b4a.BA _ba,String _coords
String[] _latlon = null;
//BA.debugLineNum = 123;BA.debugLine="Sub guardaInfoEnBD(coords As String) 'ignore";
//BA.debugLineNum = 124;BA.debugLine="Log(\"Guardamos ubicacion en BD - \"&coords)";
anywheresoftware.b4a.keywords.Common.LogImpl("755836673","Guardamos ubicacion en BD - "+_coords,0);
anywheresoftware.b4a.keywords.Common.LogImpl("535782657","Guardamos ubicacion en BD - "+_coords,0);
//BA.debugLineNum = 125;BA.debugLine="Try";
try { //BA.debugLineNum = 126;BA.debugLine="Dim latlon() As String = Regex.Split(\"\\|\", coord";
_latlon = anywheresoftware.b4a.keywords.Common.Regex.Split("\\|",_coords);
@@ -933,13 +933,13 @@ if (_latlon.length<2) {
_latlon = anywheresoftware.b4a.keywords.Common.Regex.Split(",",_coords);};
//BA.debugLineNum = 128;BA.debugLine="If subsLogs Then Log(\"LatLon=\"&latlon)";
if (_subslogs) {
anywheresoftware.b4a.keywords.Common.LogImpl("755836677","LatLon="+BA.ObjectToString(_latlon),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("535782661","LatLon="+BA.ObjectToString(_latlon),0);};
//BA.debugLineNum = 129;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO RUTA_GPS(FECHA, L";
_kmt.ExecNonQuery2("INSERT INTO RUTA_GPS(FECHA, LAT, LON) VALUES (?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_latlon[(int) (2)]),(Object)(_latlon[(int) (0)]),(Object)(_latlon[(int) (1)])}));
}
catch (Exception e8) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e8); //BA.debugLineNum = 131;BA.debugLine="LogColor(LastException, Colors.red)";
anywheresoftware.b4a.keywords.Common.LogImpl("755836680",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("535782664",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
//BA.debugLineNum = 133;BA.debugLine="End Sub";
return "";
@@ -1035,7 +1035,7 @@ int _x = 0;
//BA.debugLineNum = 485;BA.debugLine="revisaBD";
_revisabd(_ba);
//BA.debugLineNum = 486;BA.debugLine="Log(\"insertamos 50 renglones a errorLog\")";
anywheresoftware.b4a.keywords.Common.LogImpl("757016322","insertamos 50 renglones a errorLog",0);
anywheresoftware.b4a.keywords.Common.LogImpl("536962306","insertamos 50 renglones a errorLog",0);
//BA.debugLineNum = 487;BA.debugLine="For x = 1 To 50";
{
final int step3 = 1;
@@ -1045,7 +1045,7 @@ for (;_x <= limit3 ;_x = _x + step3 ) {
//BA.debugLineNum = 488;BA.debugLine="errorLog.ExecNonQuery2(\"INSERT INTO errores(fech";
_errorlog.ExecNonQuery2("INSERT INTO errores(fecha, error) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))),(Object)("abc")}));
//BA.debugLineNum = 489;BA.debugLine="Log(x)";
anywheresoftware.b4a.keywords.Common.LogImpl("757016325",BA.NumberToString(_x),0);
anywheresoftware.b4a.keywords.Common.LogImpl("536962309",BA.NumberToString(_x),0);
}
};
//BA.debugLineNum = 491;BA.debugLine="End Sub";
@@ -1082,7 +1082,7 @@ if (true) return _json.NextObject();
}
catch (Exception e6) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e6); //BA.debugLineNum = 272;BA.debugLine="Log(LastException)";
anywheresoftware.b4a.keywords.Common.LogImpl("756295431",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
anywheresoftware.b4a.keywords.Common.LogImpl("536241415",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
//BA.debugLineNum = 273;BA.debugLine="log2DB(\"JSON2Map: \"&LastException)";
_log2db(_ba,"JSON2Map: "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)));
//BA.debugLineNum = 274;BA.debugLine="Private m As Map = CreateMap(\"title\":\"Error gene";
@@ -1097,7 +1097,7 @@ return null;
public static String _log2db(anywheresoftware.b4a.BA _ba,String _texto) throws Exception{
//BA.debugLineNum = 319;BA.debugLine="Sub log2DB(texto As String) 'ignore";
//BA.debugLineNum = 320;BA.debugLine="LogColor(fechaKMT(DateTime.Now)&\" - log2BD: '\"&te";
anywheresoftware.b4a.keywords.Common.LogImpl("756492033",_fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))+" - log2BD: '"+_texto+"'",anywheresoftware.b4a.keywords.Common.Colors.LightGray);
anywheresoftware.b4a.keywords.Common.LogImpl("536438017",_fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))+" - log2BD: '"+_texto+"'",anywheresoftware.b4a.keywords.Common.Colors.LightGray);
//BA.debugLineNum = 321;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO bitacora(fecha, te";
_kmt.ExecNonQuery2("INSERT INTO bitacora(fecha, texto) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))),(Object)(_texto)}));
//BA.debugLineNum = 322;BA.debugLine="End Sub";
@@ -1116,7 +1116,7 @@ final int groupLen1 = group1.getSize()
for (; index1 < groupLen1;index1++){
_records = (Object[])(group1.Get(index1));
//BA.debugLineNum = 1538;BA.debugLine="LogColor($\"====== ${resultado.Tag} - REGISTROS =";
anywheresoftware.b4a.keywords.Common.LogImpl("760358658",("====== "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_resultado.Tag /*Object*/ )+" - REGISTROS = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_resultado.Rows /*anywheresoftware.b4a.objects.collections.List*/ .getSize()))+""),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (215),(int) (37),(int) (0)));
anywheresoftware.b4a.keywords.Common.LogImpl("540304642",("====== "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_resultado.Tag /*Object*/ )+" - REGISTROS = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_resultado.Rows /*anywheresoftware.b4a.objects.collections.List*/ .getSize()))+""),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (215),(int) (37),(int) (0)));
//BA.debugLineNum = 1539;BA.debugLine="For Each k As String In resultado.Columns.Keys";
{
final anywheresoftware.b4a.BA.IterableList group3 = _resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Keys();
@@ -1126,7 +1126,7 @@ final int groupLen3 = group3.getSize()
for (; index3 < groupLen3;index3++){
_k = BA.ObjectToString(group3.Get(index3));
//BA.debugLineNum = 1540;BA.debugLine="LogColor(k & \" = \" & records(resultado.Columns.";
anywheresoftware.b4a.keywords.Common.LogImpl("760358660",_k+" = "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (215),(int) (37),(int) (0)));
anywheresoftware.b4a.keywords.Common.LogImpl("540304644",_k+" = "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (215),(int) (37),(int) (0)));
}
};
}
@@ -1176,7 +1176,7 @@ if (true) return anywheresoftware.b4a.keywords.Common.False;
}
catch (Exception e8) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e8); //BA.debugLineNum = 345;BA.debugLine="Log(LastException)";
anywheresoftware.b4a.keywords.Common.LogImpl("756623115",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
anywheresoftware.b4a.keywords.Common.LogImpl("536569099",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
};
//BA.debugLineNum = 347;BA.debugLine="End Sub";
return false;
@@ -1197,7 +1197,7 @@ _notif.setSound(anywheresoftware.b4a.keywords.Common.False);
//BA.debugLineNum = 85;BA.debugLine="notif.AutoCancel = True";
_notif.setAutoCancel(anywheresoftware.b4a.keywords.Common.True);
//BA.debugLineNum = 86;BA.debugLine="Log(\"notiHigh: \"&title)";
anywheresoftware.b4a.keywords.Common.LogImpl("755640071","notiHigh: "+_title,0);
anywheresoftware.b4a.keywords.Common.LogImpl("535586055","notiHigh: "+_title,0);
//BA.debugLineNum = 87;BA.debugLine="notif.SetInfo(title, body, activity)";
_notif.SetInfoNew((_ba.processBA == null ? _ba : _ba.processBA),BA.ObjectToCharSequence(_title),BA.ObjectToCharSequence(_body),_activity);
//BA.debugLineNum = 89;BA.debugLine="notif.Notify(777)";
@@ -1213,7 +1213,7 @@ _notification = new anywheresoftware.b4a.objects.NotificationWrapper();
//BA.debugLineNum = 95;BA.debugLine="notification.Initialize2(notification.IMPORTANCE_";
_notification.Initialize2(_notification.IMPORTANCE_LOW);
//BA.debugLineNum = 96;BA.debugLine="Log(\"notiLowReturn: \"&title)";
anywheresoftware.b4a.keywords.Common.LogImpl("755705603","notiLowReturn: "+_title,0);
anywheresoftware.b4a.keywords.Common.LogImpl("535651587","notiLowReturn: "+_title,0);
//BA.debugLineNum = 97;BA.debugLine="notification.Icon = \"icon\"";
_notification.setIcon("icon");
//BA.debugLineNum = 98;BA.debugLine="notification.Sound = False";
@@ -1277,26 +1277,26 @@ _thislog = anywheresoftware.b4a.keywords.Common.True;
_iniciocontador = BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow());
//BA.debugLineNum = 1202;BA.debugLine="If thisLog Then LogColor($\"********* Iniciamos re";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759441155",("********* Iniciamos revision de Promo "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idpromo))+" *********"),anywheresoftware.b4a.keywords.Common.Colors.Magenta);};
anywheresoftware.b4a.keywords.Common.LogImpl("539387139",("********* Iniciamos revision de Promo "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idpromo))+" *********"),anywheresoftware.b4a.keywords.Common.Colors.Magenta);};
//BA.debugLineNum = 1204;BA.debugLine="Private pm As Map = traePromo(idPromo, cliente)";
_pm = new anywheresoftware.b4a.objects.collections.Map();
_pm = _traepromo(_ba,_idpromo,_cliente);
//BA.debugLineNum = 1205;BA.debugLine="If thisLog Then LogColor(pm, Colors.Blue)";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759441158",BA.ObjectToString(_pm),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539387142",BA.ObjectToString(_pm),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1206;BA.debugLine="If pm.Get(\"resultado\") = \"ok\" Then 'Si encontramo";
if ((_pm.Get((Object)("resultado"))).equals((Object)("ok"))) {
//BA.debugLineNum = 1208;BA.debugLine="If thisLog Then LogColor($\"Promociones permitida";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759441161",("Promociones permitidas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_traemaxpromos(_ba,_pm)))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539387145",("Promociones permitidas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_traemaxpromos(_ba,_pm)))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1209;BA.debugLine="If thisLog Then Log(\"Promos vendidas: \" & traePr";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759441162","Promos vendidas: "+BA.NumberToString(_traepromosvendidas(_ba,_idpromo,_cliente)),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539387146","Promos vendidas: "+BA.NumberToString(_traepromosvendidas(_ba,_idpromo,_cliente)),0);};
//BA.debugLineNum = 1210;BA.debugLine="If traePromosVendidas(idPromo, cliente) >= traeM";
if (_traepromosvendidas(_ba,_idpromo,_cliente)>=_traemaxpromos(_ba,_pm)) {
//BA.debugLineNum = 1211;BA.debugLine="If thisLog Then LogColor(\"Ya se vendieron las p";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759441164","Ya se vendieron las promos PERMITIDAS para el cliente",anywheresoftware.b4a.keywords.Common.Colors.Red);};
anywheresoftware.b4a.keywords.Common.LogImpl("539387148","Ya se vendieron las promos PERMITIDAS para el cliente",anywheresoftware.b4a.keywords.Common.Colors.Red);};
//BA.debugLineNum = 1212;BA.debugLine="Return CreateMap(\"status\":\"ko\", \"mp\":pm)";
if (true) return anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("status"),(Object)("ko"),(Object)("mp"),(Object)(_pm.getObject())});
};
@@ -1305,14 +1305,14 @@ _inventariosinfijos = new anywheresoftware.b4a.objects.collections.Map();
_inventariosinfijos = _restafijospromo(_ba,_pm);
//BA.debugLineNum = 1216;BA.debugLine="If thisLog Then LogColor(\"inventariosfijos=\"&inv";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759441169","inventariosfijos="+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Green);};
anywheresoftware.b4a.keywords.Common.LogImpl("539387153","inventariosfijos="+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Green);};
//BA.debugLineNum = 1218;BA.debugLine="If inventarioSinFijos.Get(\"resultado\") = \"ok\" Th";
if ((_inventariosinfijos.Get((Object)("resultado"))).equals((Object)("ok"))) {
//BA.debugLineNum = 1220;BA.debugLine="Private pv As Boolean = alcanzanLosVariablesPa";
_pv = _alcanzanlosvariablesparapromo(_ba,_pm,_inventariosinfijos);
//BA.debugLineNum = 1221;BA.debugLine="If thisLog Then Log(\"Alcanzan los variables? --";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759441174","Alcanzan los variables? --> "+BA.ObjectToString(_pv),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539387158","Alcanzan los variables? --> "+BA.ObjectToString(_pv),0);};
//BA.debugLineNum = 1222;BA.debugLine="If pv Then Return CreateMap(\"status\":\"ok\", \"mp\"";
if (_pv) {
if (true) return anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("status"),(Object)("ok"),(Object)("mp"),(Object)(_pm.getObject())});}
@@ -1321,13 +1321,13 @@ if (true) return anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(O
}else {
//BA.debugLineNum = 1224;BA.debugLine="If thisLog Then LogColor(\"NO HAY INVENTARIO SUF";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759441177","NO HAY INVENTARIO SUFICIENTE "+_idpromo,anywheresoftware.b4a.keywords.Common.Colors.Red);};
anywheresoftware.b4a.keywords.Common.LogImpl("539387161","NO HAY INVENTARIO SUFICIENTE "+_idpromo,anywheresoftware.b4a.keywords.Common.Colors.Red);};
//BA.debugLineNum = 1225;BA.debugLine="Return CreateMap(\"status\":\"ko\", \"mp\":pm)";
if (true) return anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("status"),(Object)("ko"),(Object)("mp"),(Object)(_pm.getObject())});
};
};
//BA.debugLineNum = 1231;BA.debugLine="LogColor(\"TIEMPO DE PROCESO ESTA PROMO: \" & ((Dat";
anywheresoftware.b4a.keywords.Common.LogImpl("759441184","TIEMPO DE PROCESO ESTA PROMO: "+BA.NumberToString(((anywheresoftware.b4a.keywords.Common.DateTime.getNow()-(double)(Double.parseDouble(_iniciocontador)))/(double)1000)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("539387168","TIEMPO DE PROCESO ESTA PROMO: "+BA.NumberToString(((anywheresoftware.b4a.keywords.Common.DateTime.getNow()-(double)(Double.parseDouble(_iniciocontador)))/(double)1000)),anywheresoftware.b4a.keywords.Common.Colors.Red);
//BA.debugLineNum = 1232;BA.debugLine="End Sub";
return null;
}
@@ -1372,10 +1372,10 @@ _inventariosdisponiblesparaestapromo = new anywheresoftware.b4a.objects.collecti
_inventariosdisponiblesparaestapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_promomap.Get((Object)("id"))));
//BA.debugLineNum = 1073;BA.debugLine="If thisLog Then LogColor(\"InvDisponible: \" & inve";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759179011","InvDisponible: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Red);};
anywheresoftware.b4a.keywords.Common.LogImpl("539124995","InvDisponible: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Red);};
//BA.debugLineNum = 1074;BA.debugLine="If thisLog Then LogColor(\"Inventario inicial ante";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759179012","Inventario inicial antes de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Gray);};
anywheresoftware.b4a.keywords.Common.LogImpl("539124996","Inventario inicial antes de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Gray);};
//BA.debugLineNum = 1075;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"resultad";
_inventariosdisponiblesparaestapromo.Put((Object)("resultado"),(Object)("ko"));
//BA.debugLineNum = 1076;BA.debugLine="Private i As Int";
@@ -1399,17 +1399,17 @@ _p2 = new anywheresoftware.b4a.objects.collections.Map();
_p2 = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_prodsmap.Get((Object)(_t))));
//BA.debugLineNum = 1082;BA.debugLine="If thisLog Then Log($\"T: ${t}, prod ${p2.Get(\"id";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759179020",("T: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_p2.Get((Object)("idProducto")))+", piezas: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_p2.Get((Object)("piezas")))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539125004",("T: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_p2.Get((Object)("idProducto")))+", piezas: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_p2.Get((Object)("piezas")))+""),0);};
//BA.debugLineNum = 1083;BA.debugLine="If thisLog Then Log(\"inventariosDisponiblesParaE";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759179021","inventariosDisponiblesParaEstaPromo="+BA.ObjectToString(_inventariosdisponiblesparaestapromo),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539125005","inventariosDisponiblesParaEstaPromo="+BA.ObjectToString(_inventariosdisponiblesparaestapromo),0);};
//BA.debugLineNum = 1084;BA.debugLine="If inventariosDisponiblesParaEstaPromo.ContainsK";
if (_inventariosdisponiblesparaestapromo.ContainsKey((Object)(_t))) {
//BA.debugLineNum = 1085;BA.debugLine="i = inventariosDisponiblesParaEstaPromo.get(t)";
_i = (int)(BA.ObjectToNumber(_inventariosdisponiblesparaestapromo.Get((Object)(_t))));
//BA.debugLineNum = 1086;BA.debugLine="If thisLog Then Log($\"Nuevo inventario de ${t}:";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759179024",("Nuevo inventario de "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+": "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_i))+"-"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p))+" = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("1.0",(Object)(_i-(double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p)))))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539125008",("Nuevo inventario de "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+": "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_i))+"-"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p))+" = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("1.0",(Object)(_i-(double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p)))))+""),0);};
//BA.debugLineNum = 1087;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(t, $\"${";
_inventariosdisponiblesparaestapromo.Put((Object)(_t),(Object)((""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_i-(double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p)))))+"")));
//BA.debugLineNum = 1088;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result";
@@ -1418,7 +1418,7 @@ _inventariosdisponiblesparaestapromo.Put((Object)("resultado"),(Object)("ok"));
//BA.debugLineNum = 1090;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result";
_inventariosdisponiblesparaestapromo.Put((Object)("resultado"),(Object)("No hay suficiente producto para la promocion."));
//BA.debugLineNum = 1091;BA.debugLine="LogColor(\"Sin suficiente inventario fijo: \" & t";
anywheresoftware.b4a.keywords.Common.LogImpl("759179029","Sin suficiente inventario fijo: "+_t,anywheresoftware.b4a.keywords.Common.Colors.Blue);
anywheresoftware.b4a.keywords.Common.LogImpl("539125013","Sin suficiente inventario fijo: "+_t,anywheresoftware.b4a.keywords.Common.Colors.Blue);
//BA.debugLineNum = 1092;BA.debugLine="Exit";
if (true) break;
};
@@ -1436,7 +1436,7 @@ if (_prodsfijos.getSize()==0) {
_inventariosdisponiblesparaestapromo.Put((Object)("resultado"),(Object)("ok"));};
//BA.debugLineNum = 1100;BA.debugLine="If thisLog Then LogColor(\"Inventario final depues";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759179038","Inventario final depues de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539125022","Inventario final depues de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1101;BA.debugLine="Return inventariosDisponiblesParaEstaPromo";
if (true) return _inventariosdisponiblesparaestapromo;
//BA.debugLineNum = 1102;BA.debugLine="End Sub";
@@ -1449,7 +1449,7 @@ if (anywheresoftware.b4a.keywords.Common.Not(anywheresoftware.b4a.keywords.Commo
//BA.debugLineNum = 194;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", Starter.ruta";
anywheresoftware.b4a.keywords.Common.File.Copy(anywheresoftware.b4a.keywords.Common.File.getDirAssets(),"kmt.db",mostCurrent._starter._ruta /*String*/ ,"kmt.db");
//BA.debugLineNum = 195;BA.debugLine="LogColor(\"copiamos kmt.db de \"&File.DirAssets &";
anywheresoftware.b4a.keywords.Common.LogImpl("756164358","copiamos kmt.db de "+anywheresoftware.b4a.keywords.Common.File.getDirAssets()+" a "+mostCurrent._starter._ruta /*String*/ ,anywheresoftware.b4a.keywords.Common.Colors.Green);
anywheresoftware.b4a.keywords.Common.LogImpl("536110342","copiamos kmt.db de "+anywheresoftware.b4a.keywords.Common.File.getDirAssets()+" a "+mostCurrent._starter._ruta /*String*/ ,anywheresoftware.b4a.keywords.Common.Colors.Green);
};
//BA.debugLineNum = 197;BA.debugLine="If Not(kmt.IsInitialized) Then kmt.Initialize(Sta";
if (anywheresoftware.b4a.keywords.Common.Not(_kmt.IsInitialized())) {
@@ -1477,9 +1477,9 @@ _kmt.ExecNonQuery("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_ENVIO_OK INTEGER");
}
catch (Exception e18) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e18); //BA.debugLineNum = 211;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_ENVI";
anywheresoftware.b4a.keywords.Common.LogImpl("756164374","No pudimos agregar la columna PC_ENVIO_OK.",anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536110358","No pudimos agregar la columna PC_ENVIO_OK.",anywheresoftware.b4a.keywords.Common.Colors.Red);
//BA.debugLineNum = 212;BA.debugLine="LogColor(LastException, Colors.Red)";
anywheresoftware.b4a.keywords.Common.LogImpl("756164375",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536110359",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
};
//BA.debugLineNum = 216;BA.debugLine="Try 'Si no existe la columna CAT_CL_DIAS_VISITA l";
@@ -1493,9 +1493,9 @@ _kmt.ExecNonQuery("ALTER TABLE kmt_info ADD COLUMN CAT_CL_DIAS_VISITA TEXT");
}
catch (Exception e28) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e28); //BA.debugLineNum = 222;BA.debugLine="LogColor(\"No pudimos agregar la columna CAT_CL_";
anywheresoftware.b4a.keywords.Common.LogImpl("756164385","No pudimos agregar la columna CAT_CL_DIAS_VISITA.",anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536110369","No pudimos agregar la columna CAT_CL_DIAS_VISITA.",anywheresoftware.b4a.keywords.Common.Colors.Red);
//BA.debugLineNum = 223;BA.debugLine="LogColor(LastException, Colors.Red)";
anywheresoftware.b4a.keywords.Common.LogImpl("756164386",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536110370",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
};
//BA.debugLineNum = 227;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg";
@@ -1509,9 +1509,9 @@ _kmt.ExecNonQuery("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_TIEMPO_TIENDA FLOAT"
}
catch (Exception e38) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e38); //BA.debugLineNum = 233;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_TIEM";
anywheresoftware.b4a.keywords.Common.LogImpl("756164396","No pudimos agregar la columna PC_TIEMPO_TIENDA.",anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536110380","No pudimos agregar la columna PC_TIEMPO_TIENDA.",anywheresoftware.b4a.keywords.Common.Colors.Red);
//BA.debugLineNum = 234;BA.debugLine="LogColor(LastException, Colors.Red)";
anywheresoftware.b4a.keywords.Common.LogImpl("756164397",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536110381",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
};
//BA.debugLineNum = 237;BA.debugLine="Try 'Si no existe la columna PC_FACTURA la agrega";
@@ -1525,9 +1525,9 @@ _kmt.ExecNonQuery("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_FACTURA INTEGER");
}
catch (Exception e48) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e48); //BA.debugLineNum = 243;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_FACT";
anywheresoftware.b4a.keywords.Common.LogImpl("756164406","No pudimos agregar la columna PC_FACTURA.",anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536110390","No pudimos agregar la columna PC_FACTURA.",anywheresoftware.b4a.keywords.Common.Colors.Red);
//BA.debugLineNum = 244;BA.debugLine="LogColor(LastException, Colors.Red)";
anywheresoftware.b4a.keywords.Common.LogImpl("756164407",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536110391",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
};
//BA.debugLineNum = 247;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS bita";
@@ -1546,7 +1546,7 @@ public static String _revisaflp(anywheresoftware.b4a.BA _ba) throws Exception{
boolean _todobienflp = false;
//BA.debugLineNum = 397;BA.debugLine="Sub revisaFLP 'ignore";
//BA.debugLineNum = 398;BA.debugLine="LogColor(\"**** **** Revisamos FLP **** ****\", Col";
anywheresoftware.b4a.keywords.Common.LogImpl("756819713","**** **** Revisamos FLP **** ****",anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (78),(int) (0),(int) (227)));
anywheresoftware.b4a.keywords.Common.LogImpl("536765697","**** **** Revisamos FLP **** ****",anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (78),(int) (0),(int) (227)));
//BA.debugLineNum = 399;BA.debugLine="Private todoBienFLP As Boolean = True";
_todobienflp = anywheresoftware.b4a.keywords.Common.True;
//BA.debugLineNum = 400;BA.debugLine="Try";
@@ -1562,7 +1562,7 @@ _todobienflp = anywheresoftware.b4a.keywords.Common.False;
}
catch (Exception e10) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e10); //BA.debugLineNum = 407;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsInitialized) ---";
anywheresoftware.b4a.keywords.Common.LogImpl("756819722","If Not(Tracker.FLP.IsInitialized) --- "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536765706","If Not(Tracker.FLP.IsInitialized) --- "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
//BA.debugLineNum = 409;BA.debugLine="Try";
try { //BA.debugLineNum = 410;BA.debugLine="If Tracker.FLP.IsInitialized Then";
@@ -1580,7 +1580,7 @@ _todobienflp = anywheresoftware.b4a.keywords.Common.False;
}
catch (Exception e21) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e21); //BA.debugLineNum = 419;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsConnected) -->";
anywheresoftware.b4a.keywords.Common.LogImpl("756819734","If Not(Tracker.FLP.IsConnected) --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536765718","If Not(Tracker.FLP.IsConnected) --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
//BA.debugLineNum = 421;BA.debugLine="Try";
try { //BA.debugLineNum = 422;BA.debugLine="If Tracker.FLP.IsConnected And _ Tracker.";
@@ -1595,16 +1595,16 @@ _todobienflp = anywheresoftware.b4a.keywords.Common.False;
}
catch (Exception e30) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e30); //BA.debugLineNum = 430;BA.debugLine="LogColor(\"If FLP.IsConnectctd and FLP.getLKL.I";
anywheresoftware.b4a.keywords.Common.LogImpl("756819745","If FLP.IsConnectctd and FLP.getLKL.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536765729","If FLP.IsConnectctd and FLP.getLKL.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
};
//BA.debugLineNum = 433;BA.debugLine="If todoBienFLP Then LogColor(\" +++ +++ Sin error";
if (_todobienflp) {
anywheresoftware.b4a.keywords.Common.LogImpl("756819748"," +++ +++ Sin errores en FLP",anywheresoftware.b4a.keywords.Common.Colors.Green);};
anywheresoftware.b4a.keywords.Common.LogImpl("536765732"," +++ +++ Sin errores en FLP",anywheresoftware.b4a.keywords.Common.Colors.Green);};
}
catch (Exception e35) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e35); //BA.debugLineNum = 435;BA.debugLine="LogColor(\"If Tracker.FLP.IsInitialized --> \"&Las";
anywheresoftware.b4a.keywords.Common.LogImpl("756819750","If Tracker.FLP.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536765734","If Tracker.FLP.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
//BA.debugLineNum = 438;BA.debugLine="End Sub";
return "";
@@ -1633,13 +1633,13 @@ _t.Add((Object)(_traemaxpromos(_ba,_pm)));
_invfijoxpromo.Initialize();
//BA.debugLineNum = 1285;BA.debugLine="If thisLog Then LogColor($\"pm=${pm}\"$, Colors.Blu";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759572231",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539518215",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1286;BA.debugLine="Private invDispParaPromo As Map = traemosInventar";
_invdispparapromo = new anywheresoftware.b4a.objects.collections.Map();
_invdispparapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_pm.Get((Object)("id"))));
//BA.debugLineNum = 1287;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759572233",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539518217",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);};
//BA.debugLineNum = 1288;BA.debugLine="Private prodsFijosPiezas As List = pm.Get(\"prodsF";
_prodsfijospiezas = new anywheresoftware.b4a.objects.collections.List();
_prodsfijospiezas = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_pm.Get((Object)("prodsFijosPiezas"))));
@@ -1654,15 +1654,15 @@ _p = (int) (0) ;
for (;_p <= limit12 ;_p = _p + step12 ) {
//BA.debugLineNum = 1291;BA.debugLine="If thisLog Then Log($\"id=${idProdsFijos.Get(p)},";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759572237",("id="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_idprodsfijos.Get(_p))+", inv="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_invdispparapromo.Get(_idprodsfijos.Get(_p)))+", pzas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_prodsfijospiezas.Get(_p))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539518221",("id="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_idprodsfijos.Get(_p))+", inv="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_invdispparapromo.Get(_idprodsfijos.Get(_p)))+", pzas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_prodsfijospiezas.Get(_p))+""),0);};
//BA.debugLineNum = 1292;BA.debugLine="If thisLog Then Log($\"${(invDispParaPromo.Get(id";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759572238",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((double)(BA.ObjectToNumber(_invdispparapromo.Get(_idprodsfijos.Get(_p))))/(double)(double)(BA.ObjectToNumber(_prodsfijospiezas.Get(_p))))))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539518222",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((double)(BA.ObjectToNumber(_invdispparapromo.Get(_idprodsfijos.Get(_p))))/(double)(double)(BA.ObjectToNumber(_prodsfijospiezas.Get(_p))))))+""),0);};
//BA.debugLineNum = 1293;BA.debugLine="Private x() As String = Regex.Split(\"\\.\", $\"${(i";
_x = anywheresoftware.b4a.keywords.Common.Regex.Split("\\.",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((double)(BA.ObjectToNumber(_invdispparapromo.Get(_idprodsfijos.Get(_p))))/(double)(double)(BA.ObjectToNumber(_prodsfijospiezas.Get(_p))))))+""));
//BA.debugLineNum = 1294;BA.debugLine="If thisLog Then Log(x(0))";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759572240",_x[(int) (0)],0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539518224",_x[(int) (0)],0);};
//BA.debugLineNum = 1295;BA.debugLine="t.Add(x(0).As(Int)) 'Solo guardamos la parte del";
_t.Add((Object)(((int)(Double.parseDouble(_x[(int) (0)])))));
}
@@ -1671,13 +1671,13 @@ _t.Add((Object)(((int)(Double.parseDouble(_x[(int) (0)])))));
_t.Sort(anywheresoftware.b4a.keywords.Common.True);
//BA.debugLineNum = 1298;BA.debugLine="If thisLog Then LogColor($\"prodsFijos=${idProdsFi";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759572244",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539518228",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1299;BA.debugLine="If thisLog Then LogColor($\"prodsFijosPiezasReq=${";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759572245",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539518229",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1300;BA.debugLine="If thisLog Then LogColor($\"invFijoXpromo=${invFij";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759572246",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539518230",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1302;BA.debugLine="Return t.Get(0) 'Regresamos el resultado mas pequ";
if (true) return (int)(BA.ObjectToNumber(_t.Get((int) (0))));
//BA.debugLineNum = 1303;BA.debugLine="End Sub";
@@ -1703,13 +1703,13 @@ String _q2 = "";
_thislog = anywheresoftware.b4a.keywords.Common.False;
//BA.debugLineNum = 1237;BA.debugLine="If thisLog Then Log($\"pm=${pm}\"$)";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759506690",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539452674",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),0);};
//BA.debugLineNum = 1239;BA.debugLine="Private invDispParaPromo As Map = traemosInventar";
_invdispparapromo = new anywheresoftware.b4a.objects.collections.Map();
_invdispparapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_pm.Get((Object)("id"))));
//BA.debugLineNum = 1240;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759506693",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539452677",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);};
//BA.debugLineNum = 1241;BA.debugLine="Private maxPromos As String = traeMaxPromos(pm)";
_maxpromos = BA.NumberToString(_traemaxpromos(_ba,_pm));
//BA.debugLineNum = 1242;BA.debugLine="Private maxPromosFijosXinv As Int = 1";
@@ -1727,10 +1727,10 @@ _pfp = new anywheresoftware.b4a.objects.collections.List();
_pfp = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_pm.Get((Object)("prodsFijosPiezas"))));
//BA.debugLineNum = 1247;BA.debugLine="If thisLog Then Log($\"maxPromos=${maxPromos}, pro";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759506700",("maxPromos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromos))+", prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pf.getObject()))+", piezas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pfp.getObject()))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539452684",("maxPromos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromos))+", prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pf.getObject()))+", piezas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pfp.getObject()))+""),0);};
//BA.debugLineNum = 1248;BA.debugLine="If thisLog Then LogColor($\"InvFijo disponible=${i";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759506701",("InvFijo disponible="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539452685",("InvFijo disponible="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1249;BA.debugLine="Private invFijoXpromo As Map";
_invfijoxpromo = new anywheresoftware.b4a.objects.collections.Map();
//BA.debugLineNum = 1250;BA.debugLine="invFijoXpromo.Initialize";
@@ -1747,7 +1747,7 @@ _invfijoxpromo.Put(_pf.Get(_p),_pfp.Get(_p));
};
//BA.debugLineNum = 1254;BA.debugLine="If thisLog Then LogColor(\"Inv req. de prods fijos";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759506707","Inv req. de prods fijos x promo"+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Green);};
anywheresoftware.b4a.keywords.Common.LogImpl("539452691","Inv req. de prods fijos x promo"+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Green);};
//BA.debugLineNum = 1255;BA.debugLine="For i = 1 To maxPromos 'Revisamos cuantas promoci";
{
final int step19 = 1;
@@ -1756,7 +1756,7 @@ _i = (int) (1) ;
for (;_i <= limit19 ;_i = _i + step19 ) {
//BA.debugLineNum = 1256;BA.debugLine="If thisLog Then LogColor(\"Prods para promo \" & (";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759506709","Prods para promo "+BA.NumberToString((_i+1)),anywheresoftware.b4a.keywords.Common.Colors.Magenta);};
anywheresoftware.b4a.keywords.Common.LogImpl("539452693","Prods para promo "+BA.NumberToString((_i+1)),anywheresoftware.b4a.keywords.Common.Colors.Magenta);};
//BA.debugLineNum = 1257;BA.debugLine="For q = 0 To pf.Size - 1";
{
final int step21 = 1;
@@ -1767,14 +1767,14 @@ for (;_q <= limit21 ;_q = _q + step21 ) {
_q2 = BA.ObjectToString(_pf.Get(_q));
//BA.debugLineNum = 1259;BA.debugLine="If thisLog Then Log(\"q=\"&q2)";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759506712","q="+_q2,0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539452696","q="+_q2,0);};
//BA.debugLineNum = 1261;BA.debugLine="fpf2 = pfp.Get(q) * i 'Multiplicamos las piezas";
_fpf2 = (int) ((double)(BA.ObjectToNumber(_pfp.Get(_q)))*_i);
//BA.debugLineNum = 1262;BA.debugLine="pdp2 = invDispParaPromo.Get(q2)";
_pdp2 = (int)(BA.ObjectToNumber(_invdispparapromo.Get((Object)(_q2))));
//BA.debugLineNum = 1263;BA.debugLine="If thisLog Then Log($\"pf=${q2}, Actual=${(i)},";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759506716",("pf="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_q2))+", Actual="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)((_i)))+", max promos: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pdp2))+"-"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fpf2))+"="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pdp2-_fpf2))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539452700",("pf="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_q2))+", Actual="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)((_i)))+", max promos: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pdp2))+"-"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fpf2))+"="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pdp2-_fpf2))+""),0);};
//BA.debugLineNum = 1264;BA.debugLine="If pdp2 - fpf2 < 0 Then 'Si el inventario es ne";
if (_pdp2-_fpf2<0) {
//BA.debugLineNum = 1265;BA.debugLine="salir=True";
@@ -1793,9 +1793,9 @@ _maxpromosfijosxinv = _i;
};
//BA.debugLineNum = 1272;BA.debugLine="If thisLog Then LogColor(\"InvFijo requerido x pro";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759506725","InvFijo requerido x promo="+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539452709","InvFijo requerido x promo="+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1273;BA.debugLine="LogColor(\"Maximo de promociones de prodsFijos POR";
anywheresoftware.b4a.keywords.Common.LogImpl("759506726","Maximo de promociones de prodsFijos POR inventario = "+BA.NumberToString(_maxpromosfijosxinv),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("539452710","Maximo de promociones de prodsFijos POR inventario = "+BA.NumberToString(_maxpromosfijosxinv),anywheresoftware.b4a.keywords.Common.Colors.Red);
//BA.debugLineNum = 1274;BA.debugLine="Return maxPromosFijosXinv";
if (true) return _maxpromosfijosxinv;
//BA.debugLineNum = 1275;BA.debugLine="End Sub";
@@ -1828,10 +1828,10 @@ int _i = 0;
_thislog = anywheresoftware.b4a.keywords.Common.False;
//BA.debugLineNum = 1312;BA.debugLine="If thisLog Then Log(\"============================";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637762","======================================================",0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583746","======================================================",0);};
//BA.debugLineNum = 1313;BA.debugLine="If thisLog Then Log(\"============================";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637763","======================================================",0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583747","======================================================",0);};
//BA.debugLineNum = 1314;BA.debugLine="Private invFijoXpromo As Map";
_invfijoxpromo = new anywheresoftware.b4a.objects.collections.Map();
//BA.debugLineNum = 1315;BA.debugLine="invFijoXpromo.Initialize";
@@ -1842,13 +1842,13 @@ _totalprodsvariablesdisponibles = (int) (0);
_totalprodsvariables2disponibles = (int) (0);
//BA.debugLineNum = 1318;BA.debugLine="If thisLog Then LogColor($\"pm=${pm}\"$, Colors.Blu";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637768",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583752",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1319;BA.debugLine="Private invDispParaPromo As Map = traemosInventar";
_invdispparapromo = new anywheresoftware.b4a.objects.collections.Map();
_invdispparapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_pm.Get((Object)("id"))));
//BA.debugLineNum = 1320;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637770",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583754",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);};
//BA.debugLineNum = 1321;BA.debugLine="Private maxPromos As String = traeMaxPromos(pm)";
_maxpromos = BA.NumberToString(_traemaxpromos(_ba,_pm));
//BA.debugLineNum = 1322;BA.debugLine="Private maxPromosXFijos As Int = revisaMaxPromosP";
@@ -1885,33 +1885,33 @@ _investeprod = (int)(BA.ObjectToNumber(_invdispparapromo.Get((Object)(_idestepro
_pzasreqesteprod = (int)(BA.ObjectToNumber(_prodsfijospiezas.Get(_p)));
//BA.debugLineNum = 1334;BA.debugLine="If thisLog Then Log($\"id=${idEsteProd}, inv=${in";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637784",("id="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idesteprod))+", inv="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_investeprod))+", pzas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pzasreqesteprod))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583768",("id="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idesteprod))+", inv="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_investeprod))+", pzas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pzasreqesteprod))+""),0);};
}
};
//BA.debugLineNum = 1337;BA.debugLine="If thisLog Then LogColor($\"MaxPromos=${maxPromos}";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637787",("MaxPromos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromos))+", promosXFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromosxfijos))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583771",("MaxPromos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromos))+", promosXFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromosxfijos))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1338;BA.debugLine="If thisLog Then LogColor($\"prodsFijos=${idProdsFi";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637788",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583772",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1339;BA.debugLine="If thisLog Then LogColor($\"prodsFijosPiezasReq=${";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637789",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583773",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1340;BA.debugLine="If thisLog Then LogColor($\"prodsVariables=${idPro";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637790",("prodsVariables="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsvariables.getObject()))+""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.CRLF))+"Variables Req="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariablesrequeridos))+" "),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583774",("prodsVariables="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsvariables.getObject()))+""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.CRLF))+"Variables Req="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariablesrequeridos))+" "),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1341;BA.debugLine="If thisLog Then LogColor($\"prodsVariables2=${idPr";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637791",("prodsVariables2="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsvariables2.getObject()))+""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.CRLF))+"Variables2 Req="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariables2requeridos))+" "),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583775",("prodsVariables2="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsvariables2.getObject()))+""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.CRLF))+"Variables2 Req="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariables2requeridos))+" "),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1342;BA.debugLine="If thisLog Then LogColor($\"invFijoXpromo=${invFij";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637792",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583776",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1343;BA.debugLine="If thisLog Then Log($\"Prods variables disponibles";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637793",("Prods variables disponibles = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariablesdisponibles))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583777",("Prods variables disponibles = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariablesdisponibles))+""),0);};
//BA.debugLineNum = 1344;BA.debugLine="If thisLog Then Log($\"Prods variables2 disponible";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637794",("Prods variables2 disponibles = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariables2disponibles))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583778",("Prods variables2 disponibles = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariables2disponibles))+""),0);};
//BA.debugLineNum = 1345;BA.debugLine="Private maxPromosXVariables As Int = 0";
_maxpromosxvariables = (int) (0);
//BA.debugLineNum = 1346;BA.debugLine="Private maxPromosXVariables2 As Int = 0";
@@ -1924,10 +1924,10 @@ _x = (int) (1) ;
for (;_x <= limit36 ;_x = _x + step36 ) {
//BA.debugLineNum = 1348;BA.debugLine="If thisLog Then Log(\"===========================";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637798","=====================================================",0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583782","=====================================================",0);};
//BA.debugLineNum = 1349;BA.debugLine="If thisLog Then Log(\"===========================";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637799","=====================================================",0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583783","=====================================================",0);};
//BA.debugLineNum = 1350;BA.debugLine="For i = 0 To idProdsFijos.Size - 1";
{
final int step39 = 1;
@@ -1936,14 +1936,14 @@ _i = (int) (0) ;
for (;_i <= limit39 ;_i = _i + step39 ) {
//BA.debugLineNum = 1351;BA.debugLine="If thisLog Then Log($\"FIJO - ${idProdsFijos.Get";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637801",("FIJO - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_idprodsfijos.Get(_i))+", "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_invdispparapromo.Get(_idprodsfijos.Get(_i)))+" - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((int)(BA.ObjectToNumber(_prodsfijospiezas.Get(_i))))*(_i+1)))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583785",("FIJO - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_idprodsfijos.Get(_i))+", "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_invdispparapromo.Get(_idprodsfijos.Get(_i)))+" - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((int)(BA.ObjectToNumber(_prodsfijospiezas.Get(_i))))*(_i+1)))+""),0);};
//BA.debugLineNum = 1352;BA.debugLine="invDispParaPromo.Put(idProdsFijos.Get(i), invDi";
_invdispparapromo.Put(_idprodsfijos.Get(_i),(Object)(((int)(BA.ObjectToNumber(_invdispparapromo.Get(_idprodsfijos.Get(_i)))))-((int)(BA.ObjectToNumber(_prodsfijospiezas.Get(_i))))*(_i+1)));
}
};
//BA.debugLineNum = 1354;BA.debugLine="If thisLog Then LogColor(\"Inv disponible despues";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637804","Inv disponible despues de restar fijos = "+BA.ObjectToString(_invdispparapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583788","Inv disponible despues de restar fijos = "+BA.ObjectToString(_invdispparapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
//BA.debugLineNum = 1356;BA.debugLine="totalProdsVariablesDisponibles = 0";
_totalprodsvariablesdisponibles = (int) (0);
//BA.debugLineNum = 1357;BA.debugLine="totalProdsVariables2Disponibles = 0";
@@ -1976,17 +1976,17 @@ _totalprodsvariables2disponibles = (int) (_totalprodsvariables2disponibles+(doub
};
//BA.debugLineNum = 1369;BA.debugLine="If thisLog Then Log($\"Var disponibles - var req";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637819",("Var disponibles - var requeridos : "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariablesdisponibles))+" - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariablesrequeridos*_x))+""),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583803",("Var disponibles - var requeridos : "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariablesdisponibles))+" - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariablesrequeridos*_x))+""),0);};
//BA.debugLineNum = 1370;BA.debugLine="totalProdsVariablesDisponibles = totalProdsVaria";
_totalprodsvariablesdisponibles = (int) (_totalprodsvariablesdisponibles-(_prodsvariablesrequeridos*_x));
//BA.debugLineNum = 1371;BA.debugLine="totalProdsVariables2Disponibles = totalProdsVari";
_totalprodsvariables2disponibles = (int) (_totalprodsvariables2disponibles-(_prodsvariables2requeridos*_x));
//BA.debugLineNum = 1372;BA.debugLine="If thisLog Then Log(\"prodsVariables disponibles";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637822","prodsVariables disponibles despues de promo = "+BA.NumberToString(_totalprodsvariablesdisponibles),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583806","prodsVariables disponibles despues de promo = "+BA.NumberToString(_totalprodsvariablesdisponibles),0);};
//BA.debugLineNum = 1373;BA.debugLine="If thisLog Then Log(\"prodsVariables2 disponibles";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637823","prodsVariables2 disponibles despues de promo = "+BA.NumberToString(_totalprodsvariables2disponibles),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583807","prodsVariables2 disponibles despues de promo = "+BA.NumberToString(_totalprodsvariables2disponibles),0);};
//BA.debugLineNum = 1374;BA.debugLine="If totalProdsVariablesDisponibles < 0 Then Exit";
if (_totalprodsvariablesdisponibles<0) {
if (true) break;};
@@ -1999,7 +1999,7 @@ _maxpromosxvariables = _x;
};
//BA.debugLineNum = 1379;BA.debugLine="If thisLog Then LogColor(\"Max promos de prodsVari";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759637829","Max promos de prodsVariables POR inventario = "+BA.NumberToString(_maxpromosxvariables),anywheresoftware.b4a.keywords.Common.Colors.Red);};
anywheresoftware.b4a.keywords.Common.LogImpl("539583813","Max promos de prodsVariables POR inventario = "+BA.NumberToString(_maxpromosxvariables),anywheresoftware.b4a.keywords.Common.Colors.Red);};
//BA.debugLineNum = 1380;BA.debugLine="Return maxPromosXVariables";
if (true) return _maxpromosxvariables;
//BA.debugLineNum = 1381;BA.debugLine="End Sub";
@@ -2015,14 +2015,14 @@ if (mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.Fu
_daa = (int) (mostCurrent._tracker._uugcoords /*anywheresoftware.b4a.gps.LocationWrapper*/ .DistanceTo((android.location.Location)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getObject())));
//BA.debugLineNum = 384;BA.debugLine="If Starter.Logger Then LogColor($\"**** UUC \"${f";
if (mostCurrent._starter._logger /*boolean*/ ) {
anywheresoftware.b4a.keywords.Common.LogImpl("756754181",("**** UUC \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fechakmt(_ba,BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getTime()))))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLongitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getSpeed()))+"|"),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (255),(int) (112),(int) (35)));};
anywheresoftware.b4a.keywords.Common.LogImpl("536700165",("**** UUC \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fechakmt(_ba,BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getTime()))))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLongitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getSpeed()))+"|"),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (255),(int) (112),(int) (35)));};
//BA.debugLineNum = 385;BA.debugLine="If daa > 40 And Tracker.FLP.GetLastKnownLocatio";
if (_daa>40 && mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()<35) {
//BA.debugLineNum = 386;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO RUTA_GPS(fecha,";
_kmt.ExecNonQuery2("INSERT INTO RUTA_GPS(fecha, lat, lon) VALUES (?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_fechakmt(_ba,BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getTime()))),(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()),(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLongitude())}));
//BA.debugLineNum = 387;BA.debugLine="If Starter.Logger Then Log(\"++++ Distancia a a";
if (mostCurrent._starter._logger /*boolean*/ ) {
anywheresoftware.b4a.keywords.Common.LogImpl("756754184","++++ Distancia a anterior="+BA.NumberToString(_daa)+"|"+"Precision="+BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("536700168","++++ Distancia a anterior="+BA.NumberToString(_daa)+"|"+"Precision="+BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()),0);};
};
//BA.debugLineNum = 389;BA.debugLine="Tracker.UUGCoords = Tracker.FLP.GetLastKnownLoc";
mostCurrent._tracker._uugcoords /*anywheresoftware.b4a.gps.LocationWrapper*/ = mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation();
@@ -2030,7 +2030,7 @@ mostCurrent._tracker._uugcoords /*anywheresoftware.b4a.gps.LocationWrapper*/ =
}
catch (Exception e12) {
(_ba.processBA == null ? _ba : _ba.processBA).setLastException(e12); //BA.debugLineNum = 392;BA.debugLine="LogColor(\"If Tracker.FLP.GetLastKnownLocation.Is";
anywheresoftware.b4a.keywords.Common.LogImpl("756754189","If Tracker.FLP.GetLastKnownLocation.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("536700173","If Tracker.FLP.GetLastKnownLocation.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
};
//BA.debugLineNum = 394;BA.debugLine="End Sub";
return "";
@@ -2220,7 +2220,7 @@ _vendidas = (int) (0);
_maxpromos.Initialize();
//BA.debugLineNum = 1167;BA.debugLine="If thisLog Then Log(pm)";
if (_thislog) {
anywheresoftware.b4a.keywords.Common.LogImpl("759310086",BA.ObjectToString(_pm),0);};
anywheresoftware.b4a.keywords.Common.LogImpl("539256070",BA.ObjectToString(_pm),0);};
//BA.debugLineNum = 1168;BA.debugLine="If pm.Get(\"historico\") = \"1\" Then maxPromos.Add(p";
if ((_pm.Get((Object)("historico"))).equals((Object)("1"))) {
_maxpromos.Add(_pm.Get((Object)("maxRecurrente")));};
@@ -2266,7 +2266,7 @@ int _i = 0;
//BA.debugLineNum = 1048;BA.debugLine="Private c As Cursor";
_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper();
//BA.debugLineNum = 1049;BA.debugLine="Log(\"ESTAMOS VIENDO INVENTARIO\")";
anywheresoftware.b4a.keywords.Common.LogImpl("759113474","ESTAMOS VIENDO INVENTARIO",0);
anywheresoftware.b4a.keywords.Common.LogImpl("539059458","ESTAMOS VIENDO INVENTARIO",0);
//BA.debugLineNum = 1050;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery2($\"SELECT CA";
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2(("SELECT CAT_GP_ID, CAT_GP_ALMACEN FROM "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(mostCurrent._starter._tabla /*String*/ ))+" WHERE CAT_GP_ID IN (select CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID = ?)"),new String[]{_promo})));
//BA.debugLineNum = 1053;BA.debugLine="Private prods As Map";
@@ -2768,7 +2768,7 @@ int _i = 0;
//BA.debugLineNum = 925;BA.debugLine="Private sumaTotal As Double = 0";
_sumatotal = 0;
//BA.debugLineNum = 926;BA.debugLine="LogColor(clientepedido,Colors.Red)";
anywheresoftware.b4a.keywords.Common.LogImpl("758916866",_clientepedido,anywheresoftware.b4a.keywords.Common.Colors.Red);
anywheresoftware.b4a.keywords.Common.LogImpl("538862850",_clientepedido,anywheresoftware.b4a.keywords.Common.Colors.Red);
//BA.debugLineNum = 927;BA.debugLine="Private cursorprueba As Cursor = B4XPages.MainPag";
_cursorprueba = new anywheresoftware.b4a.sql.SQL.CursorWrapper();
_cursorprueba = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*medicomed.keymon.com.mx.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("Select PE_COSTO_TOT from pedido where PE_CLIENTE = ? and PE_IMPRESO IS NOT NULL",new String[]{_clientepedido})));