mirror of
https://github.com/KeymonSoft/Medicomed_Preventa.git
synced 2026-04-25 08:30:31 +00:00
f9f3ff7d6e
Se arrglo el resumen dia, ahora puedes entrar sin necesidad de hacer algun pedido sin que truene, se muestra la cantidad de clientes visitados sin importar si tienen o no tienen venta y tambien se le agrego la cantidad de clientes que si tienen venta.
1554 lines
82 KiB
Java
1554 lines
82 KiB
Java
package keymon.lat.medicomed;
|
|
|
|
|
|
import anywheresoftware.b4a.BA;
|
|
import anywheresoftware.b4a.B4AClass;
|
|
import anywheresoftware.b4a.BALayout;
|
|
import anywheresoftware.b4a.debug.*;
|
|
|
|
public class b4xmainpage extends B4AClass.ImplB4AClass implements BA.SubDelegator{
|
|
private static java.util.HashMap<String, java.lang.reflect.Method> htSubs;
|
|
private void innerInitialize(BA _ba) throws Exception {
|
|
if (ba == null) {
|
|
ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xmainpage");
|
|
if (htSubs == null) {
|
|
ba.loadHtSubs(this.getClass());
|
|
htSubs = ba.htSubs;
|
|
}
|
|
|
|
}
|
|
if (BA.isShellModeRuntimeCheck(ba))
|
|
this.getClass().getMethod("_class_globals", keymon.lat.medicomed.b4xmainpage.class).invoke(this, new Object[] {null});
|
|
else
|
|
ba.raiseEvent2(null, true, "class_globals", false);
|
|
}
|
|
|
|
public anywheresoftware.b4a.keywords.Common __c = null;
|
|
public anywheresoftware.b4a.objects.B4XViewWrapper _root = null;
|
|
public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null;
|
|
public keymon.lat.medicomed.b4xmainpage _login = null;
|
|
public keymon.lat.medicomed.dbrequestmanager _reqmanager = null;
|
|
public keymon.lat.medicomed.c_principal _principal = null;
|
|
public keymon.lat.medicomed.c_clientes _clientes = null;
|
|
public keymon.lat.medicomed.c_cliente _cliente = null;
|
|
public keymon.lat.medicomed.c_productos _productos = null;
|
|
public keymon.lat.medicomed.c_updateavailable _updateavailable = null;
|
|
public keymon.lat.medicomed.c_mapas _mapas = null;
|
|
public keymon.lat.medicomed.c_nuevocliente _nuevocliente = null;
|
|
public keymon.lat.medicomed.c_ticketsdia _ticketsdia = null;
|
|
public keymon.lat.medicomed.c_noventa _noventa = null;
|
|
public keymon.lat.medicomed.c_nota _nota = null;
|
|
public keymon.lat.medicomed.c_pedidos _pedidos = null;
|
|
public keymon.lat.medicomed.c_promos _promos = null;
|
|
public keymon.lat.medicomed.c_historico _historico = null;
|
|
public String _v = "";
|
|
public String _ruta = "";
|
|
public com.rootsoft.togglelibrary.ToggleLibrary _tgl = null;
|
|
public String _lat_gps = "";
|
|
public String _lon_gps = "";
|
|
public String _usuario = "";
|
|
public int _batt = 0;
|
|
public anywheresoftware.b4a.sql.SQL _skmt = null;
|
|
public String _montoactual = "";
|
|
public String _clientestotal = "";
|
|
public String _clientesventa = "";
|
|
public String _clientesvisitados = "";
|
|
public String _almacen = "";
|
|
public String _rutapreventa = "";
|
|
public String _server = "";
|
|
public String _fecharuta = "";
|
|
public boolean _logger = false;
|
|
public String _mac_impresora = "";
|
|
public anywheresoftware.b4a.phone.Phone.PhoneId _phn = null;
|
|
public anywheresoftware.b4a.objects.EditTextWrapper _user = null;
|
|
public anywheresoftware.b4a.objects.EditTextWrapper _pass = null;
|
|
public anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null;
|
|
public String _existe = "";
|
|
public String _paso1 = "";
|
|
public anywheresoftware.b4a.objects.LabelWrapper _imen = null;
|
|
public String _imei = "";
|
|
public String _alterno = "";
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _b_menu = null;
|
|
public com.rootsoft.rspopupmenu.RSPopupMenu _popupmenu = null;
|
|
public keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null;
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _pdf = null;
|
|
public batteryprogressviewwrapper.batteryprogressviewWrapper _bpv1 = null;
|
|
public int[] _batterystatus = null;
|
|
public keymon.lat.medicomed.batteryutilities _bu = null;
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _b_apk = null;
|
|
public anywheresoftware.b4a.objects.ImageViewWrapper _i_engrane = null;
|
|
public anywheresoftware.b4a.objects.PanelWrapper _p_main = null;
|
|
public anywheresoftware.b4a.objects.PanelWrapper _p_appupdate = null;
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _b_regesar = null;
|
|
public anywheresoftware.b4a.objects.LabelWrapper _l_version = null;
|
|
public anywheresoftware.b4a.objects.ImageViewWrapper _imageview1 = null;
|
|
public anywheresoftware.b4a.objects.LabelWrapper _label2 = null;
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _entrar = null;
|
|
public String _tipo_venta = "";
|
|
public boolean _bterminarclicked = false;
|
|
public anywheresoftware.b4a.objects.ListViewWrapper _lv_server = null;
|
|
public anywheresoftware.b4a.objects.LabelWrapper _l_server = null;
|
|
public anywheresoftware.b4a.objects.EditTextWrapper _et_server = null;
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _b_server = null;
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _b_enviobd = null;
|
|
public keymon.lat.medicomed.fileprovider _provider = null;
|
|
public String _rutabdbackup = "";
|
|
public b4a.example.dateutils _dateutils = null;
|
|
public keymon.lat.medicomed.main _main = null;
|
|
public keymon.lat.medicomed.starter _starter = null;
|
|
public keymon.lat.medicomed.subs _subs = null;
|
|
public keymon.lat.medicomed.appupdater _appupdater = null;
|
|
public keymon.lat.medicomed.mapa_rutas _mapa_rutas = null;
|
|
public keymon.lat.medicomed.tracker _tracker = null;
|
|
public keymon.lat.medicomed.newinst2 _newinst2 = null;
|
|
public keymon.lat.medicomed.b4xpages _b4xpages = null;
|
|
public keymon.lat.medicomed.b4xcollections _b4xcollections = null;
|
|
public keymon.lat.medicomed.httputils2service _httputils2service = null;
|
|
public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null;
|
|
public String _b_apk_click() throws Exception{
|
|
//BA.debugLineNum = 621;BA.debugLine="Sub b_apk_Click";
|
|
//BA.debugLineNum = 622;BA.debugLine="StartService(appUpdater)";
|
|
__c.StartService(ba,(Object)(_appupdater.getObject()));
|
|
//BA.debugLineNum = 623;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public void _b_enviobd_click() throws Exception{
|
|
ResumableSub_b_envioBD_Click rsub = new ResumableSub_b_envioBD_Click(this);
|
|
rsub.resume(ba, null);
|
|
}
|
|
public static class ResumableSub_b_envioBD_Click extends BA.ResumableSub {
|
|
public ResumableSub_b_envioBD_Click(keymon.lat.medicomed.b4xmainpage parent) {
|
|
this.parent = parent;
|
|
}
|
|
keymon.lat.medicomed.b4xmainpage parent;
|
|
String _filename = "";
|
|
anywheresoftware.b4a.phone.Phone.Email _email = null;
|
|
anywheresoftware.b4a.objects.IntentWrapper _in = null;
|
|
|
|
@Override
|
|
public void resume(BA ba, Object[] result) throws Exception{
|
|
|
|
while (true) {
|
|
switch (state) {
|
|
case -1:
|
|
return;
|
|
|
|
case 0:
|
|
//C
|
|
this.state = -1;
|
|
//BA.debugLineNum = 681;BA.debugLine="Dim FileName As String = \"kmt.db\"";
|
|
_filename = "kmt.db";
|
|
//BA.debugLineNum = 683;BA.debugLine="Log(\"xxxxxx:\"&Provider.SharedFolder)";
|
|
parent.__c.LogImpl("31835013","xxxxxx:"+parent._provider._sharedfolder /*String*/ ,0);
|
|
//BA.debugLineNum = 684;BA.debugLine="Sleep(1000)";
|
|
parent.__c.Sleep(ba,this,(int) (1000));
|
|
this.state = 1;
|
|
return;
|
|
case 1:
|
|
//C
|
|
this.state = -1;
|
|
;
|
|
//BA.debugLineNum = 685;BA.debugLine="File.Copy(File.DirInternal, FileName, Provider.Sh";
|
|
parent.__c.File.Copy(parent.__c.File.getDirInternal(),_filename,parent._provider._sharedfolder /*String*/ ,_filename);
|
|
//BA.debugLineNum = 686;BA.debugLine="Dim email As Email";
|
|
_email = new anywheresoftware.b4a.phone.Phone.Email();
|
|
//BA.debugLineNum = 687;BA.debugLine="email.To.Add(\"cheveguerra@gmail.com\")";
|
|
_email.To.Add((Object)("cheveguerra@gmail.com"));
|
|
//BA.debugLineNum = 688;BA.debugLine="email.Subject = \"subject\"";
|
|
_email.Subject = "subject";
|
|
//BA.debugLineNum = 689;BA.debugLine="email.Attachments.Add(Provider.GetFileUri(FileNam";
|
|
_email.Attachments.Add(parent._provider._getfileuri /*Object*/ (_filename));
|
|
//BA.debugLineNum = 691;BA.debugLine="Dim in As Intent = email.GetIntent";
|
|
_in = new anywheresoftware.b4a.objects.IntentWrapper();
|
|
_in = (anywheresoftware.b4a.objects.IntentWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.IntentWrapper(), (android.content.Intent)(_email.GetIntent()));
|
|
//BA.debugLineNum = 692;BA.debugLine="in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION";
|
|
_in.setFlags((int) (1));
|
|
//BA.debugLineNum = 693;BA.debugLine="StartActivity(in)";
|
|
parent.__c.StartActivity(ba,(Object)(_in.getObject()));
|
|
//BA.debugLineNum = 694;BA.debugLine="End Sub";
|
|
if (true) break;
|
|
|
|
}
|
|
}
|
|
}
|
|
}
|
|
public String _b_menu_click() throws Exception{
|
|
//BA.debugLineNum = 547;BA.debugLine="Sub b_menu_Click";
|
|
//BA.debugLineNum = 548;BA.debugLine="PopupMenu.Show";
|
|
_popupmenu.Show();
|
|
//BA.debugLineNum = 549;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _b_regesar_click() throws Exception{
|
|
//BA.debugLineNum = 644;BA.debugLine="Sub b_regesar_Click";
|
|
//BA.debugLineNum = 645;BA.debugLine="p_appUpdate.Visible = False";
|
|
_p_appupdate.setVisible(__c.False);
|
|
//BA.debugLineNum = 646;BA.debugLine="Subs.panelVisible(p_Main,0,0)";
|
|
_subs._panelvisible /*String*/ (ba,_p_main,(int) (0),(int) (0));
|
|
//BA.debugLineNum = 647;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _b_server_click() throws Exception{
|
|
//BA.debugLineNum = 653;BA.debugLine="Sub B_SERVER_Click";
|
|
//BA.debugLineNum = 654;BA.debugLine="skmt.ExecNonQuery2(\"delete from CAT_VARIABLES whe";
|
|
_skmt.ExecNonQuery2("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("SERVER")}));
|
|
//BA.debugLineNum = 655;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_VARIABLES(CAT";
|
|
_skmt.ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("SERVER"),(Object)(_et_server.getText())}));
|
|
//BA.debugLineNum = 656;BA.debugLine="Starter.server = et_server.text";
|
|
_starter._server /*String*/ = _et_server.getText();
|
|
//BA.debugLineNum = 657;BA.debugLine="If Logger Then Log(\"Inicializamos reqManager con";
|
|
if (_logger) {
|
|
__c.LogImpl("31638404","Inicializamos reqManager con "+_starter._server /*String*/ ,0);};
|
|
//BA.debugLineNum = 658;BA.debugLine="reqManager.Initialize(Me, Starter.server)";
|
|
_reqmanager._initialize /*String*/ (ba,this,_starter._server /*String*/ );
|
|
//BA.debugLineNum = 659;BA.debugLine="CallSubDelayed(Starter, \"reinicializaReqManager\")";
|
|
__c.CallSubDelayed(ba,(Object)(_starter.getObject()),"reinicializaReqManager");
|
|
//BA.debugLineNum = 660;BA.debugLine="Subs.panelVisible(p_Main,0,0)";
|
|
_subs._panelvisible /*String*/ (ba,_p_main,(int) (0),(int) (0));
|
|
//BA.debugLineNum = 661;BA.debugLine="p_appUpdate.Visible = False";
|
|
_p_appupdate.setVisible(__c.False);
|
|
//BA.debugLineNum = 663;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public void _b4xpage_appear() throws Exception{
|
|
ResumableSub_B4XPage_Appear rsub = new ResumableSub_B4XPage_Appear(this);
|
|
rsub.resume(ba, null);
|
|
}
|
|
public static class ResumableSub_B4XPage_Appear extends BA.ResumableSub {
|
|
public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.b4xmainpage parent) {
|
|
this.parent = parent;
|
|
}
|
|
keymon.lat.medicomed.b4xmainpage parent;
|
|
anywheresoftware.b4a.phone.Phone _ph = null;
|
|
String _deviceid = "";
|
|
String _sdate = "";
|
|
String _stime = "";
|
|
|
|
@Override
|
|
public void resume(BA ba, Object[] result) throws Exception{
|
|
|
|
while (true) {
|
|
switch (state) {
|
|
case -1:
|
|
return;
|
|
|
|
case 0:
|
|
//C
|
|
this.state = 1;
|
|
//BA.debugLineNum = 245;BA.debugLine="If Starter.muestraProgreso = 1 Then";
|
|
if (true) break;
|
|
|
|
case 1:
|
|
//if
|
|
this.state = 4;
|
|
if ((parent._starter._muestraprogreso /*String*/ ).equals(BA.NumberToString(1))) {
|
|
this.state = 3;
|
|
}if (true) break;
|
|
|
|
case 3:
|
|
//C
|
|
this.state = 4;
|
|
//BA.debugLineNum = 246;BA.debugLine="muestraProgreso(\"Descargando actualización\")";
|
|
parent._muestraprogreso("Descargando actualización");
|
|
//BA.debugLineNum = 247;BA.debugLine="Starter.muestraProgreso = 0";
|
|
parent._starter._muestraprogreso /*String*/ = BA.NumberToString(0);
|
|
if (true) break;
|
|
|
|
case 4:
|
|
//C
|
|
this.state = 5;
|
|
;
|
|
//BA.debugLineNum = 249;BA.debugLine="Dim ph As Phone 'Get Id Device";
|
|
_ph = new anywheresoftware.b4a.phone.Phone();
|
|
//BA.debugLineNum = 250;BA.debugLine="Dim DeviceID As String = ph.GetSettings(\"android_";
|
|
_deviceid = _ph.GetSettings("android_id").toUpperCase();
|
|
//BA.debugLineNum = 251;BA.debugLine="LogColor($\"////////////////// DeviceID: ${Devic";
|
|
parent.__c.LogImpl("3524295",("////////////////// DeviceID: "+parent.__c.SmartStringFormatter("",(Object)(_deviceid))+" ////////////////// "),parent.__c.Colors.Blue);
|
|
//BA.debugLineNum = 252;BA.debugLine="server = Starter.server";
|
|
parent._server = parent._starter._server /*String*/ ;
|
|
//BA.debugLineNum = 253;BA.debugLine="reqManager.Initialize(Me, Starter.server)";
|
|
parent._reqmanager._initialize /*String*/ (ba,parent,parent._starter._server /*String*/ );
|
|
//BA.debugLineNum = 254;BA.debugLine="tgl.Initialize()";
|
|
parent._tgl.Initialize(ba);
|
|
//BA.debugLineNum = 255;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then";
|
|
if (true) break;
|
|
|
|
case 5:
|
|
//if
|
|
this.state = 8;
|
|
if (parent.__c.Not(parent._starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) {
|
|
this.state = 7;
|
|
}if (true) break;
|
|
|
|
case 7:
|
|
//C
|
|
this.state = 8;
|
|
//BA.debugLineNum = 256;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence";
|
|
parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Es necesario tener el GPS encendido"),parent.__c.True);
|
|
//BA.debugLineNum = 257;BA.debugLine="Sleep(500)";
|
|
parent.__c.Sleep(ba,this,(int) (500));
|
|
this.state = 19;
|
|
return;
|
|
case 19:
|
|
//C
|
|
this.state = 8;
|
|
;
|
|
//BA.debugLineNum = 258;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent";
|
|
parent.__c.StartActivity(ba,(Object)(parent._starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent()));
|
|
if (true) break;
|
|
|
|
case 8:
|
|
//C
|
|
this.state = 9;
|
|
;
|
|
//BA.debugLineNum = 260;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) as CUANTOS fro";
|
|
parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._skmt.ExecQuery2("select count(*) as CUANTOS from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?",new String[]{"FECHA"})));
|
|
//BA.debugLineNum = 261;BA.debugLine="c.Position = 0";
|
|
parent._c.setPosition((int) (0));
|
|
//BA.debugLineNum = 262;BA.debugLine="If c.GetString(\"CUANTOS\") = 0 Then";
|
|
if (true) break;
|
|
|
|
case 9:
|
|
//if
|
|
this.state = 18;
|
|
if ((parent._c.GetString("CUANTOS")).equals(BA.NumberToString(0))) {
|
|
this.state = 11;
|
|
}else {
|
|
this.state = 13;
|
|
}if (true) break;
|
|
|
|
case 11:
|
|
//C
|
|
this.state = 18;
|
|
//BA.debugLineNum = 263;BA.debugLine="LogColor($\"No hay fecha: ${c.GetString(\"CUANTOS\"";
|
|
parent.__c.LogImpl("3524307",("No hay fecha: "+parent.__c.SmartStringFormatter("",(Object)(parent._c.GetString("CUANTOS")))+""),parent.__c.Colors.Red);
|
|
//BA.debugLineNum = 264;BA.debugLine="cmd.Initialize";
|
|
parent._cmd.Initialize();
|
|
//BA.debugLineNum = 265;BA.debugLine="cmd.Name = \"select_fecha\"";
|
|
parent._cmd.Name /*String*/ = "select_fecha";
|
|
//BA.debugLineNum = 266;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"fecha\")";
|
|
parent._reqmanager._executequery /*String*/ (parent._cmd,(int) (0),(Object)("fecha"));
|
|
//BA.debugLineNum = 267;BA.debugLine="Msgbox(\"AJUSTAR FECHA\",\"AVISO\") 'Ignore";
|
|
parent.__c.Msgbox(BA.ObjectToCharSequence("AJUSTAR FECHA"),BA.ObjectToCharSequence("AVISO"),ba);
|
|
//BA.debugLineNum = 268;BA.debugLine="B4XPage_Appear";
|
|
parent._b4xpage_appear();
|
|
if (true) break;
|
|
|
|
case 13:
|
|
//C
|
|
this.state = 14;
|
|
//BA.debugLineNum = 271;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_VA_VALOR from CAT_";
|
|
parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._skmt.ExecQuery2("select CAT_VA_VALOR from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?",new String[]{"FECHA"})));
|
|
//BA.debugLineNum = 272;BA.debugLine="c.Position =0";
|
|
parent._c.setPosition((int) (0));
|
|
//BA.debugLineNum = 273;BA.debugLine="Dim sDate, sTime As String";
|
|
_sdate = "";
|
|
_stime = "";
|
|
//BA.debugLineNum = 274;BA.debugLine="DateTime.DateFormat = \"yyyyMMdd\"";
|
|
parent.__c.DateTime.setDateFormat("yyyyMMdd");
|
|
//BA.debugLineNum = 275;BA.debugLine="sDate=DateTime.Date(DateTime.Now)";
|
|
_sdate = parent.__c.DateTime.Date(parent.__c.DateTime.getNow());
|
|
//BA.debugLineNum = 280;BA.debugLine="If c.GetString(\"CAT_VA_VALOR\") > sDate Then";
|
|
if (true) break;
|
|
|
|
case 14:
|
|
//if
|
|
this.state = 17;
|
|
if ((double)(Double.parseDouble(parent._c.GetString("CAT_VA_VALOR")))>(double)(Double.parseDouble(_sdate))) {
|
|
this.state = 16;
|
|
}if (true) break;
|
|
|
|
case 16:
|
|
//C
|
|
this.state = 17;
|
|
//BA.debugLineNum = 281;BA.debugLine="Msgbox(\"AJUSTAR LA FECHA YA QUE ES MENOR AL SIS";
|
|
parent.__c.Msgbox(BA.ObjectToCharSequence("AJUSTAR LA FECHA YA QUE ES MENOR AL SISTEMA"),BA.ObjectToCharSequence("AVISO"),ba);
|
|
//BA.debugLineNum = 282;BA.debugLine="B4XPage_Appear";
|
|
parent._b4xpage_appear();
|
|
if (true) break;
|
|
|
|
case 17:
|
|
//C
|
|
this.state = 18;
|
|
;
|
|
if (true) break;
|
|
|
|
case 18:
|
|
//C
|
|
this.state = -1;
|
|
;
|
|
//BA.debugLineNum = 285;BA.debugLine="bu.Initialize";
|
|
parent._bu._initialize /*String*/ (ba);
|
|
//BA.debugLineNum = 286;BA.debugLine="batterystatus = bu.BatteryInformation";
|
|
parent._batterystatus = parent._bu._getbatteryinformation /*int[]*/ ();
|
|
//BA.debugLineNum = 289;BA.debugLine="dameUsuario";
|
|
parent._dameusuario();
|
|
//BA.debugLineNum = 290;BA.debugLine="End Sub";
|
|
if (true) break;
|
|
|
|
}
|
|
}
|
|
}
|
|
}
|
|
public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _b4xpage_closerequest() throws Exception{
|
|
ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(this);
|
|
rsub.resume(ba, null);
|
|
return (anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.keywords.Common.ResumableSubWrapper(), rsub);
|
|
}
|
|
public static class ResumableSub_B4XPage_CloseRequest extends BA.ResumableSub {
|
|
public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.b4xmainpage parent) {
|
|
this.parent = parent;
|
|
}
|
|
keymon.lat.medicomed.b4xmainpage parent;
|
|
|
|
@Override
|
|
public void resume(BA ba, Object[] result) throws Exception{
|
|
|
|
while (true) {
|
|
switch (state) {
|
|
case -1:
|
|
{
|
|
parent.__c.ReturnFromResumableSub(this,null);return;}
|
|
case 0:
|
|
//C
|
|
this.state = 1;
|
|
//BA.debugLineNum = 517;BA.debugLine="Log(\"closreq\")";
|
|
parent.__c.LogImpl("3720897","closreq",0);
|
|
//BA.debugLineNum = 518;BA.debugLine="Sleep(0)";
|
|
parent.__c.Sleep(ba,this,(int) (0));
|
|
this.state = 8;
|
|
return;
|
|
case 8:
|
|
//C
|
|
this.state = 1;
|
|
;
|
|
//BA.debugLineNum = 519;BA.debugLine="If p_appUpdate.Visible Then";
|
|
if (true) break;
|
|
|
|
case 1:
|
|
//if
|
|
this.state = 4;
|
|
if (parent._p_appupdate.getVisible()) {
|
|
this.state = 3;
|
|
}if (true) break;
|
|
|
|
case 3:
|
|
//C
|
|
this.state = 4;
|
|
//BA.debugLineNum = 520;BA.debugLine="Log(\"update visible\")";
|
|
parent.__c.LogImpl("3720900","update visible",0);
|
|
//BA.debugLineNum = 521;BA.debugLine="p_appUpdate.Visible = False";
|
|
parent._p_appupdate.setVisible(parent.__c.False);
|
|
//BA.debugLineNum = 522;BA.debugLine="Return False";
|
|
if (true) {
|
|
parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;};
|
|
if (true) break;
|
|
;
|
|
//BA.debugLineNum = 524;BA.debugLine="If Not(p_appUpdate.Visible) Then";
|
|
|
|
case 4:
|
|
//if
|
|
this.state = 7;
|
|
if (parent.__c.Not(parent._p_appupdate.getVisible())) {
|
|
this.state = 6;
|
|
}if (true) break;
|
|
|
|
case 6:
|
|
//C
|
|
this.state = 7;
|
|
//BA.debugLineNum = 525;BA.debugLine="Log(\"ExitApplication\")";
|
|
parent.__c.LogImpl("3720905","ExitApplication",0);
|
|
//BA.debugLineNum = 526;BA.debugLine="ExitApplication";
|
|
parent.__c.ExitApplication();
|
|
if (true) break;
|
|
|
|
case 7:
|
|
//C
|
|
this.state = -1;
|
|
;
|
|
//BA.debugLineNum = 528;BA.debugLine="Return True";
|
|
if (true) {
|
|
parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.True));return;};
|
|
//BA.debugLineNum = 529;BA.debugLine="End Sub";
|
|
if (true) break;
|
|
|
|
}
|
|
}
|
|
}
|
|
}
|
|
public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{
|
|
//BA.debugLineNum = 101;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)";
|
|
//BA.debugLineNum = 102;BA.debugLine="B4XPages.GetManager.LogEvents = True";
|
|
_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (ba)._logevents /*boolean*/ = __c.True;
|
|
//BA.debugLineNum = 103;BA.debugLine="Root = Root1";
|
|
_root = _root1;
|
|
//BA.debugLineNum = 104;BA.debugLine="Root.LoadLayout(\"login\")";
|
|
_root.LoadLayout("login",ba);
|
|
//BA.debugLineNum = 105;BA.debugLine="B4XPages.SetTitle(Me, \"Medicomed Preventa\")";
|
|
_b4xpages._settitle /*String*/ (ba,this,(Object)("Medicomed Preventa"));
|
|
//BA.debugLineNum = 106;BA.debugLine="login.Initialize";
|
|
_login._initialize /*String*/ (ba);
|
|
//BA.debugLineNum = 107;BA.debugLine="B4XPages.AddPage(\"Login\", login)";
|
|
_b4xpages._addpage /*String*/ (ba,"Login",(Object)(_login));
|
|
//BA.debugLineNum = 108;BA.debugLine="principal.Initialize";
|
|
_principal._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 109;BA.debugLine="B4XPages.AddPage(\"Principal\", principal)";
|
|
_b4xpages._addpage /*String*/ (ba,"Principal",(Object)(_principal));
|
|
//BA.debugLineNum = 110;BA.debugLine="clientes.Initialize";
|
|
_clientes._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 111;BA.debugLine="B4XPages.AddPage(\"Clientes\", clientes)";
|
|
_b4xpages._addpage /*String*/ (ba,"Clientes",(Object)(_clientes));
|
|
//BA.debugLineNum = 112;BA.debugLine="cliente.Initialize";
|
|
_cliente._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 113;BA.debugLine="B4XPages.AddPage(\"Cliente\", cliente)";
|
|
_b4xpages._addpage /*String*/ (ba,"Cliente",(Object)(_cliente));
|
|
//BA.debugLineNum = 114;BA.debugLine="productos.Initialize";
|
|
_productos._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 115;BA.debugLine="B4XPages.AddPage(\"Productos\", productos)";
|
|
_b4xpages._addpage /*String*/ (ba,"Productos",(Object)(_productos));
|
|
//BA.debugLineNum = 116;BA.debugLine="updateAvailable.Initialize";
|
|
_updateavailable._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 117;BA.debugLine="B4XPages.AddPage(\"updateAvailable\", updateAvailab";
|
|
_b4xpages._addpage /*String*/ (ba,"updateAvailable",(Object)(_updateavailable));
|
|
//BA.debugLineNum = 118;BA.debugLine="mapas.Initialize";
|
|
_mapas._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 119;BA.debugLine="B4XPages.AddPage(\"Mapas\", mapas)";
|
|
_b4xpages._addpage /*String*/ (ba,"Mapas",(Object)(_mapas));
|
|
//BA.debugLineNum = 120;BA.debugLine="nuevoCliente.Initialize";
|
|
_nuevocliente._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 121;BA.debugLine="B4XPages.AddPage(\"NuevoCliente\", nuevoCliente)";
|
|
_b4xpages._addpage /*String*/ (ba,"NuevoCliente",(Object)(_nuevocliente));
|
|
//BA.debugLineNum = 122;BA.debugLine="ticketsDia.Initialize";
|
|
_ticketsdia._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 123;BA.debugLine="B4XPages.AddPage(\"TicketsDia\", ticketsDia)";
|
|
_b4xpages._addpage /*String*/ (ba,"TicketsDia",(Object)(_ticketsdia));
|
|
//BA.debugLineNum = 124;BA.debugLine="noVenta.Initialize";
|
|
_noventa._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 125;BA.debugLine="B4XPages.AddPage(\"NoVenta\", noVenta)";
|
|
_b4xpages._addpage /*String*/ (ba,"NoVenta",(Object)(_noventa));
|
|
//BA.debugLineNum = 126;BA.debugLine="nota.Initialize";
|
|
_nota._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 127;BA.debugLine="B4XPages.AddPage(\"Nota\", nota)";
|
|
_b4xpages._addpage /*String*/ (ba,"Nota",(Object)(_nota));
|
|
//BA.debugLineNum = 128;BA.debugLine="pedidos.Initialize";
|
|
_pedidos._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 129;BA.debugLine="B4XPages.AddPage(\"Pedidos\", pedidos)";
|
|
_b4xpages._addpage /*String*/ (ba,"Pedidos",(Object)(_pedidos));
|
|
//BA.debugLineNum = 130;BA.debugLine="promos.Initialize";
|
|
_promos._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 131;BA.debugLine="B4XPages.AddPage(\"Promos\", promos)";
|
|
_b4xpages._addpage /*String*/ (ba,"Promos",(Object)(_promos));
|
|
//BA.debugLineNum = 132;BA.debugLine="historico.Initialize";
|
|
_historico._initialize /*Object*/ (ba);
|
|
//BA.debugLineNum = 133;BA.debugLine="B4XPages.AddPage(\"Historico\", historico)";
|
|
_b4xpages._addpage /*String*/ (ba,"Historico",(Object)(_historico));
|
|
//BA.debugLineNum = 134;BA.debugLine="ruta = Starter.ruta";
|
|
_ruta = _starter._ruta /*String*/ ;
|
|
//BA.debugLineNum = 136;BA.debugLine="Provider.Initialize";
|
|
_provider._initialize /*String*/ (ba);
|
|
//BA.debugLineNum = 139;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then";
|
|
if (__c.File.Exists(_ruta,"kmt.db")==__c.False) {
|
|
//BA.debugLineNum = 140;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d";
|
|
__c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db");
|
|
//BA.debugLineNum = 141;BA.debugLine="Log(File.DirAssets)";
|
|
__c.LogImpl("3458792",__c.File.getDirAssets(),0);
|
|
//BA.debugLineNum = 142;BA.debugLine="LogColor(\"copiamos kmt.db de \"&File.DirAssets &";
|
|
__c.LogImpl("3458793","copiamos kmt.db de "+__c.File.getDirAssets()+" a "+_ruta,__c.Colors.Green);
|
|
};
|
|
//BA.debugLineNum = 144;BA.debugLine="Log(ruta)";
|
|
__c.LogImpl("3458795",_ruta,0);
|
|
//BA.debugLineNum = 145;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)";
|
|
_skmt.Initialize(_ruta,"kmt.db",__c.True);
|
|
//BA.debugLineNum = 146;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_CUOTAS (HC_META6 TEXT, HC_META5 TEXT, HC_META4 TEXT, HC_META3 TEXT, HC_META2 TEXT, HC_META1 TEXT, HC_RUTA TEXT, HC_CUOTA1 TEXT, HC_CUOTA2 TEXT, HC_CUOTA3 TEXT, HC_CUOTA4 TEXT, HC_CUOTA5 TEXT, HC_CUOTA6 TEXT)");
|
|
//BA.debugLineNum = 147;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_GPS (HGDATE TEXT, HGLAT TEXT, HGLON TEXT)");
|
|
//BA.debugLineNum = 148;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_STAY_STORE (HSS_CODIGO TEXT, HSS_IN TEXT, HSS_OUT TEXT, HSS_TOT TEXT)");
|
|
//BA.debugLineNum = 149;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_STAY_OUT (HSO_INI TEXT, HSO_FIN TEXT)");
|
|
//BA.debugLineNum = 150;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS INV";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS INVENT_X_ENVIAR (ALMACEN TEXT, PROID TEXT, CANTIDAD TEXT)");
|
|
//BA.debugLineNum = 151;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_RESUM_APK (HIST_RA_OBJMES TEXT, HIST_RA_VENTA TEXT, HIST_RA_TENDENCIA TEXT, HIST_RA_ALCANCE TEXT, HISR_RA_DRAOBJ TEXT, HIST_RA_DRAVTA TEXT, HIST_RA_DSOBJ TEXT, HIST_RA_DSVTA TEXT, HIST_RA_VPOOBJ TEXT, HIST_RA_VPOVTA TEXT, HIST_RA_COBCCC TEXT, HIST_RA_CTES TEXT, HIST_RA_ECO TEXT, HIST_RA_VISITPLAN TEXT, HIST_RA_VISIREAL TEXT, HIST_RA_COBVISIT TEXT, HIST_RA_FRECCOMPOBJ TEXT, HIST_RA_FRECCOMREAL TEXT, HIST_RA_VENTAMES1 TEXT, HIST_RA_VENTAMES2 TEXT, HIST_RA_VENTAMES3 TEXT, HIST_RA_VENTAMES4 TEXT, HIST_RA_RECHAZO TEXT, HIST_RA_RECHAZOPORCEN TEXT, HIST_RA_SEMANA1 TEXT, HIST_RA_SEMANA1_DIAS TEXT, HIST_RA_SEMANA1_DRA TEXT, HIST_RA_SEMANA2 TEXT, HIST_RA_SEMANA2_DIAS TEXT, HIST_RA_SEMANA2_DRA TEXT, HIST_RA_SEMANA3 TEXT, HIST_RA_SEMANA3_DIAS TEXT, HIST_RA_SEMANA4 TEXT, HIST_RA_SEMANA3_DRA TEXT, HIST_RA_SEMANA4_DIAS TEXT, HIST_RA_SEMANA4_DRA TEXT, HIST_RA_SEMANA5 TEXT, HIST_RA_SEMANA5_DIAS TEXT, HIST_RA_SEMANA5_DRA TEXT, HIST_RA_SEMANA1_LPT TEXT, HIST_RA_SEMANA2_LPT TEXT, HIST_RA_SEMANA3_LPT TEXT, HIST_RA_SEMANA4_LPT TEXT, HIST_RA_SEMANA5_LPT TEXT, HIST_RA_RUTA TEXT, HIST_RA_IDALMACEN TEXT)");
|
|
//BA.debugLineNum = 152;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_COMISIONES_MOVIL (HCM_IDALMACEN TEXT, HCM_RUTA TEXT, HCM_TOTAL_V TEXT, HCM_TOTAL_VIVE TEXT, HCM_TOTAL_GUNA TEXT, HCM_TOTAL_BEB TEXT)");
|
|
//BA.debugLineNum = 153;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_GEOCERCA (HGCLIENTE TEXT, HGDATE TEXT, HGLAT TEXT, HGLON TEXT)");
|
|
//BA.debugLineNum = 154;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_FACE (HFCLIENTE TEXT, HFALIAS TEXT, HFRUTA TEXT, HFALMACEN TEXT)");
|
|
//BA.debugLineNum = 155;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS RUT";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS RUTA_GPS(FECHA INTEGER, LAT TEXT, LON TEXT)");
|
|
//BA.debugLineNum = 156;BA.debugLine="skmt.ExecNonQuery(\"CREATE VIEW IF NOT EXISTS CATA";
|
|
_skmt.ExecNonQuery("CREATE VIEW IF NOT EXISTS CATALOGO AS Select CAT_GP_CLASIF, CAT_GP_ID FROM CAT_GUNAPROD UNION Select CAT_GP_CLASIF, CAT_GP_ID FROM CAT_GUNAPROD GROUP BY CAT_GP_CLASIF, CAT_GP_ID");
|
|
//BA.debugLineNum = 157;BA.debugLine="skmt.ExecNonQuery(\"CREATE VIEW IF NOT EXISTS tota";
|
|
_skmt.ExecNonQuery("CREATE VIEW IF NOT EXISTS total_marcas AS Select cat_gp_clasif, sum(pe_costo_tot) As total from CATALOGO, pedido where pe_proid = cat_gp_id And pe_cliente <> 0 group by cat_gp_clasif");
|
|
//BA.debugLineNum = 158;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_MARCAS_CUOTAS (HMC_MARCA TEXT, HMC_TOTAL TEXT)");
|
|
//BA.debugLineNum = 159;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_CODIGO_BARRAS(CODIGOKMTS TEXT, CODIGOB TEXT, LAT TEXT, LON TEXT)");
|
|
//BA.debugLineNum = 160;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS ABO";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS ABONOS (a_usuario TEXT, a_ruta TEXT, a_cliente TEXT, a_abono TEXT, a_fecha TEXT, a_enviado TEXT)");
|
|
//BA.debugLineNum = 161;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS BIT";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS BITACORAGPS(fechab TEXT, usuariob TEXT, almacenb TEXT, rutab TEXT, eventob TEXT, clienteb TEXT, iniciob TEXT, finb TEXT, latitudb TEXT, longitudb TEXT, precision TEXT, motivonoventa TEXT, motivonovisita TEXT)");
|
|
//BA.debugLineNum = 162;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS VEN";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS VENTA_No_VENTA(usuariov TEXT, almacenv TEXT, rutav TEXT, eventov TEXT, clientev TEXT, iniciov TEXT, latitudv TEXT, longitudv TEXT)");
|
|
//BA.debugLineNum = 164;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS kmt";
|
|
_skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS kmt_info (CAT_CL_FOTO BLOB, CAT_CL_NUM_SERIEFISICO TEXT, CAT_CL_MTOCOMPRA TEXT, CAT_CL_CEDIS TEXT, CAT_CL_LAT TEXT, CAT_CL_LONG TEXT, CAT_CL_FBAJA TEXT, CAT_CL_FALTA TEXT, CAT_CL_CP TEXT, CAT_CL_EDO TEXT, CAT_CL_MUNI TEXT, CAT_CL_COLONIA TEXT, CAT_CL_CALLE2 TEXT, CAT_CL_CALLE1 TEXT, CAT_CL_NOINT TEXT, CAT_CL_NOEXT TEXT, CAT_CL_CALLE TEXT, CAT_CL_EMAIL TEXT, CAT_CL_TELEFONO TEXT, CAT_CL_ATIENTE2 TEXT, CAT_CL_ATIENDE1 TEXT, CAT_CL_NOMBRE TEXT, CAT_CL_GIRO TEXT, CAT_CL_DIAS_VISITA TEXT, CAT_CL_TIPO_RUTA TEXT, CAT_CL_RUTA TEXT, CAT_CL_CODIGO TEXT, gestion NUMERIC, CAT_CL_DIASEMANA TEXT, CAT_CL_SECUENCIA INT)");
|
|
//BA.debugLineNum = 166;BA.debugLine="Subs.agregaColumna(\"VENTA_No_VENTA\", \"montoVentav";
|
|
_subs._agregacolumna /*String*/ (ba,"VENTA_No_VENTA","montoVentav","TEXT");
|
|
//BA.debugLineNum = 168;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev";
|
|
try { //BA.debugLineNum = 169;BA.debugLine="c=skmt.ExecQuery(\"SELECT COUNT(*) AS fCol FROM p";
|
|
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_skmt.ExecQuery("SELECT COUNT(*) AS fCol FROM pragma_table_info('kmt_info') WHERE name='CAT_CL_DIASEMANA'")));
|
|
//BA.debugLineNum = 170;BA.debugLine="c.Position = 0";
|
|
_c.setPosition((int) (0));
|
|
//BA.debugLineNum = 171;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c";
|
|
if ((_c.GetString("fCol")).equals(BA.NumberToString(0))) {
|
|
//BA.debugLineNum = 172;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL";
|
|
_skmt.ExecNonQuery("ALTER TABLE kmt_info ADD COLUMN CAT_CL_DIASEMANA TEXT");
|
|
};
|
|
}
|
|
catch (Exception e68) {
|
|
ba.setLastException(e68); //BA.debugLineNum = 175;BA.debugLine="Try";
|
|
try { //BA.debugLineNum = 176;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL";
|
|
_skmt.ExecNonQuery("ALTER TABLE kmt_info ADD COLUMN CAT_CL_DIASEMANA TEXT");
|
|
}
|
|
catch (Exception e71) {
|
|
ba.setLastException(e71); //BA.debugLineNum = 178;BA.debugLine="Log(LastException)";
|
|
__c.LogImpl("3458829",BA.ObjectToString(__c.LastException(ba)),0);
|
|
};
|
|
};
|
|
//BA.debugLineNum = 181;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev";
|
|
try { //BA.debugLineNum = 182;BA.debugLine="c=skmt.ExecQuery(\"SELECT COUNT(*) AS fCol FROM p";
|
|
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_skmt.ExecQuery("SELECT COUNT(*) AS fCol FROM pragma_table_info('CAT_GUNAPROD') WHERE name='CAT_GP_TIPOPROD2'")));
|
|
//BA.debugLineNum = 183;BA.debugLine="c.Position = 0";
|
|
_c.setPosition((int) (0));
|
|
//BA.debugLineNum = 184;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c";
|
|
if ((_c.GetString("fCol")).equals(BA.NumberToString(0))) {
|
|
//BA.debugLineNum = 185;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE CAT_GUNAPROD ADD";
|
|
_skmt.ExecNonQuery("ALTER TABLE CAT_GUNAPROD ADD COLUMN CAT_GP_TIPOPROD2 TEXT");
|
|
};
|
|
}
|
|
catch (Exception e81) {
|
|
ba.setLastException(e81); //BA.debugLineNum = 188;BA.debugLine="Try";
|
|
try { //BA.debugLineNum = 189;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE CAT_GUNAPROD ADD";
|
|
_skmt.ExecNonQuery("ALTER TABLE CAT_GUNAPROD ADD COLUMN CAT_GP_TIPOPROD2 TEXT");
|
|
}
|
|
catch (Exception e84) {
|
|
ba.setLastException(e84); //BA.debugLineNum = 191;BA.debugLine="Log(LastException)";
|
|
__c.LogImpl("3458842",BA.ObjectToString(__c.LastException(ba)),0);
|
|
};
|
|
};
|
|
//BA.debugLineNum = 194;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev";
|
|
try { //BA.debugLineNum = 195;BA.debugLine="c=skmt.ExecQuery(\"SELECT COUNT(*) AS fCol FROM p";
|
|
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_skmt.ExecQuery("SELECT COUNT(*) AS fCol FROM pragma_table_info('kmt_info') WHERE name='CAT_CL_SECUENCIA'")));
|
|
//BA.debugLineNum = 196;BA.debugLine="c.Position = 0";
|
|
_c.setPosition((int) (0));
|
|
//BA.debugLineNum = 197;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c";
|
|
if ((_c.GetString("fCol")).equals(BA.NumberToString(0))) {
|
|
//BA.debugLineNum = 198;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL";
|
|
_skmt.ExecNonQuery("ALTER TABLE kmt_info ADD COLUMN CAT_CL_SECUENCIA INT");
|
|
};
|
|
}
|
|
catch (Exception e94) {
|
|
ba.setLastException(e94); //BA.debugLineNum = 201;BA.debugLine="Try";
|
|
try { //BA.debugLineNum = 202;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL";
|
|
_skmt.ExecNonQuery("ALTER TABLE kmt_info ADD COLUMN CAT_CL_SECUENCIA INT");
|
|
}
|
|
catch (Exception e97) {
|
|
ba.setLastException(e97); //BA.debugLineNum = 204;BA.debugLine="Log(LastException)";
|
|
__c.LogImpl("3458855",BA.ObjectToString(__c.LastException(ba)),0);
|
|
};
|
|
};
|
|
//BA.debugLineNum = 207;BA.debugLine="c=skmt.ExecQuery(\"select COUNT(*) AS CUANTOS from";
|
|
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_skmt.ExecQuery("select COUNT(*) AS CUANTOS from HIST_STAY_OUT ")));
|
|
//BA.debugLineNum = 208;BA.debugLine="C.Position = 0";
|
|
_c.setPosition((int) (0));
|
|
//BA.debugLineNum = 209;BA.debugLine="If c.GetString(\"CUANTOS\") = 0 Then";
|
|
if ((_c.GetString("CUANTOS")).equals(BA.NumberToString(0))) {
|
|
//BA.debugLineNum = 210;BA.debugLine="skmt.ExecNonQuery(\"INSERT INTO HIST_STAY_OUT(HSO";
|
|
_skmt.ExecNonQuery("INSERT INTO HIST_STAY_OUT(HSO_INI, HSO_FIN) VALUES (0,0)");
|
|
};
|
|
//BA.debugLineNum = 212;BA.debugLine="C.Close";
|
|
_c.Close();
|
|
//BA.debugLineNum = 216;BA.debugLine="l_version.Text = Application.VersionName";
|
|
_l_version.setText(BA.ObjectToCharSequence(__c.Application.getVersionName()));
|
|
//BA.debugLineNum = 218;BA.debugLine="PopupMenu.Initialize(\"PopupMenu\", b_menu)";
|
|
_popupmenu.Initialize(ba,"PopupMenu",(anywheresoftware.b4a.objects.ConcreteViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.ConcreteViewWrapper(), (android.view.View)(_b_menu.getObject())));
|
|
//BA.debugLineNum = 219;BA.debugLine="PopupMenu.AddMenuItem(0, 0, \"View\")";
|
|
_popupmenu.AddMenuItem((int) (0),(int) (0),"View");
|
|
//BA.debugLineNum = 220;BA.debugLine="PopupMenu.AddMenuItem(1, 1, \"Edit\")";
|
|
_popupmenu.AddMenuItem((int) (1),(int) (1),"Edit");
|
|
//BA.debugLineNum = 221;BA.debugLine="PopupMenu.AddMenuItem(2, 2, \"Details\")";
|
|
_popupmenu.AddMenuItem((int) (2),(int) (2),"Details");
|
|
//BA.debugLineNum = 222;BA.debugLine="PopupMenu.AddMenuItem(3, 3, \"Remove\")";
|
|
_popupmenu.AddMenuItem((int) (3),(int) (3),"Remove");
|
|
//BA.debugLineNum = 224;BA.debugLine="montoActual = 0";
|
|
_montoactual = BA.NumberToString(0);
|
|
//BA.debugLineNum = 225;BA.debugLine="clientesTotal = 0";
|
|
_clientestotal = BA.NumberToString(0);
|
|
//BA.debugLineNum = 226;BA.debugLine="clientesVenta = 0";
|
|
_clientesventa = BA.NumberToString(0);
|
|
//BA.debugLineNum = 227;BA.debugLine="clientesVisitados = 0";
|
|
_clientesvisitados = BA.NumberToString(0);
|
|
//BA.debugLineNum = 228;BA.debugLine="almacen = 0";
|
|
_almacen = BA.NumberToString(0);
|
|
//BA.debugLineNum = 229;BA.debugLine="rutaPreventa = 0";
|
|
_rutapreventa = BA.NumberToString(0);
|
|
//BA.debugLineNum = 230;BA.debugLine="p_appUpdate.Visible = False";
|
|
_p_appupdate.setVisible(__c.False);
|
|
//BA.debugLineNum = 241;BA.debugLine="p_appUpdate.Visible = False";
|
|
_p_appupdate.setVisible(__c.False);
|
|
//BA.debugLineNum = 242;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _class_globals() throws Exception{
|
|
//BA.debugLineNum = 18;BA.debugLine="Sub Class_Globals";
|
|
//BA.debugLineNum = 19;BA.debugLine="Private Root As B4XView";
|
|
_root = new anywheresoftware.b4a.objects.B4XViewWrapper();
|
|
//BA.debugLineNum = 20;BA.debugLine="Private xui As XUI";
|
|
_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI();
|
|
//BA.debugLineNum = 21;BA.debugLine="Public login As B4XMainPage";
|
|
_login = new keymon.lat.medicomed.b4xmainpage();
|
|
//BA.debugLineNum = 22;BA.debugLine="Dim reqManager As DBRequestManager";
|
|
_reqmanager = new keymon.lat.medicomed.dbrequestmanager();
|
|
//BA.debugLineNum = 23;BA.debugLine="Public principal As C_Principal";
|
|
_principal = new keymon.lat.medicomed.c_principal();
|
|
//BA.debugLineNum = 24;BA.debugLine="Public clientes As C_Clientes";
|
|
_clientes = new keymon.lat.medicomed.c_clientes();
|
|
//BA.debugLineNum = 25;BA.debugLine="Public cliente As C_Cliente";
|
|
_cliente = new keymon.lat.medicomed.c_cliente();
|
|
//BA.debugLineNum = 26;BA.debugLine="Public productos As C_Productos";
|
|
_productos = new keymon.lat.medicomed.c_productos();
|
|
//BA.debugLineNum = 27;BA.debugLine="Public updateAvailable As C_UpdateAvailable";
|
|
_updateavailable = new keymon.lat.medicomed.c_updateavailable();
|
|
//BA.debugLineNum = 28;BA.debugLine="Public mapas As C_Mapas";
|
|
_mapas = new keymon.lat.medicomed.c_mapas();
|
|
//BA.debugLineNum = 29;BA.debugLine="Public nuevoCliente As C_NuevoCliente";
|
|
_nuevocliente = new keymon.lat.medicomed.c_nuevocliente();
|
|
//BA.debugLineNum = 30;BA.debugLine="Public ticketsDia As C_TicketsDia";
|
|
_ticketsdia = new keymon.lat.medicomed.c_ticketsdia();
|
|
//BA.debugLineNum = 31;BA.debugLine="Public noVenta As C_NoVenta";
|
|
_noventa = new keymon.lat.medicomed.c_noventa();
|
|
//BA.debugLineNum = 32;BA.debugLine="Public nota As C_Nota";
|
|
_nota = new keymon.lat.medicomed.c_nota();
|
|
//BA.debugLineNum = 33;BA.debugLine="Public pedidos As C_Pedidos";
|
|
_pedidos = new keymon.lat.medicomed.c_pedidos();
|
|
//BA.debugLineNum = 34;BA.debugLine="Public promos As C_Promos";
|
|
_promos = new keymon.lat.medicomed.c_promos();
|
|
//BA.debugLineNum = 35;BA.debugLine="Public historico As C_Historico";
|
|
_historico = new keymon.lat.medicomed.c_historico();
|
|
//BA.debugLineNum = 47;BA.debugLine="Dim reqManager As DBRequestManager";
|
|
_reqmanager = new keymon.lat.medicomed.dbrequestmanager();
|
|
//BA.debugLineNum = 48;BA.debugLine="Dim v As String = Application.VersionName";
|
|
_v = __c.Application.getVersionName();
|
|
//BA.debugLineNum = 49;BA.debugLine="Dim ruta As String";
|
|
_ruta = "";
|
|
//BA.debugLineNum = 50;BA.debugLine="Dim tgl As Toggle";
|
|
_tgl = new com.rootsoft.togglelibrary.ToggleLibrary();
|
|
//BA.debugLineNum = 51;BA.debugLine="Dim lat_gps, lon_gps As String";
|
|
_lat_gps = "";
|
|
_lon_gps = "";
|
|
//BA.debugLineNum = 52;BA.debugLine="Dim usuario As String";
|
|
_usuario = "";
|
|
//BA.debugLineNum = 53;BA.debugLine="Dim batt As Int";
|
|
_batt = 0;
|
|
//BA.debugLineNum = 54;BA.debugLine="Dim skmt As SQL";
|
|
_skmt = new anywheresoftware.b4a.sql.SQL();
|
|
//BA.debugLineNum = 55;BA.debugLine="Dim montoActual, clientesTotal, clientesVenta, cl";
|
|
_montoactual = "";
|
|
_clientestotal = "";
|
|
_clientesventa = "";
|
|
_clientesvisitados = "";
|
|
_almacen = "";
|
|
_rutapreventa = "";
|
|
//BA.debugLineNum = 56;BA.debugLine="Dim server, fechaRuta As String";
|
|
_server = "";
|
|
_fecharuta = "";
|
|
//BA.debugLineNum = 57;BA.debugLine="Dim Logger As Boolean";
|
|
_logger = false;
|
|
//BA.debugLineNum = 58;BA.debugLine="Dim mac_impresora As String";
|
|
_mac_impresora = "";
|
|
//BA.debugLineNum = 59;BA.debugLine="Dim Phn As PhoneId";
|
|
_phn = new anywheresoftware.b4a.phone.Phone.PhoneId();
|
|
//BA.debugLineNum = 61;BA.debugLine="Dim user As EditText";
|
|
_user = new anywheresoftware.b4a.objects.EditTextWrapper();
|
|
//BA.debugLineNum = 62;BA.debugLine="Dim pass As EditText";
|
|
_pass = new anywheresoftware.b4a.objects.EditTextWrapper();
|
|
//BA.debugLineNum = 63;BA.debugLine="Dim c As Cursor";
|
|
_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper();
|
|
//BA.debugLineNum = 64;BA.debugLine="Dim existe As String";
|
|
_existe = "";
|
|
//BA.debugLineNum = 65;BA.debugLine="Dim paso1 As String";
|
|
_paso1 = "";
|
|
//BA.debugLineNum = 66;BA.debugLine="Private IMEN As Label";
|
|
_imen = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
//BA.debugLineNum = 67;BA.debugLine="Dim IMEI As String = \"\"";
|
|
_imei = "";
|
|
//BA.debugLineNum = 68;BA.debugLine="Dim alterno As String";
|
|
_alterno = "";
|
|
//BA.debugLineNum = 69;BA.debugLine="Private b_menu As Button";
|
|
_b_menu = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
//BA.debugLineNum = 70;BA.debugLine="Dim PopupMenu As RSPopupMenu";
|
|
_popupmenu = new com.rootsoft.rspopupmenu.RSPopupMenu();
|
|
//BA.debugLineNum = 71;BA.debugLine="Dim cmd As DBCommand";
|
|
_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand();
|
|
//BA.debugLineNum = 72;BA.debugLine="Private PDF As Button";
|
|
_pdf = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
//BA.debugLineNum = 73;BA.debugLine="Private bpv1 As BatteryProgressView";
|
|
_bpv1 = new batteryprogressviewwrapper.batteryprogressviewWrapper();
|
|
//BA.debugLineNum = 74;BA.debugLine="Dim batterystatus(11) As Int";
|
|
_batterystatus = new int[(int) (11)];
|
|
;
|
|
//BA.debugLineNum = 75;BA.debugLine="Private bu As BatteryUtilities";
|
|
_bu = new keymon.lat.medicomed.batteryutilities();
|
|
//BA.debugLineNum = 76;BA.debugLine="Private b_apk As Button";
|
|
_b_apk = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
//BA.debugLineNum = 77;BA.debugLine="Private i_engrane As ImageView";
|
|
_i_engrane = new anywheresoftware.b4a.objects.ImageViewWrapper();
|
|
//BA.debugLineNum = 78;BA.debugLine="Private p_Main As Panel";
|
|
_p_main = new anywheresoftware.b4a.objects.PanelWrapper();
|
|
//BA.debugLineNum = 79;BA.debugLine="Private p_appUpdate As Panel";
|
|
_p_appupdate = new anywheresoftware.b4a.objects.PanelWrapper();
|
|
//BA.debugLineNum = 80;BA.debugLine="Private b_regesar As Button";
|
|
_b_regesar = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
//BA.debugLineNum = 81;BA.debugLine="Private l_version As Label";
|
|
_l_version = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
//BA.debugLineNum = 82;BA.debugLine="Private ImageView1 As ImageView";
|
|
_imageview1 = new anywheresoftware.b4a.objects.ImageViewWrapper();
|
|
//BA.debugLineNum = 83;BA.debugLine="Private Label2 As Label";
|
|
_label2 = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
//BA.debugLineNum = 84;BA.debugLine="Private Entrar As Button";
|
|
_entrar = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
//BA.debugLineNum = 85;BA.debugLine="Dim tipo_venta As String";
|
|
_tipo_venta = "";
|
|
//BA.debugLineNum = 86;BA.debugLine="Dim bTerminarClicked As Boolean = False";
|
|
_bterminarclicked = __c.False;
|
|
//BA.debugLineNum = 87;BA.debugLine="Private lv_server As ListView";
|
|
_lv_server = new anywheresoftware.b4a.objects.ListViewWrapper();
|
|
//BA.debugLineNum = 88;BA.debugLine="Private l_server As Label";
|
|
_l_server = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
//BA.debugLineNum = 89;BA.debugLine="Private et_server As EditText";
|
|
_et_server = new anywheresoftware.b4a.objects.EditTextWrapper();
|
|
//BA.debugLineNum = 90;BA.debugLine="Private b_server As Button";
|
|
_b_server = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
//BA.debugLineNum = 91;BA.debugLine="Private b_envioBD As Button";
|
|
_b_enviobd = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
//BA.debugLineNum = 92;BA.debugLine="Public Provider As FileProvider";
|
|
_provider = new keymon.lat.medicomed.fileprovider();
|
|
//BA.debugLineNum = 93;BA.debugLine="Public rutaBDBackup As String = \"\"";
|
|
_rutabdbackup = "";
|
|
//BA.debugLineNum = 94;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public void _copiadb() throws Exception{
|
|
ResumableSub_copiaDB rsub = new ResumableSub_copiaDB(this);
|
|
rsub.resume(ba, null);
|
|
}
|
|
public static class ResumableSub_copiaDB extends BA.ResumableSub {
|
|
public ResumableSub_copiaDB(keymon.lat.medicomed.b4xmainpage parent) {
|
|
this.parent = parent;
|
|
}
|
|
keymon.lat.medicomed.b4xmainpage parent;
|
|
String _permission = "";
|
|
boolean _result = false;
|
|
String _thedir = "";
|
|
|
|
@Override
|
|
public void resume(BA ba, Object[] result) throws Exception{
|
|
|
|
while (true) {
|
|
try {
|
|
|
|
switch (state) {
|
|
case -1:
|
|
return;
|
|
|
|
case 0:
|
|
//C
|
|
this.state = 1;
|
|
//BA.debugLineNum = 593;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_";
|
|
parent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .CheckAndRequest(ba,parent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .PERMISSION_WRITE_EXTERNAL_STORAGE);
|
|
//BA.debugLineNum = 594;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As";
|
|
parent.__c.WaitFor("b4xpage_permissionresult", ba, this, null);
|
|
this.state = 18;
|
|
return;
|
|
case 18:
|
|
//C
|
|
this.state = 1;
|
|
_permission = (String) result[0];
|
|
_result = (Boolean) result[1];
|
|
;
|
|
//BA.debugLineNum = 595;BA.debugLine="Dim theDir As String = \"\"";
|
|
_thedir = "";
|
|
//BA.debugLineNum = 596;BA.debugLine="If Result Then";
|
|
if (true) break;
|
|
|
|
case 1:
|
|
//if
|
|
this.state = 17;
|
|
if (_result) {
|
|
this.state = 3;
|
|
}else {
|
|
this.state = 16;
|
|
}if (true) break;
|
|
|
|
case 3:
|
|
//C
|
|
this.state = 4;
|
|
//BA.debugLineNum = 603;BA.debugLine="Dim theDir As String";
|
|
_thedir = "";
|
|
//BA.debugLineNum = 604;BA.debugLine="Try";
|
|
if (true) break;
|
|
|
|
case 4:
|
|
//try
|
|
this.state = 9;
|
|
this.catchState = 8;
|
|
this.state = 6;
|
|
if (true) break;
|
|
|
|
case 6:
|
|
//C
|
|
this.state = 9;
|
|
this.catchState = 8;
|
|
//BA.debugLineNum = 605;BA.debugLine="File.MakeDir(File.DirRootExternal,\"kmts\")";
|
|
parent.__c.File.MakeDir(parent.__c.File.getDirRootExternal(),"kmts");
|
|
//BA.debugLineNum = 606;BA.debugLine="theDir = \"/kmts\"";
|
|
_thedir = "/kmts";
|
|
if (true) break;
|
|
|
|
case 8:
|
|
//C
|
|
this.state = 9;
|
|
this.catchState = 0;
|
|
//BA.debugLineNum = 608;BA.debugLine="theDir = \"\"";
|
|
_thedir = "";
|
|
if (true) break;
|
|
if (true) break;
|
|
;
|
|
//BA.debugLineNum = 610;BA.debugLine="Try";
|
|
|
|
case 9:
|
|
//try
|
|
this.state = 14;
|
|
this.catchState = 0;
|
|
this.catchState = 13;
|
|
this.state = 11;
|
|
if (true) break;
|
|
|
|
case 11:
|
|
//C
|
|
this.state = 14;
|
|
this.catchState = 13;
|
|
//BA.debugLineNum = 611;BA.debugLine="File.Copy(File.DirInternal,\"kmt.db\",File.DirRoo";
|
|
parent.__c.File.Copy(parent.__c.File.getDirInternal(),"kmt.db",parent.__c.File.getDirRootExternal()+_thedir,"medicomed_kmt.db");
|
|
//BA.debugLineNum = 612;BA.debugLine="ToastMessageShow(\"Listo, copiado a \" & File.Dir";
|
|
parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Listo, copiado a "+parent.__c.File.getDirRootExternal()+_thedir+"/medicomed_kmt_kmt.db"),parent.__c.False);
|
|
if (true) break;
|
|
|
|
case 13:
|
|
//C
|
|
this.state = 14;
|
|
this.catchState = 0;
|
|
//BA.debugLineNum = 614;BA.debugLine="ToastMessageShow(\"No se pudo hacer la copia: \"&";
|
|
parent.__c.ToastMessageShow(BA.ObjectToCharSequence("No se pudo hacer la copia: "+BA.ObjectToString(parent.__c.LastException(ba))),parent.__c.True);
|
|
if (true) break;
|
|
if (true) break;
|
|
|
|
case 14:
|
|
//C
|
|
this.state = 17;
|
|
this.catchState = 0;
|
|
;
|
|
if (true) break;
|
|
|
|
case 16:
|
|
//C
|
|
this.state = 17;
|
|
//BA.debugLineNum = 617;BA.debugLine="ToastMessageShow(\"Sin permisos\", False)";
|
|
parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Sin permisos"),parent.__c.False);
|
|
if (true) break;
|
|
|
|
case 17:
|
|
//C
|
|
this.state = -1;
|
|
;
|
|
//BA.debugLineNum = 619;BA.debugLine="End Sub";
|
|
if (true) break;
|
|
}}
|
|
catch (Exception e0) {
|
|
|
|
if (catchState == 0)
|
|
throw e0;
|
|
else {
|
|
state = catchState;
|
|
ba.setLastException(e0);}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
public void _b4xpage_permissionresult(String _permission,boolean _result) throws Exception{
|
|
}
|
|
public String _dameusuario() throws Exception{
|
|
//BA.debugLineNum = 562;BA.debugLine="Sub dameUsuario";
|
|
//BA.debugLineNum = 563;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) as EXISTE1 fro";
|
|
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_skmt.ExecQuery2("select count(*) as EXISTE1 from usuarioa where usuario = ?",new String[]{_user.getText()})));
|
|
//BA.debugLineNum = 564;BA.debugLine="c.Position=0";
|
|
_c.setPosition((int) (0));
|
|
//BA.debugLineNum = 565;BA.debugLine="existe = c.GetString(\"EXISTE1\")";
|
|
_existe = _c.GetString("EXISTE1");
|
|
//BA.debugLineNum = 566;BA.debugLine="c.Close";
|
|
_c.Close();
|
|
//BA.debugLineNum = 567;BA.debugLine="If existe > 0 Then";
|
|
if ((double)(Double.parseDouble(_existe))>0) {
|
|
//BA.debugLineNum = 568;BA.debugLine="c=skmt.ExecQuery(\"select USUARIO from usuarioa\")";
|
|
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_skmt.ExecQuery("select USUARIO from usuarioa")));
|
|
//BA.debugLineNum = 569;BA.debugLine="c.Position=0";
|
|
_c.setPosition((int) (0));
|
|
//BA.debugLineNum = 570;BA.debugLine="usuario = c.GetString(\"USUARIO\")";
|
|
_usuario = _c.GetString("USUARIO");
|
|
}else {
|
|
//BA.debugLineNum = 572;BA.debugLine="usuario = \"SINUSUARIO\"";
|
|
_usuario = "SINUSUARIO";
|
|
};
|
|
//BA.debugLineNum = 574;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _entrar_click() throws Exception{
|
|
anywheresoftware.b4a.agraham.reflection.Reflection _r = null;
|
|
int _api = 0;
|
|
anywheresoftware.b4a.phone.Phone _pp = null;
|
|
int _id = 0;
|
|
//BA.debugLineNum = 293;BA.debugLine="Sub Entrar_Click";
|
|
//BA.debugLineNum = 294;BA.debugLine="Dim r As Reflector";
|
|
_r = new anywheresoftware.b4a.agraham.reflection.Reflection();
|
|
//BA.debugLineNum = 295;BA.debugLine="Dim Api As Int";
|
|
_api = 0;
|
|
//BA.debugLineNum = 296;BA.debugLine="Dim PP As Phone";
|
|
_pp = new anywheresoftware.b4a.phone.Phone();
|
|
//BA.debugLineNum = 297;BA.debugLine="Api = r.GetStaticField(\"android.os.Build$VERSION\"";
|
|
_api = (int)(BA.ObjectToNumber(_r.GetStaticField("android.os.Build$VERSION","SDK_INT")));
|
|
//BA.debugLineNum = 298;BA.debugLine="If Api < 9 Then";
|
|
if (_api<9) {
|
|
//BA.debugLineNum = 300;BA.debugLine="If File.Exists(File.DirInternal, \"__id\") Then";
|
|
if (__c.File.Exists(__c.File.getDirInternal(),"__id")) {
|
|
//BA.debugLineNum = 301;BA.debugLine="IMEI = File.ReadString(File.DirInternal, \"__id";
|
|
_imei = __c.File.ReadString(__c.File.getDirInternal(),"__id");
|
|
//BA.debugLineNum = 302;BA.debugLine="Log(1&\"-\"&IMEI)";
|
|
__c.LogImpl("3589833",BA.NumberToString(1)+"-"+_imei,0);
|
|
}else {
|
|
//BA.debugLineNum = 304;BA.debugLine="Dim id As Int";
|
|
_id = 0;
|
|
//BA.debugLineNum = 305;BA.debugLine="id = Rnd(0x10000000, 0x7FFFFFFF)";
|
|
_id = __c.Rnd(((int)0x10000000),((int)0x7fffffff));
|
|
//BA.debugLineNum = 306;BA.debugLine="File.WriteString(File.DirInternal, \"__id\", id)";
|
|
__c.File.WriteString(__c.File.getDirInternal(),"__id",BA.NumberToString(_id));
|
|
//BA.debugLineNum = 307;BA.debugLine="IMEI = id";
|
|
_imei = BA.NumberToString(_id);
|
|
//BA.debugLineNum = 308;BA.debugLine="Log(2&\"-\"&IMEI)";
|
|
__c.LogImpl("3589839",BA.NumberToString(2)+"-"+_imei,0);
|
|
};
|
|
}else {
|
|
//BA.debugLineNum = 312;BA.debugLine="IMEI = r.GetStaticField(\"android.os.Build\", \"SE";
|
|
_imei = BA.ObjectToString(_r.GetStaticField("android.os.Build","SERIAL"));
|
|
};
|
|
//BA.debugLineNum = 315;BA.debugLine="If IMEI.ToLowerCase = \"unknown\" Then";
|
|
if ((_imei.toLowerCase()).equals("unknown")) {
|
|
//BA.debugLineNum = 316;BA.debugLine="IMEI = PP.GetSettings(\"android_id\")";
|
|
_imei = _pp.GetSettings("android_id");
|
|
};
|
|
//BA.debugLineNum = 320;BA.debugLine="If user.Text = \"ALTERNO\" Then";
|
|
if ((_user.getText()).equals("ALTERNO")) {
|
|
//BA.debugLineNum = 321;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_CO_CONFIGURACION,";
|
|
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_skmt.ExecQuery2("select CAT_CO_CONFIGURACION, CAT_CO_RESULTADO from CAT_CODIGOS where CAT_CO_PONDERACION =1 AND CAT_CO_ACCION = ?",new String[]{"SERVER"})));
|
|
//BA.debugLineNum = 322;BA.debugLine="c.Position =0";
|
|
_c.setPosition((int) (0));
|
|
//BA.debugLineNum = 323;BA.debugLine="server = c.GetString(\"CAT_CO_CONFIGURACION\")";
|
|
_server = _c.GetString("CAT_CO_CONFIGURACION");
|
|
//BA.debugLineNum = 324;BA.debugLine="alterno = c.GetString(\"CAT_CO_RESULTADO\")";
|
|
_alterno = _c.GetString("CAT_CO_RESULTADO");
|
|
//BA.debugLineNum = 325;BA.debugLine="c.Close";
|
|
_c.Close();
|
|
//BA.debugLineNum = 326;BA.debugLine="If alterno = 1 Then";
|
|
if ((_alterno).equals(BA.NumberToString(1))) {
|
|
//BA.debugLineNum = 327;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_";
|
|
_skmt.ExecNonQuery2("UPDATE CAT_CODIGOS SET CAT_CO_PONDERACION = 1 WHERE CAT_CO_ACCION = ? AND CAT_CO_RESULTADO = 2",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{"SERVER"}));
|
|
//BA.debugLineNum = 328;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_";
|
|
_skmt.ExecNonQuery2("UPDATE CAT_CODIGOS SET CAT_CO_PONDERACION = 0 WHERE CAT_CO_ACCION = ? AND CAT_CO_RESULTADO = 1",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{"SERVER"}));
|
|
}else if((_alterno).equals(BA.NumberToString(2))) {
|
|
//BA.debugLineNum = 330;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_";
|
|
_skmt.ExecNonQuery2("UPDATE CAT_CODIGOS SET CAT_CO_PONDERACION = 1 WHERE CAT_CO_ACCION = ? AND CAT_CO_RESULTADO = 1",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{"SERVER"}));
|
|
//BA.debugLineNum = 331;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_";
|
|
_skmt.ExecNonQuery2("UPDATE CAT_CODIGOS SET CAT_CO_PONDERACION = 0 WHERE CAT_CO_ACCION = ? AND CAT_CO_RESULTADO = 2",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{"SERVER"}));
|
|
};
|
|
//BA.debugLineNum = 333;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_CO_CONFIGURACION,";
|
|
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_skmt.ExecQuery2("select CAT_CO_CONFIGURACION, CAT_CO_RESULTADO from CAT_CODIGOS where CAT_CO_PONDERACION =1 AND CAT_CO_ACCION = ?",new String[]{"SERVER"})));
|
|
//BA.debugLineNum = 334;BA.debugLine="c.Position =0";
|
|
_c.setPosition((int) (0));
|
|
//BA.debugLineNum = 335;BA.debugLine="server = c.GetString(\"CAT_CO_CONFIGURACION\")";
|
|
_server = _c.GetString("CAT_CO_CONFIGURACION");
|
|
//BA.debugLineNum = 336;BA.debugLine="user.Text = server";
|
|
_user.setText(BA.ObjectToCharSequence(_server));
|
|
//BA.debugLineNum = 337;BA.debugLine="c.Close";
|
|
_c.Close();
|
|
}else if((_user.getText()).equals("KMTS1")) {
|
|
//BA.debugLineNum = 340;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")";
|
|
_skmt.ExecNonQuery("delete from usuarioa");
|
|
//BA.debugLineNum = 341;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALUES";
|
|
_skmt.ExecNonQuery2("INSERT INTO USUARIOA VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_user.getText()),(Object)(_pass.getText())}));
|
|
//BA.debugLineNum = 342;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")";
|
|
_skmt.ExecNonQuery("delete from cat_almacen");
|
|
//BA.debugLineNum = 343;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(ID_A";
|
|
_skmt.ExecNonQuery2("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_pass.getText())}));
|
|
//BA.debugLineNum = 344;BA.debugLine="skmt.ExecNonQuery(\"delete from VERSION\")";
|
|
_skmt.ExecNonQuery("delete from VERSION");
|
|
//BA.debugLineNum = 345;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO VERSION(NOVERSIO";
|
|
_skmt.ExecNonQuery2("INSERT INTO VERSION(NOVERSION) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("2.1")}));
|
|
//BA.debugLineNum = 346;BA.debugLine="B4XPages.ShowPage(\"Clientes\")";
|
|
_b4xpages._showpage /*String*/ (ba,"Clientes");
|
|
}else if((_user.getText()).equals("BERNA1")) {
|
|
//BA.debugLineNum = 348;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")";
|
|
_skmt.ExecNonQuery("delete from usuarioa");
|
|
//BA.debugLineNum = 349;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALUES";
|
|
_skmt.ExecNonQuery2("INSERT INTO USUARIOA VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_user.getText()),(Object)("1")}));
|
|
//BA.debugLineNum = 350;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")";
|
|
_skmt.ExecNonQuery("delete from cat_almacen");
|
|
//BA.debugLineNum = 351;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(ID_A";
|
|
_skmt.ExecNonQuery2("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("1")}));
|
|
//BA.debugLineNum = 352;BA.debugLine="skmt.ExecNonQuery(\"delete from VERSION\")";
|
|
_skmt.ExecNonQuery("delete from VERSION");
|
|
//BA.debugLineNum = 353;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO VERSION(NOVERSIO";
|
|
_skmt.ExecNonQuery2("INSERT INTO VERSION(NOVERSION) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("2.1")}));
|
|
//BA.debugLineNum = 354;BA.debugLine="B4XPages.ShowPage(\"Clientes\")";
|
|
_b4xpages._showpage /*String*/ (ba,"Clientes");
|
|
}else if((_user.getText()).equals("IMEI")) {
|
|
//BA.debugLineNum = 356;BA.debugLine="user.Text = IMEI";
|
|
_user.setText(BA.ObjectToCharSequence(_imei));
|
|
};
|
|
//BA.debugLineNum = 359;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) as EXISTE1 fro";
|
|
_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_skmt.ExecQuery2("select count(*) as EXISTE1 from usuarioa where usuario = ?",new String[]{_user.getText()})));
|
|
//BA.debugLineNum = 360;BA.debugLine="c.Position=0";
|
|
_c.setPosition((int) (0));
|
|
//BA.debugLineNum = 361;BA.debugLine="existe = c.GetString(\"EXISTE1\")";
|
|
_existe = _c.GetString("EXISTE1");
|
|
//BA.debugLineNum = 362;BA.debugLine="If existe = 0 Then";
|
|
if ((_existe).equals(BA.NumberToString(0))) {
|
|
//BA.debugLineNum = 363;BA.debugLine="If IMEI = \"\" Then";
|
|
if ((_imei).equals("")) {
|
|
//BA.debugLineNum = 364;BA.debugLine="Dim cmd As DBCommand";
|
|
_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand();
|
|
//BA.debugLineNum = 365;BA.debugLine="cmd.Initialize";
|
|
_cmd.Initialize();
|
|
//BA.debugLineNum = 366;BA.debugLine="cmd.Name = \"select_usuario_MEDI_10\" 'Antes sele";
|
|
_cmd.Name /*String*/ = "select_usuario_MEDI_10";
|
|
//BA.debugLineNum = 367;BA.debugLine="cmd.Parameters = Array As Object(user.Text.Trim";
|
|
_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_user.getText().trim()),(Object)(_pass.getText().trim())};
|
|
//BA.debugLineNum = 368;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"usuario_10\")";
|
|
_reqmanager._executequery /*String*/ (_cmd,(int) (0),(Object)("usuario_10"));
|
|
}else {
|
|
//BA.debugLineNum = 370;BA.debugLine="If IMEI = \"\" Then";
|
|
if ((_imei).equals("")) {
|
|
//BA.debugLineNum = 371;BA.debugLine="Dim cmd As DBCommand";
|
|
_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand();
|
|
//BA.debugLineNum = 372;BA.debugLine="cmd.Initialize";
|
|
_cmd.Initialize();
|
|
//BA.debugLineNum = 373;BA.debugLine="cmd.Name = \"select_usuario_MEDI_10\"";
|
|
_cmd.Name /*String*/ = "select_usuario_MEDI_10";
|
|
//BA.debugLineNum = 374;BA.debugLine="cmd.Parameters = Array As Object(user.Text.Tri";
|
|
_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_user.getText().trim()),(Object)(_pass.getText().trim())};
|
|
//BA.debugLineNum = 375;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"usuario_10\")";
|
|
_reqmanager._executequery /*String*/ (_cmd,(int) (0),(Object)("usuario_10"));
|
|
}else {
|
|
//BA.debugLineNum = 377;BA.debugLine="Dim cmd As DBCommand";
|
|
_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand();
|
|
//BA.debugLineNum = 378;BA.debugLine="cmd.Initialize";
|
|
_cmd.Initialize();
|
|
//BA.debugLineNum = 379;BA.debugLine="cmd.Name = \"select_usuario_MEDI_10\" 'Antes sel";
|
|
_cmd.Name /*String*/ = "select_usuario_MEDI_10";
|
|
//BA.debugLineNum = 380;BA.debugLine="cmd.Parameters = Array As Object(user.Text.Tri";
|
|
_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_user.getText().trim()),(Object)(_pass.getText().trim())};
|
|
//BA.debugLineNum = 381;BA.debugLine="Log(\"Mandamos: \"&user.Text&\"|\"& pass.Text)";
|
|
__c.LogImpl("3589912","Mandamos: "+_user.getText()+"|"+_pass.getText(),0);
|
|
//BA.debugLineNum = 382;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"usuario_10\")";
|
|
_reqmanager._executequery /*String*/ (_cmd,(int) (0),(Object)("usuario_10"));
|
|
};
|
|
};
|
|
//BA.debugLineNum = 385;BA.debugLine="Dim cmd As DBCommand";
|
|
_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand();
|
|
//BA.debugLineNum = 386;BA.debugLine="cmd.Initialize";
|
|
_cmd.Initialize();
|
|
//BA.debugLineNum = 387;BA.debugLine="cmd.Name = \"select_version_MEDI\"";
|
|
_cmd.Name /*String*/ = "select_version_MEDI";
|
|
//BA.debugLineNum = 388;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"version\")";
|
|
_reqmanager._executequery /*String*/ (_cmd,(int) (0),(Object)("version"));
|
|
}else {
|
|
//BA.debugLineNum = 390;BA.debugLine="usuario = user.Text";
|
|
_usuario = _user.getText();
|
|
//BA.debugLineNum = 391;BA.debugLine="B4XPages.ShowPage(\"Principal\")";
|
|
_b4xpages._showpage /*String*/ (ba,"Principal");
|
|
};
|
|
//BA.debugLineNum = 393;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _entrar_longclick() throws Exception{
|
|
//BA.debugLineNum = 665;BA.debugLine="Sub Entrar_LongClick";
|
|
//BA.debugLineNum = 667;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{
|
|
//BA.debugLineNum = 531;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)";
|
|
//BA.debugLineNum = 532;BA.debugLine="If user.text = \"GPS\" Then";
|
|
if ((_user.getText()).equals("GPS")) {
|
|
//BA.debugLineNum = 533;BA.debugLine="user.Text=Location1.Latitude";
|
|
_user.setText(BA.ObjectToCharSequence(_location1.getLatitude()));
|
|
//BA.debugLineNum = 534;BA.debugLine="pass.text=Location1.Longitude";
|
|
_pass.setText(BA.ObjectToCharSequence(_location1.getLongitude()));
|
|
};
|
|
//BA.debugLineNum = 536;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _i_engrane_click() throws Exception{
|
|
//BA.debugLineNum = 635;BA.debugLine="Sub i_engrane_Click";
|
|
//BA.debugLineNum = 636;BA.debugLine="lv_server.Clear";
|
|
_lv_server.Clear();
|
|
//BA.debugLineNum = 637;BA.debugLine="lv_server.AddSingleLine(\"http://keymon.lat:1781\")";
|
|
_lv_server.AddSingleLine(BA.ObjectToCharSequence("http://keymon.lat:1781"));
|
|
//BA.debugLineNum = 638;BA.debugLine="If user.Text = \"KMTS1\" Then lv_server.AddSingleLi";
|
|
if ((_user.getText()).equals("KMTS1")) {
|
|
_lv_server.AddSingleLine(BA.ObjectToCharSequence("http://10.0.0.205:1781"));};
|
|
//BA.debugLineNum = 640;BA.debugLine="et_server.Text = Starter.server";
|
|
_et_server.setText(BA.ObjectToCharSequence(_starter._server /*String*/ ));
|
|
//BA.debugLineNum = 641;BA.debugLine="Subs.panelVisible(p_appUpdate,0,0)";
|
|
_subs._panelvisible /*String*/ (ba,_p_appupdate,(int) (0),(int) (0));
|
|
//BA.debugLineNum = 642;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _i_engrane_longclick() throws Exception{
|
|
//BA.debugLineNum = 649;BA.debugLine="Sub i_engrane_LongClick";
|
|
//BA.debugLineNum = 650;BA.debugLine="copiaDB";
|
|
_copiadb();
|
|
//BA.debugLineNum = 651;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{
|
|
innerInitialize(_ba);
|
|
//BA.debugLineNum = 96;BA.debugLine="Public Sub Initialize";
|
|
//BA.debugLineNum = 98;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _jobdone(keymon.lat.medicomed.httpjob _job) throws Exception{
|
|
keymon.lat.medicomed.dbrequestmanager._dbresult _result = null;
|
|
Object[] _records = null;
|
|
String _cat_ve_version = "";
|
|
String _k = "";
|
|
String _id_almacen = "";
|
|
String _fecha_hoy = "";
|
|
String _name = "";
|
|
String _imei_base = "";
|
|
//BA.debugLineNum = 395;BA.debugLine="Sub JobDone(Job As HttpJob)";
|
|
//BA.debugLineNum = 396;BA.debugLine="Log(Job.Success)";
|
|
__c.LogImpl("3655361",BA.ObjectToString(_job._success /*boolean*/ ),0);
|
|
//BA.debugLineNum = 397;BA.debugLine="If Job.Success = False Then";
|
|
if (_job._success /*boolean*/ ==__c.False) {
|
|
//BA.debugLineNum = 398;BA.debugLine="ToastMessageShow(\"Error - MainPage: \" & Job.Erro";
|
|
__c.ToastMessageShow(BA.ObjectToCharSequence("Error - MainPage: "+_job._errormessage /*String*/ ),__c.True);
|
|
}else {
|
|
//BA.debugLineNum = 400;BA.debugLine="LogColor(\"JobDone - MainPage: '\" & reqManager.Ha";
|
|
__c.LogImpl("3655365","JobDone - MainPage: '"+BA.ObjectToString(_reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job).Tag /*Object*/ )+"' - Registros: "+BA.NumberToString(_reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job).Rows /*anywheresoftware.b4a.objects.collections.List*/ .getSize()),__c.Colors.Green);
|
|
//BA.debugLineNum = 401;BA.debugLine="If Job.JobName = \"DBRequest\" Then";
|
|
if ((_job._jobname /*String*/ ).equals("DBRequest")) {
|
|
//BA.debugLineNum = 402;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J";
|
|
_result = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job);
|
|
//BA.debugLineNum = 403;BA.debugLine="If result.Tag = \"version\" Then 'query tag";
|
|
if ((_result.Tag /*Object*/ ).equals((Object)("version"))) {
|
|
//BA.debugLineNum = 404;BA.debugLine="For Each records() As Object In result.Rows";
|
|
{
|
|
final anywheresoftware.b4a.BA.IterableList group9 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ;
|
|
final int groupLen9 = group9.getSize()
|
|
;int index9 = 0;
|
|
;
|
|
for (; index9 < groupLen9;index9++){
|
|
_records = (Object[])(group9.Get(index9));
|
|
//BA.debugLineNum = 405;BA.debugLine="skmt.ExecNonQuery(\"delete from VERSION\")";
|
|
_skmt.ExecNonQuery("delete from VERSION");
|
|
//BA.debugLineNum = 406;BA.debugLine="Dim CAT_VE_VERSION As String = records(result";
|
|
_cat_ve_version = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_VE_VERSION"))))]);
|
|
//BA.debugLineNum = 407;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO VERSION(NOVER";
|
|
_skmt.ExecNonQuery2("INSERT INTO VERSION(NOVERSION) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_ve_version)}));
|
|
}
|
|
};
|
|
};
|
|
//BA.debugLineNum = 411;BA.debugLine="If result.Tag = \"select_fechat\" Then 'query tag";
|
|
if ((_result.Tag /*Object*/ ).equals((Object)("select_fechat"))) {
|
|
//BA.debugLineNum = 412;BA.debugLine="For Each records() As Object In result.Rows";
|
|
{
|
|
final anywheresoftware.b4a.BA.IterableList group16 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ;
|
|
final int groupLen16 = group16.getSize()
|
|
;int index16 = 0;
|
|
;
|
|
for (; index16 < groupLen16;index16++){
|
|
_records = (Object[])(group16.Get(index16));
|
|
//BA.debugLineNum = 413;BA.debugLine="For Each k As String In result.Columns.Keys";
|
|
{
|
|
final anywheresoftware.b4a.BA.IterableList group17 = _result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Keys();
|
|
final int groupLen17 = group17.getSize()
|
|
;int index17 = 0;
|
|
;
|
|
for (; index17 < groupLen17;index17++){
|
|
_k = BA.ObjectToString(group17.Get(index17));
|
|
//BA.debugLineNum = 414;BA.debugLine="Log(\"select_fechat: \" & k & \": \" & records(r";
|
|
__c.LogImpl("3655379","select_fechat: "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0);
|
|
}
|
|
};
|
|
}
|
|
};
|
|
};
|
|
};
|
|
//BA.debugLineNum = 420;BA.debugLine="If Job.JobName = \"DBRequest\" Then";
|
|
if ((_job._jobname /*String*/ ).equals("DBRequest")) {
|
|
//BA.debugLineNum = 421;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J";
|
|
_result = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job);
|
|
//BA.debugLineNum = 422;BA.debugLine="If result.Tag = \"agencia\" Then 'query tag";
|
|
if ((_result.Tag /*Object*/ ).equals((Object)("agencia"))) {
|
|
//BA.debugLineNum = 423;BA.debugLine="For Each records() As Object In result.Rows";
|
|
{
|
|
final anywheresoftware.b4a.BA.IterableList group26 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ;
|
|
final int groupLen26 = group26.getSize()
|
|
;int index26 = 0;
|
|
;
|
|
for (; index26 < groupLen26;index26++){
|
|
_records = (Object[])(group26.Get(index26));
|
|
//BA.debugLineNum = 424;BA.debugLine="Dim ID_ALMACEN As String = records(result.Col";
|
|
_id_almacen = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("ID_ALMACEN"))))]);
|
|
}
|
|
};
|
|
};
|
|
};
|
|
//BA.debugLineNum = 429;BA.debugLine="If Job.JobName = \"DBRequest\" Then";
|
|
if ((_job._jobname /*String*/ ).equals("DBRequest")) {
|
|
//BA.debugLineNum = 430;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J";
|
|
_result = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job);
|
|
//BA.debugLineNum = 431;BA.debugLine="If result.Tag = \"fecha\" Then 'query tag";
|
|
if ((_result.Tag /*Object*/ ).equals((Object)("fecha"))) {
|
|
//BA.debugLineNum = 432;BA.debugLine="For Each records() As Object In result.Rows";
|
|
{
|
|
final anywheresoftware.b4a.BA.IterableList group34 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ;
|
|
final int groupLen34 = group34.getSize()
|
|
;int index34 = 0;
|
|
;
|
|
for (; index34 < groupLen34;index34++){
|
|
_records = (Object[])(group34.Get(index34));
|
|
//BA.debugLineNum = 433;BA.debugLine="Dim FECHA_HOY As String = records(result.Colu";
|
|
_fecha_hoy = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("FECHA"))))]);
|
|
//BA.debugLineNum = 434;BA.debugLine="skmt.ExecNonQuery2(\"delete from CAT_VARIABLES";
|
|
_skmt.ExecNonQuery2("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("FECHA")}));
|
|
//BA.debugLineNum = 435;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_VARIABLES";
|
|
_skmt.ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("FECHA"),(Object)(_fecha_hoy)}));
|
|
}
|
|
};
|
|
};
|
|
};
|
|
//BA.debugLineNum = 440;BA.debugLine="If Job.JobName = \"DBRequest\" Then";
|
|
if ((_job._jobname /*String*/ ).equals("DBRequest")) {
|
|
//BA.debugLineNum = 441;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J";
|
|
_result = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job);
|
|
//BA.debugLineNum = 442;BA.debugLine="If result.Tag = \"usuario\" Then 'query tag";
|
|
if ((_result.Tag /*Object*/ ).equals((Object)("usuario"))) {
|
|
//BA.debugLineNum = 443;BA.debugLine="For Each records() As Object In result.Rows";
|
|
{
|
|
final anywheresoftware.b4a.BA.IterableList group44 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ;
|
|
final int groupLen44 = group44.getSize()
|
|
;int index44 = 0;
|
|
;
|
|
for (; index44 < groupLen44;index44++){
|
|
_records = (Object[])(group44.Get(index44));
|
|
//BA.debugLineNum = 444;BA.debugLine="Dim name As String = records(result.Columns.G";
|
|
_name = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("USUARIO"))))]);
|
|
//BA.debugLineNum = 445;BA.debugLine="Dim ID_ALMACEN As String = records(result.Col";
|
|
_id_almacen = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_LO_AGENCIA"))))]);
|
|
//BA.debugLineNum = 446;BA.debugLine="Dim IMEI_BASE As String = records(result.Colu";
|
|
_imei_base = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_LO_IDTELEFONO"))))]);
|
|
//BA.debugLineNum = 447;BA.debugLine="Log(records(result.Columns.Get(\"CAT_LO_IDTELE";
|
|
__c.LogImpl("3655412",BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_LO_IDTELEFONO"))))]),0);
|
|
}
|
|
};
|
|
//BA.debugLineNum = 449;BA.debugLine="paso1 = 1";
|
|
_paso1 = BA.NumberToString(1);
|
|
//BA.debugLineNum = 450;BA.debugLine="ToastMessageShow(name, False)";
|
|
__c.ToastMessageShow(BA.ObjectToCharSequence(_name),__c.False);
|
|
//BA.debugLineNum = 451;BA.debugLine="Log(\"////////////////////////// \"&name)";
|
|
__c.LogImpl("3655416","////////////////////////// "+_name,0);
|
|
};
|
|
};
|
|
//BA.debugLineNum = 455;BA.debugLine="If Job.JobName = \"DBRequest\" Then";
|
|
if ((_job._jobname /*String*/ ).equals("DBRequest")) {
|
|
//BA.debugLineNum = 456;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J";
|
|
_result = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job);
|
|
//BA.debugLineNum = 457;BA.debugLine="If result.Tag = \"usuario_10\" Then 'query tag";
|
|
if ((_result.Tag /*Object*/ ).equals((Object)("usuario_10"))) {
|
|
//BA.debugLineNum = 458;BA.debugLine="For Each records() As Object In result.Rows";
|
|
{
|
|
final anywheresoftware.b4a.BA.IterableList group58 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ;
|
|
final int groupLen58 = group58.getSize()
|
|
;int index58 = 0;
|
|
;
|
|
for (; index58 < groupLen58;index58++){
|
|
_records = (Object[])(group58.Get(index58));
|
|
//BA.debugLineNum = 459;BA.debugLine="Dim name As String = records(result.Columns.G";
|
|
_name = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("USUARIO"))))]);
|
|
//BA.debugLineNum = 460;BA.debugLine="Dim ID_ALMACEN As String = records(result.Col";
|
|
_id_almacen = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_LO_AGENCIA"))))]);
|
|
//BA.debugLineNum = 461;BA.debugLine="Dim IMEI_BASE As String = records(result.Colu";
|
|
_imei_base = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_LO_IDTELEFONO"))))]);
|
|
}
|
|
};
|
|
//BA.debugLineNum = 463;BA.debugLine="Log(\"|\"&name&\"|\")";
|
|
__c.LogImpl("3655428","|"+_name+"|",0);
|
|
//BA.debugLineNum = 464;BA.debugLine="paso1 = 1";
|
|
_paso1 = BA.NumberToString(1);
|
|
//BA.debugLineNum = 465;BA.debugLine="IMEI_BASE = \"\"";
|
|
_imei_base = "";
|
|
//BA.debugLineNum = 466;BA.debugLine="IMEI = \"\"";
|
|
_imei = "";
|
|
};
|
|
};
|
|
//BA.debugLineNum = 469;BA.debugLine="Job.Release";
|
|
_job._release /*String*/ ();
|
|
};
|
|
//BA.debugLineNum = 471;BA.debugLine="Log($\"Paso1 = ${paso1} - Name: ${name} - IMEI: ${";
|
|
__c.LogImpl("3655436",("Paso1 = "+__c.SmartStringFormatter("",(Object)(_paso1))+" - Name: "+__c.SmartStringFormatter("",(Object)(_name))+" - IMEI: "+__c.SmartStringFormatter("",(Object)(_imei))+" - IMEI_BASE: "+__c.SmartStringFormatter("",(Object)(_imei_base))+""),0);
|
|
//BA.debugLineNum = 472;BA.debugLine="If paso1 = 1 Then";
|
|
if ((_paso1).equals(BA.NumberToString(1))) {
|
|
//BA.debugLineNum = 473;BA.debugLine="If IMEI = \"\" Then";
|
|
if ((_imei).equals("")) {
|
|
//BA.debugLineNum = 474;BA.debugLine="If user.Text = \"KMTS1\" Then name = \"OKActivo\"";
|
|
if ((_user.getText()).equals("KMTS1")) {
|
|
_name = "OKActivo";};
|
|
//BA.debugLineNum = 475;BA.debugLine="If name = \"OKActivo\" Then";
|
|
if ((_name).equals("OKActivo")) {
|
|
//BA.debugLineNum = 476;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")";
|
|
_skmt.ExecNonQuery("delete from usuarioa");
|
|
//BA.debugLineNum = 477;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALUE";
|
|
_skmt.ExecNonQuery2("INSERT INTO USUARIOA VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_user.getText().trim()),(Object)(_pass.getText().trim())}));
|
|
//BA.debugLineNum = 478;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")";
|
|
_skmt.ExecNonQuery("delete from cat_almacen");
|
|
//BA.debugLineNum = 479;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(ID";
|
|
_skmt.ExecNonQuery2("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_id_almacen)}));
|
|
//BA.debugLineNum = 480;BA.debugLine="usuario = user.Text";
|
|
_usuario = _user.getText();
|
|
//BA.debugLineNum = 481;BA.debugLine="B4XPages.ShowPage(\"Principal\")";
|
|
_b4xpages._showpage /*String*/ (ba,"Principal");
|
|
}else if((_name).equals("OKExpirado")) {
|
|
//BA.debugLineNum = 483;BA.debugLine="Msgbox(\"Usuario Expirado llamar al administrad";
|
|
__c.Msgbox(BA.ObjectToCharSequence("Usuario Expirado llamar al administrador"),BA.ObjectToCharSequence(""),ba);
|
|
}else if((_name).equals("OKCancelado")) {
|
|
//BA.debugLineNum = 485;BA.debugLine="Msgbox(\"Usuario Cancelado llamar al administra";
|
|
__c.Msgbox(BA.ObjectToCharSequence("Usuario Cancelado llamar al administrador"),BA.ObjectToCharSequence(""),ba);
|
|
}else {
|
|
//BA.debugLineNum = 487;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'Ig";
|
|
__c.Msgbox(BA.ObjectToCharSequence("Usuario o password No validos"),BA.ObjectToCharSequence(""),ba);
|
|
};
|
|
//BA.debugLineNum = 489;BA.debugLine="paso1 = 0";
|
|
_paso1 = BA.NumberToString(0);
|
|
}else {
|
|
//BA.debugLineNum = 491;BA.debugLine="If name = \"OKActivo\" & IMEI And IMEI = IMEI_BA";
|
|
if ((_name).equals("OKActivo"+_imei) && (_imei).equals(_imei_base)) {
|
|
//BA.debugLineNum = 492;BA.debugLine="If name = \"OKActivo\" & IMEI Then";
|
|
if ((_name).equals("OKActivo"+_imei)) {
|
|
//BA.debugLineNum = 493;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")";
|
|
_skmt.ExecNonQuery("delete from usuarioa");
|
|
//BA.debugLineNum = 494;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALU";
|
|
_skmt.ExecNonQuery2("INSERT INTO USUARIOA VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_user.getText().trim()),(Object)(_pass.getText().trim())}));
|
|
//BA.debugLineNum = 495;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")";
|
|
_skmt.ExecNonQuery("delete from cat_almacen");
|
|
//BA.debugLineNum = 496;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(I";
|
|
_skmt.ExecNonQuery2("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_id_almacen)}));
|
|
//BA.debugLineNum = 497;BA.debugLine="usuario = user.Text";
|
|
_usuario = _user.getText();
|
|
//BA.debugLineNum = 498;BA.debugLine="B4XPages.ShowPage(\"Clientes\")";
|
|
_b4xpages._showpage /*String*/ (ba,"Clientes");
|
|
}else if((_name).equals("OKExpirado"+_imei)) {
|
|
//BA.debugLineNum = 500;BA.debugLine="Msgbox(\"Usuario Expirado llamar al administra";
|
|
__c.Msgbox(BA.ObjectToCharSequence("Usuario Expirado llamar al administrador"),BA.ObjectToCharSequence(""),ba);
|
|
}else if((_name).equals("OKCancelado"+_imei)) {
|
|
//BA.debugLineNum = 502;BA.debugLine="Msgbox(\"Usuario Cancelado llamar al administr";
|
|
__c.Msgbox(BA.ObjectToCharSequence("Usuario Cancelado llamar al administrador"),BA.ObjectToCharSequence(""),ba);
|
|
}else {
|
|
//BA.debugLineNum = 504;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'i";
|
|
__c.Msgbox(BA.ObjectToCharSequence("Usuario o password No validos"),BA.ObjectToCharSequence(""),ba);
|
|
};
|
|
//BA.debugLineNum = 506;BA.debugLine="paso1 = 0";
|
|
_paso1 = BA.NumberToString(0);
|
|
}else if((_name).equals("OKActivo")) {
|
|
//BA.debugLineNum = 508;BA.debugLine="Msgbox(\"Telefono no VALIDO!\",\"\") 'ignore";
|
|
__c.Msgbox(BA.ObjectToCharSequence("Telefono no VALIDO!"),BA.ObjectToCharSequence(""),ba);
|
|
}else {
|
|
//BA.debugLineNum = 510;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'ig";
|
|
__c.Msgbox(BA.ObjectToCharSequence("Usuario o password No validos"),BA.ObjectToCharSequence(""),ba);
|
|
};
|
|
};
|
|
};
|
|
//BA.debugLineNum = 514;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _lv_server_itemclick(int _position,Object _value) throws Exception{
|
|
//BA.debugLineNum = 669;BA.debugLine="Private Sub lv_server_ItemClick (Position As Int,";
|
|
//BA.debugLineNum = 670;BA.debugLine="Starter.server = Value";
|
|
_starter._server /*String*/ = BA.ObjectToString(_value);
|
|
//BA.debugLineNum = 672;BA.debugLine="et_server.Text = Value";
|
|
_et_server.setText(BA.ObjectToCharSequence(_value));
|
|
//BA.debugLineNum = 673;BA.debugLine="Starter.reqManager.Initialize(Me, Value)";
|
|
_starter._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._initialize /*String*/ (ba,this,BA.ObjectToString(_value));
|
|
//BA.debugLineNum = 674;BA.debugLine="ToastMessageShow(\"Servidor modificado\", False)";
|
|
__c.ToastMessageShow(BA.ObjectToCharSequence("Servidor modificado"),__c.False);
|
|
//BA.debugLineNum = 675;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _muestraprogreso(String _mensaje) throws Exception{
|
|
//BA.debugLineNum = 626;BA.debugLine="Sub muestraProgreso(mensaje As String)";
|
|
//BA.debugLineNum = 627;BA.debugLine="ProgressDialogShow(mensaje)";
|
|
__c.ProgressDialogShow(ba,BA.ObjectToCharSequence(_mensaje));
|
|
//BA.debugLineNum = 628;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _ocultaprogreso() throws Exception{
|
|
//BA.debugLineNum = 631;BA.debugLine="Sub ocultaProgreso";
|
|
//BA.debugLineNum = 632;BA.debugLine="ProgressDialogHide";
|
|
__c.ProgressDialogHide();
|
|
//BA.debugLineNum = 633;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _pdf_click() throws Exception{
|
|
//BA.debugLineNum = 551;BA.debugLine="Sub PDF_Click";
|
|
//BA.debugLineNum = 553;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _popupmenu_dismiss() throws Exception{
|
|
//BA.debugLineNum = 538;BA.debugLine="Sub PopupMenu_Dismiss";
|
|
//BA.debugLineNum = 539;BA.debugLine="ToastMessageShow(\"PopupMenu dismissed\", False)";
|
|
__c.ToastMessageShow(BA.ObjectToCharSequence("PopupMenu dismissed"),__c.False);
|
|
//BA.debugLineNum = 540;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public boolean _popupmenu_menuitemclick(int _itemid) throws Exception{
|
|
//BA.debugLineNum = 542;BA.debugLine="Sub PopupMenu_MenuItemClick (ItemId As Int) As Boo";
|
|
//BA.debugLineNum = 543;BA.debugLine="ToastMessageShow(\"Item \" & ItemId & \" clicked.\",";
|
|
__c.ToastMessageShow(BA.ObjectToCharSequence("Item "+BA.NumberToString(_itemid)+" clicked."),__c.False);
|
|
//BA.debugLineNum = 544;BA.debugLine="Return False";
|
|
if (true) return __c.False;
|
|
//BA.debugLineNum = 545;BA.debugLine="End Sub";
|
|
return false;
|
|
}
|
|
public Object callSub(String sub, Object sender, Object[] args) throws Exception {
|
|
BA.senderHolder.set(sender);
|
|
if (BA.fastSubCompare(sub, "B4XPAGE_CREATED"))
|
|
return _b4xpage_created((anywheresoftware.b4a.objects.B4XViewWrapper) args[0]);
|
|
if (BA.fastSubCompare(sub, "GPS_LOCATIONCHANGED"))
|
|
return _gps_locationchanged((anywheresoftware.b4a.gps.LocationWrapper) args[0]);
|
|
if (BA.fastSubCompare(sub, "JOBDONE"))
|
|
return _jobdone((keymon.lat.medicomed.httpjob) args[0]);
|
|
return BA.SubDelegator.SubNotFound;
|
|
}
|
|
}
|