mirror of
https://github.com/KeymonSoft/Medicomed-V2.git
synced 2026-04-20 06:09:29 +00:00
Version: 5.05.24_V2
Se le cambio el servidor
This commit is contained in:
IsR0d
@@ -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("258720257","Entramos a actualiza producto",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("074776577","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("258720260",("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("074776580",("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("258720262","----->1<--------------",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("074776582","----->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("258720274","BORRAMOS PROD",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("074776594","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("258720281","----->2<--------------",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("074776601","----->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("258851331",("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("074907651",("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("258851344","BORRAMOS PROD",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("074907664","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("260489739",("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("076546059",("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("260489741",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("076546061",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("259441154","Inventario inicial: "+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Gray);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075497474","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("259441168",("prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", hay: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_p2))+""),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075497488",("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("259441176",("prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", hay: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_p2))+""),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075497496",("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("259441179","Total prods variables="+BA.NumberToString(_totalprodsvariables)+", requeridos="+BA.ObjectToString(_promomap.Get((Object)("prodsVariablesRequeridos"))),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075497499","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("259441180","Total prods variables2="+BA.NumberToString(_totalprodsvariables2)+", requeridos2="+BA.ObjectToString(_promomap.Get((Object)("prodsVariables2Requeridos"))),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075497500","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("259441196",BA.ObjectToString(_res1)+" ________________________"+BA.ObjectToString(_res2),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075497516",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("257081858","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073138178","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("257081861","Borramos mas de 100 de errorLog",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073138181","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("257147394","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073203714","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("257147397","Borramos mas de 600 de bitacora",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073203717","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("256885249","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072941569","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("260227607",("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("076283927",("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("255640070",("Comprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_base64.length()))+""),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("071696390",("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("257475097","rootExternal="+_p,0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073531417","rootExternal="+_p,0);
|
||||
//BA.debugLineNum = 582;BA.debugLine="Log(\"File.DirInternal=\"&File.DirInternal)";
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("257475098","File.DirInternal="+anywheresoftware.b4a.keywords.Common.File.getDirInternal(),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073531418","File.DirInternal="+anywheresoftware.b4a.keywords.Common.File.getDirInternal(),0);
|
||||
//BA.debugLineNum = 583;BA.debugLine="Log(\"File.DirInternal=\"&File.DirInternal)";
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("257475099","File.DirInternal="+anywheresoftware.b4a.keywords.Common.File.getDirInternal(),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073531419","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("257278465","dameErroresJSON",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073334785","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("257278485",_j.ToString(),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073334805",_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("256098827","fechaInicio: "+_fechainicio+" | rutaHrsAtras="+BA.NumberToString(_rutahrsatras),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072155147","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("256098830","select FECHA, LAT, LON from "+_origenruta+" where FECHA > "+_fechainicio+" order by FECHA desc limit "+BA.NumberToString(_rutamaxpoints),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072155150","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("255705605",("Descomprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_uncompressed.length()))+""),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("071761925",("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("256623109","Hoy="+_h,0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072679429","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("257344012","Formato de fecha incorrecto, debe de ser 'YYMMDDHHMMSS', no '"+_fkmt+"' largo="+BA.NumberToString(_fkmt.length()),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073400332","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("257344016",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073400336",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("257344017",("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("073400337",("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("256033281","Guardamos ubicacion en BD - "+_coords,0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072089601","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("256033285","LatLon="+BA.ObjectToString(_latlon),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072089605","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("256033288",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072089608",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("257212930","insertamos 50 renglones a errorLog",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073269250","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("257212933",BA.NumberToString(_x),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073269253",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("256492039",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072548359",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("256688641",_fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))+" - log2BD: '"+_texto+"'",anywheresoftware.b4a.keywords.Common.Colors.LightGray);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072744961",_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("260555266",("====== "+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("076611586",("====== "+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("260555268",_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("076611588",_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("256819723",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072876043",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("255836679","notiHigh: "+_title,0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("071892999","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("255902211","notiLowReturn: "+_title,0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("071958531","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("259637763",("********* Iniciamos revision de Promo "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idpromo))+" *********"),anywheresoftware.b4a.keywords.Common.Colors.Magenta);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075694083",("********* 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("259637766",BA.ObjectToString(_pm),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075694086",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("259637769",("Promociones permitidas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_traemaxpromos(_ba,_pm)))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075694089",("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("259637770","Promos vendidas: "+BA.NumberToString(_traepromosvendidas(_ba,_idpromo,_cliente)),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075694090","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("259637772","Ya se vendieron las promos PERMITIDAS para el cliente",anywheresoftware.b4a.keywords.Common.Colors.Red);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075694092","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("259637777","inventariosfijos="+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Green);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075694097","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("259637782","Alcanzan los variables? --> "+BA.ObjectToString(_pv),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075694102","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("259637785","NO HAY INVENTARIO SUFICIENTE "+_idpromo,anywheresoftware.b4a.keywords.Common.Colors.Red);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075694105","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("259637792","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("075694112","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("259375619","InvDisponible: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Red);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075431939","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("259375620","Inventario inicial antes de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Gray);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075431940","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("259375628",("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("075431948",("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("259375629","inventariosDisponiblesParaEstaPromo="+BA.ObjectToString(_inventariosdisponiblesparaestapromo),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075431949","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("259375632",("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("075431952",("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("259375637","Sin suficiente inventario fijo: "+_t,anywheresoftware.b4a.keywords.Common.Colors.Blue);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075431957","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("259375646","Inventario final depues de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075431966","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("256360966","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("072417286","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("256360982","No pudimos agregar la columna PC_ENVIO_OK.",anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072417302","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("256360983",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072417303",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("256360993","No pudimos agregar la columna CAT_CL_DIAS_VISITA.",anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072417313","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("256360994",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072417314",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("256361004","No pudimos agregar la columna PC_TIEMPO_TIENDA.",anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072417324","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("256361005",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072417325",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("256361014","No pudimos agregar la columna PC_FACTURA.",anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072417334","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("256361015",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("072417335",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("257016321","**** **** Revisamos FLP **** ****",anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (78),(int) (0),(int) (227)));
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073072641","**** **** 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("257016330","If Not(Tracker.FLP.IsInitialized) --- "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073072650","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("257016342","If Not(Tracker.FLP.IsConnected) --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073072662","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("257016353","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("073072673","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("257016356"," +++ +++ Sin errores en FLP",anywheresoftware.b4a.keywords.Common.Colors.Green);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073072676"," +++ +++ 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("257016358","If Tracker.FLP.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073072678","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("259768839",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075825159",("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("259768841",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075825161",("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("259768845",("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("075825165",("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("259768846",(""+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("075825166",(""+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("259768848",_x[(int) (0)],0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075825168",_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("259768852",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075825172",("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("259768853",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075825173",("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("259768854",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075825174",("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("259703298",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075759618",("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("259703301",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075759621",("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("259703308",("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("075759628",("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("259703309",("InvFijo disponible="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075759629",("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("259703315","Inv req. de prods fijos x promo"+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Green);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075759635","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("259703317","Prods para promo "+BA.NumberToString((_i+1)),anywheresoftware.b4a.keywords.Common.Colors.Magenta);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075759637","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("259703320","q="+_q2,0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075759640","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("259703324",("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("075759644",("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("259703333","InvFijo requerido x promo="+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075759653","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("259703334","Maximo de promociones de prodsFijos POR inventario = "+BA.NumberToString(_maxpromosfijosxinv),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075759654","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("259834370","======================================================",0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890690","======================================================",0);};
|
||||
//BA.debugLineNum = 1313;BA.debugLine="If thisLog Then Log(\"============================";
|
||||
if (_thislog) {
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("259834371","======================================================",0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890691","======================================================",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("259834376",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890696",("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("259834378",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890698",("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("259834392",("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("075890712",("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("259834395",("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("075890715",("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("259834396",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890716",("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("259834397",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890717",("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("259834398",("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("075890718",("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("259834399",("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("075890719",("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("259834400",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890720",("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("259834401",("Prods variables disponibles = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariablesdisponibles))+""),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890721",("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("259834402",("Prods variables2 disponibles = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariables2disponibles))+""),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890722",("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("259834406","=====================================================",0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890726","=====================================================",0);};
|
||||
//BA.debugLineNum = 1349;BA.debugLine="If thisLog Then Log(\"===========================";
|
||||
if (_thislog) {
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("259834407","=====================================================",0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890727","=====================================================",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("259834409",("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("075890729",("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("259834412","Inv disponible despues de restar fijos = "+BA.ObjectToString(_invdispparapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890732","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("259834427",("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("075890747",("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("259834430","prodsVariables disponibles despues de promo = "+BA.NumberToString(_totalprodsvariablesdisponibles),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890750","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("259834431","prodsVariables2 disponibles despues de promo = "+BA.NumberToString(_totalprodsvariables2disponibles),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890751","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("259834437","Max promos de prodsVariables POR inventario = "+BA.NumberToString(_maxpromosxvariables),anywheresoftware.b4a.keywords.Common.Colors.Red);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075890757","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("256950789",("**** 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("073007109",("**** 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("256950792","++++ 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("073007112","++++ 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("256950797","If Tracker.FLP.GetLastKnownLocation.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("073007117","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("259506694",BA.ObjectToString(_pm),0);};
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075563014",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("259310082","ESTAMOS VIENDO INVENTARIO",0);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075366402","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("259113474",_clientepedido,anywheresoftware.b4a.keywords.Common.Colors.Red);
|
||||
anywheresoftware.b4a.keywords.Common.LogImpl("075169794",_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