mirror of
https://github.com/KeymonSoft/Medicomed-V2.git
synced 2026-04-20 06:09:29 +00:00
Version: 5.04.18_V2
Se corigue Query del JobDone del tag "marcas_rutas"
This commit is contained in:
@@ -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})));
|
||||
|
||||
Reference in New Issue
Block a user