mirror of
https://github.com/KeymonSoft/Medicomed_Preventa.git
synced 2026-04-21 06:49:14 +00:00
65319638b4
Se hicieron invisibles normales de la venta, se agregaron 2 botones mas, uno indica que tieene venta y el otro que no tiene, tambien al boton que indica que tiene venta se le agrega una pequeña ventana para agregar la venta que se le indique.
1311 lines
73 KiB
Java
1311 lines
73 KiB
Java
package keymon.lat.medicomed;
|
|
|
|
|
|
import anywheresoftware.b4a.BA;
|
|
import anywheresoftware.b4a.B4AClass;
|
|
import anywheresoftware.b4a.BALayout;
|
|
import anywheresoftware.b4a.debug.*;
|
|
|
|
public class c_nuevocliente 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 anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_nuevocliente");
|
|
if (htSubs == null) {
|
|
ba.loadHtSubs(this.getClass());
|
|
htSubs = ba.htSubs;
|
|
}
|
|
|
|
}
|
|
if (BA.isShellModeRuntimeCheck(ba))
|
|
this.getClass().getMethod("_class_globals", keymon.lat.medicomed.c_nuevocliente.class).invoke(this, new Object[] {null});
|
|
else
|
|
ba.raiseEvent2(null, true, "class_globals", false);
|
|
}
|
|
|
|
|
|
public void innerInitializeHelper(anywheresoftware.b4a.BA _ba) throws Exception{
|
|
innerInitialize(_ba);
|
|
}
|
|
public Object callSub(String sub, Object sender, Object[] args) throws Exception {
|
|
return BA.SubDelegator.SubNotFound;
|
|
}
|
|
public anywheresoftware.b4a.keywords.Common __c = null;
|
|
public anywheresoftware.b4a.objects.B4XViewWrapper _root = null;
|
|
public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null;
|
|
public anywheresoftware.b4a.gps.GPS _g = null;
|
|
public String _ruta = "";
|
|
public anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null;
|
|
public keymon.lat.medicomed.dbrequestmanager _reqmanager = null;
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _cancela = null;
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _guarda = null;
|
|
public String _cuenta = "";
|
|
public String _usuario = "";
|
|
public String _sdate = "";
|
|
public String _stime = "";
|
|
public String _sdate2 = "";
|
|
public String _stime2 = "";
|
|
public String _no_cliente = "";
|
|
public String _no_ruta = "";
|
|
public boolean _desdebd = false;
|
|
public anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper _r_4 = null;
|
|
public anywheresoftware.b4a.objects.EditTextWrapper _e_nombre = null;
|
|
public com.rootsoft.togglelibrary.ToggleLibrary _tgl = null;
|
|
public anywheresoftware.b4a.objects.LabelWrapper _l_sinubicacion = null;
|
|
public anywheresoftware.b4a.objects.PanelWrapper _p_nuevocliente = null;
|
|
public anywheresoftware.b4a.objects.LabelWrapper _label1 = null;
|
|
public anywheresoftware.b4a.objects.PanelWrapper _p_botones = null;
|
|
public anywheresoftware.b4a.objects.PanelWrapper _p_cam = null;
|
|
public anywheresoftware.b4a.objects.PanelWrapper _p_camara = null;
|
|
public anywheresoftware.b4a.objects.ButtonWrapper _b_foto_inci = null;
|
|
public keymon.lat.medicomed.cameraexclass2 _camex2 = null;
|
|
public boolean _frontcamera = false;
|
|
public String _fototomada = "";
|
|
public String _almacen = "";
|
|
public anywheresoftware.b4a.objects.EditTextWrapper _et_direccion = null;
|
|
public anywheresoftware.b4a.objects.LabelWrapper _label2 = null;
|
|
public double _lat = 0;
|
|
public double _lon = 0;
|
|
public anywheresoftware.b4a.objects.LabelWrapper _b_ubicacion = null;
|
|
public anywheresoftware.b4a.objects.LabelWrapper _label3 = null;
|
|
public anywheresoftware.b4a.objects.EditTextWrapper _et_colonia = null;
|
|
public anywheresoftware.b4a.objects.LabelWrapper _label4 = null;
|
|
public anywheresoftware.b4a.objects.EditTextWrapper _et_cp = null;
|
|
public anywheresoftware.b4a.objects.ListViewWrapper _lv_colonia = null;
|
|
public int _banderasepo = 0;
|
|
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 Object _initialize(keymon.lat.medicomed.c_nuevocliente __ref,anywheresoftware.b4a.BA _ba) throws Exception{
|
|
__ref = this;
|
|
innerInitialize(_ba);
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "initialize", false))
|
|
{return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));}
|
|
RDebugUtils.currentLine=21037056;
|
|
//BA.debugLineNum = 21037056;BA.debugLine="Public Sub Initialize As Object";
|
|
RDebugUtils.currentLine=21037057;
|
|
//BA.debugLineNum = 21037057;BA.debugLine="Return Me";
|
|
if (true) return this;
|
|
RDebugUtils.currentLine=21037058;
|
|
//BA.debugLineNum = 21037058;BA.debugLine="End Sub";
|
|
return null;
|
|
}
|
|
public String _b_foto_click(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "b_foto_click", false))
|
|
{return ((String) Debug.delegate(ba, "b_foto_click", null));}
|
|
RDebugUtils.currentLine=22282240;
|
|
//BA.debugLineNum = 22282240;BA.debugLine="Private Sub B_FOTO_Click";
|
|
RDebugUtils.currentLine=22282241;
|
|
//BA.debugLineNum = 22282241;BA.debugLine="DateTime.DateFormat=\"ddMMyyyyHHmmss\"";
|
|
__c.DateTime.setDateFormat("ddMMyyyyHHmmss");
|
|
RDebugUtils.currentLine=22282242;
|
|
//BA.debugLineNum = 22282242;BA.debugLine="InitializeCamera2";
|
|
__ref._initializecamera2 /*void*/ (null);
|
|
RDebugUtils.currentLine=22282243;
|
|
//BA.debugLineNum = 22282243;BA.debugLine="Subs.panelVisible(p_camara, 0, 0)";
|
|
_subs._panelvisible /*String*/ (ba,__ref._p_camara /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0));
|
|
RDebugUtils.currentLine=22282244;
|
|
//BA.debugLineNum = 22282244;BA.debugLine="fototomada = DateTime.Now & \"_cliente.jpg\"";
|
|
__ref._fototomada /*String*/ = BA.NumberToString(__c.DateTime.getNow())+"_cliente.jpg";
|
|
RDebugUtils.currentLine=22282245;
|
|
//BA.debugLineNum = 22282245;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public void _initializecamera2(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "initializecamera2", false))
|
|
{Debug.delegate(ba, "initializecamera2", null); return;}
|
|
ResumableSub_InitializeCamera2 rsub = new ResumableSub_InitializeCamera2(this,__ref);
|
|
rsub.resume(ba, null);
|
|
}
|
|
public static class ResumableSub_InitializeCamera2 extends BA.ResumableSub {
|
|
public ResumableSub_InitializeCamera2(keymon.lat.medicomed.c_nuevocliente parent,keymon.lat.medicomed.c_nuevocliente __ref) {
|
|
this.parent = parent;
|
|
this.__ref = __ref;
|
|
this.__ref = parent;
|
|
}
|
|
keymon.lat.medicomed.c_nuevocliente __ref;
|
|
keymon.lat.medicomed.c_nuevocliente parent;
|
|
String _permission = "";
|
|
boolean _result = false;
|
|
|
|
@Override
|
|
public void resume(BA ba, Object[] result) throws Exception{
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
|
|
while (true) {
|
|
switch (state) {
|
|
case -1:
|
|
return;
|
|
|
|
case 0:
|
|
//C
|
|
this.state = 1;
|
|
RDebugUtils.currentLine=22020097;
|
|
//BA.debugLineNum = 22020097;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_CAMERA);
|
|
RDebugUtils.currentLine=22020098;
|
|
//BA.debugLineNum = 22020098;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As";
|
|
parent.__c.WaitFor("b4xpage_permissionresult", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_nuevocliente", "initializecamera2"), null);
|
|
this.state = 19;
|
|
return;
|
|
case 19:
|
|
//C
|
|
this.state = 1;
|
|
_permission = (String) result[1];
|
|
_result = (Boolean) result[2];
|
|
;
|
|
RDebugUtils.currentLine=22020099;
|
|
//BA.debugLineNum = 22020099;BA.debugLine="If Result Then";
|
|
if (true) break;
|
|
|
|
case 1:
|
|
//if
|
|
this.state = 6;
|
|
if (_result) {
|
|
this.state = 3;
|
|
}else {
|
|
this.state = 5;
|
|
}if (true) break;
|
|
|
|
case 3:
|
|
//C
|
|
this.state = 6;
|
|
RDebugUtils.currentLine=22020100;
|
|
//BA.debugLineNum = 22020100;BA.debugLine="camEx2.Initialize(p_cam, frontCamera, Me, \"Camer";
|
|
__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._initialize /*String*/ (null,ba,__ref._p_cam /*anywheresoftware.b4a.objects.PanelWrapper*/ ,__ref._frontcamera /*boolean*/ ,parent,"Camera1");
|
|
RDebugUtils.currentLine=22020101;
|
|
//BA.debugLineNum = 22020101;BA.debugLine="frontCamera = camEx2.Front";
|
|
__ref._frontcamera /*boolean*/ = __ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._front /*boolean*/ ;
|
|
RDebugUtils.currentLine=22020102;
|
|
//BA.debugLineNum = 22020102;BA.debugLine="Log(\"inicializamos Camara\")";
|
|
parent.__c.LogImpl("322020102","inicializamos Camara",0);
|
|
if (true) break;
|
|
|
|
case 5:
|
|
//C
|
|
this.state = 6;
|
|
RDebugUtils.currentLine=22020104;
|
|
//BA.debugLineNum = 22020104;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)";
|
|
parent.__c.ToastMessageShow(BA.ObjectToCharSequence("No permission!!!"),parent.__c.True);
|
|
if (true) break;
|
|
|
|
case 6:
|
|
//C
|
|
this.state = 7;
|
|
;
|
|
RDebugUtils.currentLine=22020106;
|
|
//BA.debugLineNum = 22020106;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);
|
|
RDebugUtils.currentLine=22020107;
|
|
//BA.debugLineNum = 22020107;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As";
|
|
parent.__c.WaitFor("b4xpage_permissionresult", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_nuevocliente", "initializecamera2"), null);
|
|
this.state = 20;
|
|
return;
|
|
case 20:
|
|
//C
|
|
this.state = 7;
|
|
_permission = (String) result[1];
|
|
_result = (Boolean) result[2];
|
|
;
|
|
RDebugUtils.currentLine=22020108;
|
|
//BA.debugLineNum = 22020108;BA.debugLine="If Result Then";
|
|
if (true) break;
|
|
|
|
case 7:
|
|
//if
|
|
this.state = 12;
|
|
if (_result) {
|
|
this.state = 9;
|
|
}else {
|
|
this.state = 11;
|
|
}if (true) break;
|
|
|
|
case 9:
|
|
//C
|
|
this.state = 12;
|
|
RDebugUtils.currentLine=22020109;
|
|
//BA.debugLineNum = 22020109;BA.debugLine="Log(\"conpermisos para escritura\")";
|
|
parent.__c.LogImpl("322020109","conpermisos para escritura",0);
|
|
if (true) break;
|
|
|
|
case 11:
|
|
//C
|
|
this.state = 12;
|
|
RDebugUtils.currentLine=22020111;
|
|
//BA.debugLineNum = 22020111;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)";
|
|
parent.__c.ToastMessageShow(BA.ObjectToCharSequence("No permission!!!"),parent.__c.True);
|
|
if (true) break;
|
|
|
|
case 12:
|
|
//C
|
|
this.state = 13;
|
|
;
|
|
RDebugUtils.currentLine=22020114;
|
|
//BA.debugLineNum = 22020114;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_READ_EXTERNAL_STORAGE);
|
|
RDebugUtils.currentLine=22020115;
|
|
//BA.debugLineNum = 22020115;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As";
|
|
parent.__c.WaitFor("b4xpage_permissionresult", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_nuevocliente", "initializecamera2"), null);
|
|
this.state = 21;
|
|
return;
|
|
case 21:
|
|
//C
|
|
this.state = 13;
|
|
_permission = (String) result[1];
|
|
_result = (Boolean) result[2];
|
|
;
|
|
RDebugUtils.currentLine=22020116;
|
|
//BA.debugLineNum = 22020116;BA.debugLine="If Result Then";
|
|
if (true) break;
|
|
|
|
case 13:
|
|
//if
|
|
this.state = 18;
|
|
if (_result) {
|
|
this.state = 15;
|
|
}else {
|
|
this.state = 17;
|
|
}if (true) break;
|
|
|
|
case 15:
|
|
//C
|
|
this.state = 18;
|
|
RDebugUtils.currentLine=22020117;
|
|
//BA.debugLineNum = 22020117;BA.debugLine="Log(\"conpermisos para escritura\")";
|
|
parent.__c.LogImpl("322020117","conpermisos para escritura",0);
|
|
if (true) break;
|
|
|
|
case 17:
|
|
//C
|
|
this.state = 18;
|
|
RDebugUtils.currentLine=22020119;
|
|
//BA.debugLineNum = 22020119;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)";
|
|
parent.__c.ToastMessageShow(BA.ObjectToCharSequence("No permission!!!"),parent.__c.True);
|
|
if (true) break;
|
|
|
|
case 18:
|
|
//C
|
|
this.state = -1;
|
|
;
|
|
RDebugUtils.currentLine=22020121;
|
|
//BA.debugLineNum = 22020121;BA.debugLine="End Sub";
|
|
if (true) break;
|
|
|
|
}
|
|
}
|
|
}
|
|
}
|
|
public String _b_foto_inci_click(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "b_foto_inci_click", false))
|
|
{return ((String) Debug.delegate(ba, "b_foto_inci_click", null));}
|
|
RDebugUtils.currentLine=21954560;
|
|
//BA.debugLineNum = 21954560;BA.debugLine="Private Sub b_foto_inci_Click";
|
|
RDebugUtils.currentLine=21954561;
|
|
//BA.debugLineNum = 21954561;BA.debugLine="camEx2.TakePicture";
|
|
__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._takepicture /*String*/ (null);
|
|
RDebugUtils.currentLine=21954562;
|
|
//BA.debugLineNum = 21954562;BA.debugLine="p_camara.Visible = False";
|
|
__ref._p_camara /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False);
|
|
RDebugUtils.currentLine=21954564;
|
|
//BA.debugLineNum = 21954564;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _b4xpage_appear(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "b4xpage_appear", false))
|
|
{return ((String) Debug.delegate(ba, "b4xpage_appear", null));}
|
|
RDebugUtils.currentLine=21168128;
|
|
//BA.debugLineNum = 21168128;BA.debugLine="Sub B4XPage_Appear";
|
|
RDebugUtils.currentLine=21168129;
|
|
//BA.debugLineNum = 21168129;BA.debugLine="E_NOMBRE.Text = \"\"";
|
|
__ref._e_nombre /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(""));
|
|
RDebugUtils.currentLine=21168130;
|
|
//BA.debugLineNum = 21168130;BA.debugLine="et_colonia.Text = \"\"";
|
|
__ref._et_colonia /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(""));
|
|
RDebugUtils.currentLine=21168131;
|
|
//BA.debugLineNum = 21168131;BA.debugLine="et_cp.Text = \"\"";
|
|
__ref._et_cp /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(""));
|
|
RDebugUtils.currentLine=21168132;
|
|
//BA.debugLineNum = 21168132;BA.debugLine="et_direccion.Text = \"\"";
|
|
__ref._et_direccion /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(""));
|
|
RDebugUtils.currentLine=21168133;
|
|
//BA.debugLineNum = 21168133;BA.debugLine="lv_colonia.Visible = False";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False);
|
|
RDebugUtils.currentLine=21168134;
|
|
//BA.debugLineNum = 21168134;BA.debugLine="lv_colonia.Clear";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear();
|
|
RDebugUtils.currentLine=21168135;
|
|
//BA.debugLineNum = 21168135;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then";
|
|
if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) {
|
|
RDebugUtils.currentLine=21168136;
|
|
//BA.debugLineNum = 21168136;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence";
|
|
__c.ToastMessageShow(BA.ObjectToCharSequence("Es necesario tener el GPS encendido"),__c.True);
|
|
RDebugUtils.currentLine=21168137;
|
|
//BA.debugLineNum = 21168137;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent";
|
|
__c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent()));
|
|
};
|
|
RDebugUtils.currentLine=21168139;
|
|
//BA.debugLineNum = 21168139;BA.debugLine="GUARDA.Visible = False";
|
|
__ref._guarda /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False);
|
|
RDebugUtils.currentLine=21168140;
|
|
//BA.debugLineNum = 21168140;BA.debugLine="Subs.panelVisible(p_nuevoCliente, 0, 0)";
|
|
_subs._panelvisible /*String*/ (ba,__ref._p_nuevocliente /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0));
|
|
RDebugUtils.currentLine=21168141;
|
|
//BA.debugLineNum = 21168141;BA.debugLine="p_nuevoCliente.Height = Root.Height";
|
|
__ref._p_nuevocliente /*anywheresoftware.b4a.objects.PanelWrapper*/ .setHeight(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight());
|
|
RDebugUtils.currentLine=21168142;
|
|
//BA.debugLineNum = 21168142;BA.debugLine="p_nuevoCliente.Width = Root.Width";
|
|
__ref._p_nuevocliente /*anywheresoftware.b4a.objects.PanelWrapper*/ .setWidth(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth());
|
|
RDebugUtils.currentLine=21168143;
|
|
//BA.debugLineNum = 21168143;BA.debugLine="Subs.centraEtiqueta(Label1, Root.Width)";
|
|
_subs._centraetiqueta /*String*/ (ba,__ref._label1 /*anywheresoftware.b4a.objects.LabelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth());
|
|
RDebugUtils.currentLine=21168144;
|
|
//BA.debugLineNum = 21168144;BA.debugLine="Subs.centraEtiqueta(Label2, Root.Width)";
|
|
_subs._centraetiqueta /*String*/ (ba,__ref._label2 /*anywheresoftware.b4a.objects.LabelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth());
|
|
RDebugUtils.currentLine=21168145;
|
|
//BA.debugLineNum = 21168145;BA.debugLine="Subs.centraEtiqueta(Label3, Root.Width)";
|
|
_subs._centraetiqueta /*String*/ (ba,__ref._label3 /*anywheresoftware.b4a.objects.LabelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth());
|
|
RDebugUtils.currentLine=21168146;
|
|
//BA.debugLineNum = 21168146;BA.debugLine="Subs.centraEtiqueta(Label4, Root.Width)";
|
|
_subs._centraetiqueta /*String*/ (ba,__ref._label4 /*anywheresoftware.b4a.objects.LabelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth());
|
|
RDebugUtils.currentLine=21168147;
|
|
//BA.debugLineNum = 21168147;BA.debugLine="Subs.centraEtiqueta(l_sinUbicacion, Root.Width)";
|
|
_subs._centraetiqueta /*String*/ (ba,__ref._l_sinubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth());
|
|
RDebugUtils.currentLine=21168148;
|
|
//BA.debugLineNum = 21168148;BA.debugLine="Subs.centraEtiqueta(b_ubicacion, Root.Width)";
|
|
_subs._centraetiqueta /*String*/ (ba,__ref._b_ubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth());
|
|
RDebugUtils.currentLine=21168149;
|
|
//BA.debugLineNum = 21168149;BA.debugLine="Subs.centraPanel(p_botones, Root.Width)";
|
|
_subs._centrapanel /*String*/ (ba,__ref._p_botones /*anywheresoftware.b4a.objects.PanelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth());
|
|
RDebugUtils.currentLine=21168150;
|
|
//BA.debugLineNum = 21168150;BA.debugLine="E_NOMBRE.Left = Round(Root.Width/2)-(E_NOMBRE.Wid";
|
|
__ref._e_nombre /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setLeft((int) (__c.Round(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2)-(__ref._e_nombre /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getWidth()/(double)2)));
|
|
RDebugUtils.currentLine=21168151;
|
|
//BA.debugLineNum = 21168151;BA.debugLine="et_direccion.Left = Round(Root.Width/2)-(E_NOMBRE";
|
|
__ref._et_direccion /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setLeft((int) (__c.Round(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2)-(__ref._e_nombre /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getWidth()/(double)2)));
|
|
RDebugUtils.currentLine=21168152;
|
|
//BA.debugLineNum = 21168152;BA.debugLine="et_colonia.Left = Round(Root.Width/2)-(E_NOMBRE.W";
|
|
__ref._et_colonia /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setLeft((int) (__c.Round(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2)-(__ref._e_nombre /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getWidth()/(double)2)));
|
|
RDebugUtils.currentLine=21168153;
|
|
//BA.debugLineNum = 21168153;BA.debugLine="et_cp.Left = Round(Root.Width/2)-(E_NOMBRE.Width/";
|
|
__ref._et_cp /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setLeft((int) (__c.Round(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2)-(__ref._e_nombre /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getWidth()/(double)2)));
|
|
RDebugUtils.currentLine=21168154;
|
|
//BA.debugLineNum = 21168154;BA.debugLine="If B4XPages.MainPage.lat_gps <> \"0.0\" Then";
|
|
if ((_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ).equals("0.0") == false) {
|
|
RDebugUtils.currentLine=21168155;
|
|
//BA.debugLineNum = 21168155;BA.debugLine="GUARDA.Visible = True 'Si hay ubicaccion, mostra";
|
|
__ref._guarda /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True);
|
|
RDebugUtils.currentLine=21168156;
|
|
//BA.debugLineNum = 21168156;BA.debugLine="l_sinUbicacion.Visible = False";
|
|
__ref._l_sinubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.False);
|
|
};
|
|
RDebugUtils.currentLine=21168159;
|
|
//BA.debugLineNum = 21168159;BA.debugLine="If Not(Starter.GPS.GPSEnabled) Then";
|
|
if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) {
|
|
RDebugUtils.currentLine=21168160;
|
|
//BA.debugLineNum = 21168160;BA.debugLine="ToastMessageShow(\"Debe Activar el GPS del Equipo";
|
|
__c.ToastMessageShow(BA.ObjectToCharSequence("Debe Activar el GPS del Equipo."),__c.True);
|
|
RDebugUtils.currentLine=21168161;
|
|
//BA.debugLineNum = 21168161;BA.debugLine="StartActivity(Starter.GPS.LocationSettingsIntent";
|
|
__c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent()));
|
|
}else {
|
|
RDebugUtils.currentLine=21168163;
|
|
//BA.debugLineNum = 21168163;BA.debugLine="Starter.GPS.Start(0, 0)";
|
|
_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .Start(ba,(long) (0),(float) (0));
|
|
};
|
|
RDebugUtils.currentLine=21168166;
|
|
//BA.debugLineNum = 21168166;BA.debugLine="CallSubDelayed(Tracker, \"StartFLPSmall\")";
|
|
__c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"StartFLPSmall");
|
|
RDebugUtils.currentLine=21168167;
|
|
//BA.debugLineNum = 21168167;BA.debugLine="desdeBD = False";
|
|
__ref._desdebd /*boolean*/ = __c.False;
|
|
RDebugUtils.currentLine=21168168;
|
|
//BA.debugLineNum = 21168168;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _b4xpage_created(keymon.lat.medicomed.c_nuevocliente __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "b4xpage_created", false))
|
|
{return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));}
|
|
RDebugUtils.currentLine=21102592;
|
|
//BA.debugLineNum = 21102592;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)";
|
|
RDebugUtils.currentLine=21102593;
|
|
//BA.debugLineNum = 21102593;BA.debugLine="Root = Root1";
|
|
__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1;
|
|
RDebugUtils.currentLine=21102595;
|
|
//BA.debugLineNum = 21102595;BA.debugLine="Root.LoadLayout(\"nuevocliente\")";
|
|
__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("nuevocliente",ba);
|
|
RDebugUtils.currentLine=21102596;
|
|
//BA.debugLineNum = 21102596;BA.debugLine="ruta = File.DirInternal";
|
|
__ref._ruta /*String*/ = __c.File.getDirInternal();
|
|
RDebugUtils.currentLine=21102597;
|
|
//BA.debugLineNum = 21102597;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then";
|
|
if (__c.File.Exists(__ref._ruta /*String*/ ,"kmt.db")==__c.False) {
|
|
RDebugUtils.currentLine=21102598;
|
|
//BA.debugLineNum = 21102598;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d";
|
|
__c.File.Copy(__c.File.getDirAssets(),"kmt.db",__ref._ruta /*String*/ ,"kmt.db");
|
|
};
|
|
RDebugUtils.currentLine=21102603;
|
|
//BA.debugLineNum = 21102603;BA.debugLine="reqManager.Initialize(Me, B4XPages.MainPage.SERVE";
|
|
__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._initialize /*String*/ (null,ba,this,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._server /*String*/ );
|
|
RDebugUtils.currentLine=21102604;
|
|
//BA.debugLineNum = 21102604;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _camera1_picturetaken(keymon.lat.medicomed.c_nuevocliente __ref,byte[] _data) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "camera1_picturetaken", false))
|
|
{return ((String) Debug.delegate(ba, "camera1_picturetaken", new Object[] {_data}));}
|
|
String _filename = "";
|
|
String _dirp = "";
|
|
String _dir = "";
|
|
String _dir2 = "";
|
|
RDebugUtils.currentLine=22151168;
|
|
//BA.debugLineNum = 22151168;BA.debugLine="Sub Camera1_PictureTaken (Data()As Byte)";
|
|
RDebugUtils.currentLine=22151169;
|
|
//BA.debugLineNum = 22151169;BA.debugLine="Log(\"tome foto\")";
|
|
__c.LogImpl("322151169","tome foto",0);
|
|
RDebugUtils.currentLine=22151170;
|
|
//BA.debugLineNum = 22151170;BA.debugLine="Dim filename As String = fototomada";
|
|
_filename = __ref._fototomada /*String*/ ;
|
|
RDebugUtils.currentLine=22151171;
|
|
//BA.debugLineNum = 22151171;BA.debugLine="Dim Dirp As String = File.DirInternal";
|
|
_dirp = __c.File.getDirInternal();
|
|
RDebugUtils.currentLine=22151172;
|
|
//BA.debugLineNum = 22151172;BA.debugLine="Dim Dir As String";
|
|
_dir = "";
|
|
RDebugUtils.currentLine=22151173;
|
|
//BA.debugLineNum = 22151173;BA.debugLine="Dim Dir2 As String";
|
|
_dir2 = "";
|
|
RDebugUtils.currentLine=22151174;
|
|
//BA.debugLineNum = 22151174;BA.debugLine="Try";
|
|
try {RDebugUtils.currentLine=22151175;
|
|
//BA.debugLineNum = 22151175;BA.debugLine="File.MakeDir(Dirp,\"/promotoriakmts\")";
|
|
__c.File.MakeDir(_dirp,"/promotoriakmts");
|
|
RDebugUtils.currentLine=22151176;
|
|
//BA.debugLineNum = 22151176;BA.debugLine="Dir = \"/promotoriakmts\"";
|
|
_dir = "/promotoriakmts";
|
|
RDebugUtils.currentLine=22151177;
|
|
//BA.debugLineNum = 22151177;BA.debugLine="Log(\"creado en promotoria \" & Dirp & Dir)";
|
|
__c.LogImpl("322151177","creado en promotoria "+_dirp+_dir,0);
|
|
}
|
|
catch (Exception e11) {
|
|
ba.setLastException(e11);RDebugUtils.currentLine=22151179;
|
|
//BA.debugLineNum = 22151179;BA.debugLine="Dir = \"\"";
|
|
_dir = "";
|
|
RDebugUtils.currentLine=22151180;
|
|
//BA.debugLineNum = 22151180;BA.debugLine="Log(\"creado en raiz\")";
|
|
__c.LogImpl("322151180","creado en raiz",0);
|
|
};
|
|
RDebugUtils.currentLine=22151183;
|
|
//BA.debugLineNum = 22151183;BA.debugLine="Try";
|
|
try {RDebugUtils.currentLine=22151184;
|
|
//BA.debugLineNum = 22151184;BA.debugLine="File.MakeDir(Dirp & Dir,\"/reduccion\")";
|
|
__c.File.MakeDir(_dirp+_dir,"/reduccion");
|
|
RDebugUtils.currentLine=22151185;
|
|
//BA.debugLineNum = 22151185;BA.debugLine="Dir2 = \"/reduccion\"";
|
|
_dir2 = "/reduccion";
|
|
RDebugUtils.currentLine=22151186;
|
|
//BA.debugLineNum = 22151186;BA.debugLine="Log(\"creado en promotoria \" & Dirp & Dir & Dir2)";
|
|
__c.LogImpl("322151186","creado en promotoria "+_dirp+_dir+_dir2,0);
|
|
}
|
|
catch (Exception e19) {
|
|
ba.setLastException(e19);RDebugUtils.currentLine=22151188;
|
|
//BA.debugLineNum = 22151188;BA.debugLine="Dir = \"\"";
|
|
_dir = "";
|
|
RDebugUtils.currentLine=22151189;
|
|
//BA.debugLineNum = 22151189;BA.debugLine="Log(\"creado en raiz\")";
|
|
__c.LogImpl("322151189","creado en raiz",0);
|
|
};
|
|
RDebugUtils.currentLine=22151192;
|
|
//BA.debugLineNum = 22151192;BA.debugLine="camEx2.SavePictureToFile(Data, Dirp&Dir, filename";
|
|
__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._savepicturetofile /*String*/ (null,_data,_dirp+_dir,_filename);
|
|
RDebugUtils.currentLine=22151193;
|
|
//BA.debugLineNum = 22151193;BA.debugLine="camEx2.StartPreview 'restart preview";
|
|
__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._startpreview /*String*/ (null);
|
|
RDebugUtils.currentLine=22151194;
|
|
//BA.debugLineNum = 22151194;BA.debugLine="ToastMessageShow(\"Picture saved.\" & CRLF & \"File";
|
|
__c.ToastMessageShow(BA.ObjectToCharSequence("Picture saved."+__c.CRLF+"File size: "+BA.NumberToString(__c.File.Size(_dir,_filename))+_dir+","+_filename),__c.True);
|
|
RDebugUtils.currentLine=22151195;
|
|
//BA.debugLineNum = 22151195;BA.debugLine="Log(\"Picture saved.\" & CRLF & \"File size: \" & Fi";
|
|
__c.LogImpl("322151195","Picture saved."+__c.CRLF+"File size: "+BA.NumberToString(__c.File.Size(_dir,_filename))+_dir+","+_filename,0);
|
|
RDebugUtils.currentLine=22151196;
|
|
//BA.debugLineNum = 22151196;BA.debugLine="p_camara.Visible = False";
|
|
__ref._p_camara /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False);
|
|
RDebugUtils.currentLine=22151197;
|
|
//BA.debugLineNum = 22151197;BA.debugLine="StopCamera2";
|
|
__ref._stopcamera2 /*String*/ (null);
|
|
RDebugUtils.currentLine=22151199;
|
|
//BA.debugLineNum = 22151199;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _stopcamera2(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "stopcamera2", false))
|
|
{return ((String) Debug.delegate(ba, "stopcamera2", null));}
|
|
RDebugUtils.currentLine=22216704;
|
|
//BA.debugLineNum = 22216704;BA.debugLine="Private Sub StopCamera2";
|
|
RDebugUtils.currentLine=22216706;
|
|
//BA.debugLineNum = 22216706;BA.debugLine="If camEx2.IsInitialized Then";
|
|
if (__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ .IsInitialized /*boolean*/ ()) {
|
|
RDebugUtils.currentLine=22216707;
|
|
//BA.debugLineNum = 22216707;BA.debugLine="camEx2.Release";
|
|
__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._release /*String*/ (null);
|
|
};
|
|
RDebugUtils.currentLine=22216709;
|
|
//BA.debugLineNum = 22216709;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _camera1_ready(keymon.lat.medicomed.c_nuevocliente __ref,boolean _success) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "camera1_ready", false))
|
|
{return ((String) Debug.delegate(ba, "camera1_ready", new Object[] {_success}));}
|
|
RDebugUtils.currentLine=22085632;
|
|
//BA.debugLineNum = 22085632;BA.debugLine="Sub Camera1_Ready (Success As Boolean)";
|
|
RDebugUtils.currentLine=22085633;
|
|
//BA.debugLineNum = 22085633;BA.debugLine="Log(\"Camara ready\")";
|
|
__c.LogImpl("322085633","Camara ready",0);
|
|
RDebugUtils.currentLine=22085634;
|
|
//BA.debugLineNum = 22085634;BA.debugLine="If Success Then";
|
|
if (_success) {
|
|
RDebugUtils.currentLine=22085635;
|
|
//BA.debugLineNum = 22085635;BA.debugLine="camEx2.SetJpegQuality(90)";
|
|
__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._setjpegquality /*String*/ (null,(int) (90));
|
|
RDebugUtils.currentLine=22085636;
|
|
//BA.debugLineNum = 22085636;BA.debugLine="camEx2.SetContinuousAutoFocus";
|
|
__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._setcontinuousautofocus /*String*/ (null);
|
|
RDebugUtils.currentLine=22085637;
|
|
//BA.debugLineNum = 22085637;BA.debugLine="camEx2.CommitParameters";
|
|
__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._commitparameters /*String*/ (null);
|
|
RDebugUtils.currentLine=22085638;
|
|
//BA.debugLineNum = 22085638;BA.debugLine="camEx2.StartPreview";
|
|
__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._startpreview /*String*/ (null);
|
|
RDebugUtils.currentLine=22085639;
|
|
//BA.debugLineNum = 22085639;BA.debugLine="Log(camEx2.GetPreviewSize)";
|
|
__c.LogImpl("322085639",BA.ObjectToString(__ref._camex2 /*keymon.lat.medicomed.cameraexclass2*/ ._getpreviewsize /*keymon.lat.medicomed.main._camerasize*/ (null)),0);
|
|
}else {
|
|
RDebugUtils.currentLine=22085641;
|
|
//BA.debugLineNum = 22085641;BA.debugLine="ToastMessageShow(\"Cannot open camera.\", True)";
|
|
__c.ToastMessageShow(BA.ObjectToCharSequence("Cannot open camera."),__c.True);
|
|
RDebugUtils.currentLine=22085642;
|
|
//BA.debugLineNum = 22085642;BA.debugLine="Log(\"Cannot open camera\")";
|
|
__c.LogImpl("322085642","Cannot open camera",0);
|
|
};
|
|
RDebugUtils.currentLine=22085644;
|
|
//BA.debugLineNum = 22085644;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _cancela_click(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "cancela_click", false))
|
|
{return ((String) Debug.delegate(ba, "cancela_click", null));}
|
|
RDebugUtils.currentLine=21299200;
|
|
//BA.debugLineNum = 21299200;BA.debugLine="Sub CANCELA_Click";
|
|
RDebugUtils.currentLine=21299201;
|
|
//BA.debugLineNum = 21299201;BA.debugLine="B4XPages.ShowPage(\"Principal\")";
|
|
_b4xpages._showpage /*String*/ (ba,"Principal");
|
|
RDebugUtils.currentLine=21299202;
|
|
//BA.debugLineNum = 21299202;BA.debugLine="CallSubDelayed(Tracker, \"StartFLP\")";
|
|
__c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"StartFLP");
|
|
RDebugUtils.currentLine=21299203;
|
|
//BA.debugLineNum = 21299203;BA.debugLine="lv_colonia.Clear";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear();
|
|
RDebugUtils.currentLine=21299204;
|
|
//BA.debugLineNum = 21299204;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _class_globals(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
RDebugUtils.currentLine=20971520;
|
|
//BA.debugLineNum = 20971520;BA.debugLine="Sub Class_Globals";
|
|
RDebugUtils.currentLine=20971521;
|
|
//BA.debugLineNum = 20971521;BA.debugLine="Private Root As B4XView 'ignore";
|
|
_root = new anywheresoftware.b4a.objects.B4XViewWrapper();
|
|
RDebugUtils.currentLine=20971522;
|
|
//BA.debugLineNum = 20971522;BA.debugLine="Private xui As XUI 'ignore";
|
|
_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI();
|
|
RDebugUtils.currentLine=20971524;
|
|
//BA.debugLineNum = 20971524;BA.debugLine="Dim g As GPS";
|
|
_g = new anywheresoftware.b4a.gps.GPS();
|
|
RDebugUtils.currentLine=20971525;
|
|
//BA.debugLineNum = 20971525;BA.debugLine="Dim ruta As String";
|
|
_ruta = "";
|
|
RDebugUtils.currentLine=20971526;
|
|
//BA.debugLineNum = 20971526;BA.debugLine="Dim c As Cursor";
|
|
_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper();
|
|
RDebugUtils.currentLine=20971527;
|
|
//BA.debugLineNum = 20971527;BA.debugLine="Dim reqManager As DBRequestManager";
|
|
_reqmanager = new keymon.lat.medicomed.dbrequestmanager();
|
|
RDebugUtils.currentLine=20971528;
|
|
//BA.debugLineNum = 20971528;BA.debugLine="Dim CANCELA As Button";
|
|
_cancela = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
RDebugUtils.currentLine=20971529;
|
|
//BA.debugLineNum = 20971529;BA.debugLine="Dim GUARDA As Button";
|
|
_guarda = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
RDebugUtils.currentLine=20971530;
|
|
//BA.debugLineNum = 20971530;BA.debugLine="Dim cuenta As String";
|
|
_cuenta = "";
|
|
RDebugUtils.currentLine=20971531;
|
|
//BA.debugLineNum = 20971531;BA.debugLine="Dim usuario As String";
|
|
_usuario = "";
|
|
RDebugUtils.currentLine=20971532;
|
|
//BA.debugLineNum = 20971532;BA.debugLine="Dim sDate,sTime As String";
|
|
_sdate = "";
|
|
_stime = "";
|
|
RDebugUtils.currentLine=20971533;
|
|
//BA.debugLineNum = 20971533;BA.debugLine="Dim sDate2,sTime2 As String";
|
|
_sdate2 = "";
|
|
_stime2 = "";
|
|
RDebugUtils.currentLine=20971534;
|
|
//BA.debugLineNum = 20971534;BA.debugLine="Dim no_cliente As String";
|
|
_no_cliente = "";
|
|
RDebugUtils.currentLine=20971535;
|
|
//BA.debugLineNum = 20971535;BA.debugLine="Dim no_ruta As String";
|
|
_no_ruta = "";
|
|
RDebugUtils.currentLine=20971536;
|
|
//BA.debugLineNum = 20971536;BA.debugLine="Dim desdeBD As Boolean";
|
|
_desdebd = false;
|
|
RDebugUtils.currentLine=20971537;
|
|
//BA.debugLineNum = 20971537;BA.debugLine="Dim r_4 As RadioButton";
|
|
_r_4 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper();
|
|
RDebugUtils.currentLine=20971538;
|
|
//BA.debugLineNum = 20971538;BA.debugLine="Dim E_NOMBRE As EditText";
|
|
_e_nombre = new anywheresoftware.b4a.objects.EditTextWrapper();
|
|
RDebugUtils.currentLine=20971539;
|
|
//BA.debugLineNum = 20971539;BA.debugLine="Dim tgl As Toggle";
|
|
_tgl = new com.rootsoft.togglelibrary.ToggleLibrary();
|
|
RDebugUtils.currentLine=20971540;
|
|
//BA.debugLineNum = 20971540;BA.debugLine="Private l_sinUbicacion As Label";
|
|
_l_sinubicacion = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
RDebugUtils.currentLine=20971541;
|
|
//BA.debugLineNum = 20971541;BA.debugLine="Private p_nuevoCliente As Panel";
|
|
_p_nuevocliente = new anywheresoftware.b4a.objects.PanelWrapper();
|
|
RDebugUtils.currentLine=20971542;
|
|
//BA.debugLineNum = 20971542;BA.debugLine="Private Label1 As Label";
|
|
_label1 = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
RDebugUtils.currentLine=20971543;
|
|
//BA.debugLineNum = 20971543;BA.debugLine="Private p_botones As Panel";
|
|
_p_botones = new anywheresoftware.b4a.objects.PanelWrapper();
|
|
RDebugUtils.currentLine=20971544;
|
|
//BA.debugLineNum = 20971544;BA.debugLine="Private p_cam As Panel";
|
|
_p_cam = new anywheresoftware.b4a.objects.PanelWrapper();
|
|
RDebugUtils.currentLine=20971545;
|
|
//BA.debugLineNum = 20971545;BA.debugLine="Private p_camara As Panel";
|
|
_p_camara = new anywheresoftware.b4a.objects.PanelWrapper();
|
|
RDebugUtils.currentLine=20971546;
|
|
//BA.debugLineNum = 20971546;BA.debugLine="Private b_foto_inci As Button";
|
|
_b_foto_inci = new anywheresoftware.b4a.objects.ButtonWrapper();
|
|
RDebugUtils.currentLine=20971547;
|
|
//BA.debugLineNum = 20971547;BA.debugLine="Private camEx2 As CameraExClass2";
|
|
_camex2 = new keymon.lat.medicomed.cameraexclass2();
|
|
RDebugUtils.currentLine=20971548;
|
|
//BA.debugLineNum = 20971548;BA.debugLine="Dim frontCamera As Boolean = False";
|
|
_frontcamera = __c.False;
|
|
RDebugUtils.currentLine=20971549;
|
|
//BA.debugLineNum = 20971549;BA.debugLine="Dim fototomada As String = \"0\"";
|
|
_fototomada = "0";
|
|
RDebugUtils.currentLine=20971550;
|
|
//BA.debugLineNum = 20971550;BA.debugLine="Dim ALMACEN As String";
|
|
_almacen = "";
|
|
RDebugUtils.currentLine=20971551;
|
|
//BA.debugLineNum = 20971551;BA.debugLine="Private et_direccion As EditText";
|
|
_et_direccion = new anywheresoftware.b4a.objects.EditTextWrapper();
|
|
RDebugUtils.currentLine=20971552;
|
|
//BA.debugLineNum = 20971552;BA.debugLine="Private Label2 As Label";
|
|
_label2 = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
RDebugUtils.currentLine=20971553;
|
|
//BA.debugLineNum = 20971553;BA.debugLine="Dim lat As Double = 0";
|
|
_lat = 0;
|
|
RDebugUtils.currentLine=20971554;
|
|
//BA.debugLineNum = 20971554;BA.debugLine="Dim lon As Double = 0";
|
|
_lon = 0;
|
|
RDebugUtils.currentLine=20971555;
|
|
//BA.debugLineNum = 20971555;BA.debugLine="Private b_ubicacion As Label";
|
|
_b_ubicacion = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
RDebugUtils.currentLine=20971556;
|
|
//BA.debugLineNum = 20971556;BA.debugLine="Private Label3 As Label";
|
|
_label3 = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
RDebugUtils.currentLine=20971557;
|
|
//BA.debugLineNum = 20971557;BA.debugLine="Private et_colonia As EditText";
|
|
_et_colonia = new anywheresoftware.b4a.objects.EditTextWrapper();
|
|
RDebugUtils.currentLine=20971558;
|
|
//BA.debugLineNum = 20971558;BA.debugLine="Private Label4 As Label";
|
|
_label4 = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
RDebugUtils.currentLine=20971559;
|
|
//BA.debugLineNum = 20971559;BA.debugLine="Private et_cp As EditText";
|
|
_et_cp = new anywheresoftware.b4a.objects.EditTextWrapper();
|
|
RDebugUtils.currentLine=20971560;
|
|
//BA.debugLineNum = 20971560;BA.debugLine="Private lv_colonia As ListView";
|
|
_lv_colonia = new anywheresoftware.b4a.objects.ListViewWrapper();
|
|
RDebugUtils.currentLine=20971561;
|
|
//BA.debugLineNum = 20971561;BA.debugLine="Dim banderasepo As Int";
|
|
_banderasepo = 0;
|
|
RDebugUtils.currentLine=20971562;
|
|
//BA.debugLineNum = 20971562;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _et_colonia_click(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "et_colonia_click", false))
|
|
{return ((String) Debug.delegate(ba, "et_colonia_click", null));}
|
|
RDebugUtils.currentLine=21430272;
|
|
//BA.debugLineNum = 21430272;BA.debugLine="Private Sub et_colonia_Click";
|
|
RDebugUtils.currentLine=21430273;
|
|
//BA.debugLineNum = 21430273;BA.debugLine="Sender.As(EditText).InputType = 524288";
|
|
((anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(__c.Sender(ba)))).setInputType((int) (524288));
|
|
RDebugUtils.currentLine=21430274;
|
|
//BA.debugLineNum = 21430274;BA.debugLine="If lv_colonia.Visible = False Then";
|
|
if (__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getVisible()==__c.False) {
|
|
RDebugUtils.currentLine=21430275;
|
|
//BA.debugLineNum = 21430275;BA.debugLine="lv_colonia.Visible = True";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.True);
|
|
}else {
|
|
RDebugUtils.currentLine=21430277;
|
|
//BA.debugLineNum = 21430277;BA.debugLine="lv_colonia.Visible = False";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False);
|
|
};
|
|
RDebugUtils.currentLine=21430279;
|
|
//BA.debugLineNum = 21430279;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _et_colonia_focuschanged(keymon.lat.medicomed.c_nuevocliente __ref,boolean _hasfocus) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "et_colonia_focuschanged", false))
|
|
{return ((String) Debug.delegate(ba, "et_colonia_focuschanged", new Object[] {_hasfocus}));}
|
|
anywheresoftware.b4a.sql.SQL.CursorWrapper _cc = null;
|
|
int _i = 0;
|
|
RDebugUtils.currentLine=21561344;
|
|
//BA.debugLineNum = 21561344;BA.debugLine="Private Sub et_colonia_FocusChanged (HasFocus As B";
|
|
RDebugUtils.currentLine=21561345;
|
|
//BA.debugLineNum = 21561345;BA.debugLine="If HasFocus Then";
|
|
if (_hasfocus) {
|
|
RDebugUtils.currentLine=21561346;
|
|
//BA.debugLineNum = 21561346;BA.debugLine="Private cc As Cursor = B4XPages.MainPage.skmt.Ex";
|
|
_cc = new anywheresoftware.b4a.sql.SQL.CursorWrapper();
|
|
_cc = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select colonia from sepomex where codigo = '"+__c.SmartStringFormatter("",(Object)(__ref._et_cp /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))+"'"))));
|
|
RDebugUtils.currentLine=21561347;
|
|
//BA.debugLineNum = 21561347;BA.debugLine="lv_colonia.Clear";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear();
|
|
RDebugUtils.currentLine=21561348;
|
|
//BA.debugLineNum = 21561348;BA.debugLine="lv_colonia.BringToFront";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .BringToFront();
|
|
RDebugUtils.currentLine=21561349;
|
|
//BA.debugLineNum = 21561349;BA.debugLine="Private Label1 As Label";
|
|
_label1 = new anywheresoftware.b4a.objects.LabelWrapper();
|
|
RDebugUtils.currentLine=21561350;
|
|
//BA.debugLineNum = 21561350;BA.debugLine="Label1 = lv_colonia.SingleLineLayout.Label";
|
|
__ref._label1 /*anywheresoftware.b4a.objects.LabelWrapper*/ = __ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getSingleLineLayout().Label;
|
|
RDebugUtils.currentLine=21561351;
|
|
//BA.debugLineNum = 21561351;BA.debugLine="Label1.TextColor = Colors.White";
|
|
__ref._label1 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextColor(__c.Colors.White);
|
|
RDebugUtils.currentLine=21561352;
|
|
//BA.debugLineNum = 21561352;BA.debugLine="Label1.TextSize = 14";
|
|
__ref._label1 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextSize((float) (14));
|
|
RDebugUtils.currentLine=21561354;
|
|
//BA.debugLineNum = 21561354;BA.debugLine="If cc.RowCount > 0 Then";
|
|
if (_cc.getRowCount()>0) {
|
|
RDebugUtils.currentLine=21561355;
|
|
//BA.debugLineNum = 21561355;BA.debugLine="For i = 0 To cc.RowCount - 1";
|
|
{
|
|
final int step10 = 1;
|
|
final int limit10 = (int) (_cc.getRowCount()-1);
|
|
_i = (int) (0) ;
|
|
for (;_i <= limit10 ;_i = _i + step10 ) {
|
|
RDebugUtils.currentLine=21561356;
|
|
//BA.debugLineNum = 21561356;BA.debugLine="cc.Position = i";
|
|
_cc.setPosition(_i);
|
|
RDebugUtils.currentLine=21561357;
|
|
//BA.debugLineNum = 21561357;BA.debugLine="lv_colonia.AddSingleLine(cc.GetString(\"COLONIA";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence(_cc.GetString("COLONIA")));
|
|
}
|
|
};
|
|
RDebugUtils.currentLine=21561360;
|
|
//BA.debugLineNum = 21561360;BA.debugLine="lv_colonia.AddSingleLine(\"Ingrese colonia manua";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence("Ingrese colonia manualmente."));
|
|
}else {
|
|
RDebugUtils.currentLine=21561362;
|
|
//BA.debugLineNum = 21561362;BA.debugLine="lv_colonia.AddSingleLine(\"Código no encontrado.";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence("Código no encontrado."));
|
|
RDebugUtils.currentLine=21561363;
|
|
//BA.debugLineNum = 21561363;BA.debugLine="lv_colonia.AddSingleLine(\"Ingrese colonia manua";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence("Ingrese colonia manualmente."));
|
|
};
|
|
RDebugUtils.currentLine=21561365;
|
|
//BA.debugLineNum = 21561365;BA.debugLine="lv_colonia.Visible = True";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.True);
|
|
};
|
|
RDebugUtils.currentLine=21561367;
|
|
//BA.debugLineNum = 21561367;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _et_cp_click(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "et_cp_click", false))
|
|
{return ((String) Debug.delegate(ba, "et_cp_click", null));}
|
|
RDebugUtils.currentLine=21364736;
|
|
//BA.debugLineNum = 21364736;BA.debugLine="Sub et_cp_click";
|
|
RDebugUtils.currentLine=21364737;
|
|
//BA.debugLineNum = 21364737;BA.debugLine="lv_colonia.Visible = False";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False);
|
|
RDebugUtils.currentLine=21364738;
|
|
//BA.debugLineNum = 21364738;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _et_cp_textchanged(keymon.lat.medicomed.c_nuevocliente __ref,String _old,String _new) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "et_cp_textchanged", false))
|
|
{return ((String) Debug.delegate(ba, "et_cp_textchanged", new Object[] {_old,_new}));}
|
|
anywheresoftware.b4a.sql.SQL.CursorWrapper _cc = null;
|
|
int _x = 0;
|
|
RDebugUtils.currentLine=21495808;
|
|
//BA.debugLineNum = 21495808;BA.debugLine="Private Sub et_cp_TextChanged (Old As String, New";
|
|
RDebugUtils.currentLine=21495809;
|
|
//BA.debugLineNum = 21495809;BA.debugLine="If Not(desdeBD) And New.Length = 5 Then";
|
|
if (__c.Not(__ref._desdebd /*boolean*/ ) && _new.length()==5) {
|
|
RDebugUtils.currentLine=21495810;
|
|
//BA.debugLineNum = 21495810;BA.debugLine="Private cc As Cursor = B4XPages.MainPage.skmt.Ex";
|
|
_cc = new anywheresoftware.b4a.sql.SQL.CursorWrapper();
|
|
_cc = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select estado, municipio, colonia from sepomex where codigo = '"+__c.SmartStringFormatter("",(Object)(__ref._et_cp /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))+"'"))));
|
|
RDebugUtils.currentLine=21495812;
|
|
//BA.debugLineNum = 21495812;BA.debugLine="If cc.RowCount > 0 Then";
|
|
if (_cc.getRowCount()>0) {
|
|
RDebugUtils.currentLine=21495813;
|
|
//BA.debugLineNum = 21495813;BA.debugLine="For x = 0 To cc.RowCount - 1";
|
|
{
|
|
final int step4 = 1;
|
|
final int limit4 = (int) (_cc.getRowCount()-1);
|
|
_x = (int) (0) ;
|
|
for (;_x <= limit4 ;_x = _x + step4 ) {
|
|
RDebugUtils.currentLine=21495814;
|
|
//BA.debugLineNum = 21495814;BA.debugLine="cc.Position = x";
|
|
_cc.setPosition(_x);
|
|
}
|
|
};
|
|
};
|
|
}else
|
|
{RDebugUtils.currentLine=21495817;
|
|
//BA.debugLineNum = 21495817;BA.debugLine="else if New.Length < 5 Then";
|
|
if (_new.length()<5) {
|
|
RDebugUtils.currentLine=21495818;
|
|
//BA.debugLineNum = 21495818;BA.debugLine="lv_colonia.Visible = False";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False);
|
|
}}
|
|
;
|
|
RDebugUtils.currentLine=21495820;
|
|
//BA.debugLineNum = 21495820;BA.debugLine="desdeBD = False";
|
|
__ref._desdebd /*boolean*/ = __c.False;
|
|
RDebugUtils.currentLine=21495821;
|
|
//BA.debugLineNum = 21495821;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _gps_locationchanged(keymon.lat.medicomed.c_nuevocliente __ref,anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "gps_locationchanged", false))
|
|
{return ((String) Debug.delegate(ba, "gps_locationchanged", new Object[] {_location1}));}
|
|
RDebugUtils.currentLine=21233664;
|
|
//BA.debugLineNum = 21233664;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)";
|
|
RDebugUtils.currentLine=21233665;
|
|
//BA.debugLineNum = 21233665;BA.debugLine="If B4XPages.MainPage.lat_gps <> \"0.0\" Then";
|
|
if ((_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ).equals("0.0") == false) {
|
|
RDebugUtils.currentLine=21233666;
|
|
//BA.debugLineNum = 21233666;BA.debugLine="GUARDA.Visible = True 'Si hay ubicaccion, mostra";
|
|
__ref._guarda /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True);
|
|
RDebugUtils.currentLine=21233667;
|
|
//BA.debugLineNum = 21233667;BA.debugLine="l_sinUbicacion.Visible = True";
|
|
__ref._l_sinubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.True);
|
|
RDebugUtils.currentLine=21233668;
|
|
//BA.debugLineNum = 21233668;BA.debugLine="lat = Location1.Latitude";
|
|
__ref._lat /*double*/ = _location1.getLatitude();
|
|
RDebugUtils.currentLine=21233669;
|
|
//BA.debugLineNum = 21233669;BA.debugLine="lon = Location1.Longitude";
|
|
__ref._lon /*double*/ = _location1.getLongitude();
|
|
RDebugUtils.currentLine=21233670;
|
|
//BA.debugLineNum = 21233670;BA.debugLine="l_sinUbicacion.Text = (\"Latitud: \" & lat & \", Lo";
|
|
__ref._l_sinubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Latitud: "+BA.NumberToString(__ref._lat /*double*/ )+", Longotud: "+BA.NumberToString(__ref._lon /*double*/ ))));
|
|
};
|
|
RDebugUtils.currentLine=21233673;
|
|
//BA.debugLineNum = 21233673;BA.debugLine="b_ubicacion.TextSize = 13";
|
|
__ref._b_ubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextSize((float) (13));
|
|
RDebugUtils.currentLine=21233674;
|
|
//BA.debugLineNum = 21233674;BA.debugLine="b_ubicacion.Text = $\"Precisión GPS $1.0{Location1";
|
|
__ref._b_ubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Precisión GPS "+__c.SmartStringFormatter("1.0",(Object)(_location1.getAccuracy()))+" m")));
|
|
RDebugUtils.currentLine=21233675;
|
|
//BA.debugLineNum = 21233675;BA.debugLine="If Location1.Accuracy > 200 Then";
|
|
if (_location1.getAccuracy()>200) {
|
|
RDebugUtils.currentLine=21233676;
|
|
//BA.debugLineNum = 21233676;BA.debugLine="b_ubicacion.TextColor = Colors.Red";
|
|
__ref._b_ubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextColor(__c.Colors.Red);
|
|
RDebugUtils.currentLine=21233677;
|
|
//BA.debugLineNum = 21233677;BA.debugLine="b_ubicacion.TextSize = 16";
|
|
__ref._b_ubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextSize((float) (16));
|
|
RDebugUtils.currentLine=21233678;
|
|
//BA.debugLineNum = 21233678;BA.debugLine="b_ubicacion.Text = $\"Mala señal $1.0{Location1.A";
|
|
__ref._b_ubicacion /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Mala señal "+__c.SmartStringFormatter("1.0",(Object)(_location1.getAccuracy()))+" m")));
|
|
};
|
|
RDebugUtils.currentLine=21233680;
|
|
//BA.debugLineNum = 21233680;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _guarda_click(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "guarda_click", false))
|
|
{return ((String) Debug.delegate(ba, "guarda_click", null));}
|
|
String _hora = "";
|
|
String _mins = "";
|
|
String _segs = "";
|
|
RDebugUtils.currentLine=21692416;
|
|
//BA.debugLineNum = 21692416;BA.debugLine="Sub GUARDA_Click";
|
|
RDebugUtils.currentLine=21692417;
|
|
//BA.debugLineNum = 21692417;BA.debugLine="If E_NOMBRE.Text = \"\" Then";
|
|
if ((__ref._e_nombre /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("")) {
|
|
RDebugUtils.currentLine=21692418;
|
|
//BA.debugLineNum = 21692418;BA.debugLine="MsgboxAsync(\"Por favor captura el nombre de la T";
|
|
__c.MsgboxAsync(BA.ObjectToCharSequence("Por favor captura el nombre de la Tienda"),BA.ObjectToCharSequence("Atención"),ba);
|
|
}else {
|
|
RDebugUtils.currentLine=21692420;
|
|
//BA.debugLineNum = 21692420;BA.debugLine="If et_direccion.Text.Length > 3 Then";
|
|
if (__ref._et_direccion /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().length()>3) {
|
|
RDebugUtils.currentLine=21692421;
|
|
//BA.debugLineNum = 21692421;BA.debugLine="If lat <> 0 Then";
|
|
if (__ref._lat /*double*/ !=0) {
|
|
RDebugUtils.currentLine=21692422;
|
|
//BA.debugLineNum = 21692422;BA.debugLine="If et_colonia.Text.Length > 3 Then";
|
|
if (__ref._et_colonia /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().length()>3) {
|
|
RDebugUtils.currentLine=21692423;
|
|
//BA.debugLineNum = 21692423;BA.debugLine="If et_cp.Text.Length > 3 Then";
|
|
if (__ref._et_cp /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().length()>3) {
|
|
RDebugUtils.currentLine=21692425;
|
|
//BA.debugLineNum = 21692425;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\"";
|
|
__c.DateTime.setDateFormat("MM/dd/yyyy");
|
|
RDebugUtils.currentLine=21692426;
|
|
//BA.debugLineNum = 21692426;BA.debugLine="DateTime.Timeformat = \"HHmmss\"";
|
|
__c.DateTime.setTimeFormat("HHmmss");
|
|
RDebugUtils.currentLine=21692427;
|
|
//BA.debugLineNum = 21692427;BA.debugLine="sDate=DateTime.Date(DateTime.Now)";
|
|
__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow());
|
|
RDebugUtils.currentLine=21692428;
|
|
//BA.debugLineNum = 21692428;BA.debugLine="sTime=DateTime.Time(DateTime.Now)";
|
|
__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow());
|
|
RDebugUtils.currentLine=21692429;
|
|
//BA.debugLineNum = 21692429;BA.debugLine="Log($\" //////////// Date: ${sDate} - Time:";
|
|
__c.LogImpl("321692429",(" //////////// Date: "+__c.SmartStringFormatter("",(Object)(__ref._sdate /*String*/ ))+" - Time: "+__c.SmartStringFormatter("",(Object)(__ref._stime /*String*/ ))+" ////////////////"),0);
|
|
RDebugUtils.currentLine=21692431;
|
|
//BA.debugLineNum = 21692431;BA.debugLine="Private hora As String = sTime.SubString2(0,";
|
|
_hora = __ref._stime /*String*/ .substring((int) (0),(int) (2));
|
|
RDebugUtils.currentLine=21692432;
|
|
//BA.debugLineNum = 21692432;BA.debugLine="Private mins As String = sTime.SubString2(2,";
|
|
_mins = __ref._stime /*String*/ .substring((int) (2),(int) (4));
|
|
RDebugUtils.currentLine=21692433;
|
|
//BA.debugLineNum = 21692433;BA.debugLine="Private segs As String = sTime.SubString(4)";
|
|
_segs = __ref._stime /*String*/ .substring((int) (4));
|
|
RDebugUtils.currentLine=21692434;
|
|
//BA.debugLineNum = 21692434;BA.debugLine="sTime = hora&\":\"&mins&\":\"&segs";
|
|
__ref._stime /*String*/ = _hora+":"+_mins+":"+_segs;
|
|
RDebugUtils.currentLine=21692435;
|
|
//BA.debugLineNum = 21692435;BA.debugLine="Log(\"////////////// sTime: \"&sTime&\" ///////";
|
|
__c.LogImpl("321692435","////////////// sTime: "+__ref._stime /*String*/ +" ////////////////",0);
|
|
RDebugUtils.currentLine=21692436;
|
|
//BA.debugLineNum = 21692436;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select C";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select CAT_CL_RUTA FROM kmt_info")));
|
|
RDebugUtils.currentLine=21692437;
|
|
//BA.debugLineNum = 21692437;BA.debugLine="c.Position=0";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0));
|
|
RDebugUtils.currentLine=21692438;
|
|
//BA.debugLineNum = 21692438;BA.debugLine="no_ruta= c.GetString(\"CAT_CL_RUTA\")";
|
|
__ref._no_ruta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA");
|
|
RDebugUtils.currentLine=21692439;
|
|
//BA.debugLineNum = 21692439;BA.debugLine="no_cliente= \"N\" & sTime & no_ruta";
|
|
__ref._no_cliente /*String*/ = "N"+__ref._stime /*String*/ +__ref._no_ruta /*String*/ ;
|
|
RDebugUtils.currentLine=21692440;
|
|
//BA.debugLineNum = 21692440;BA.debugLine="Log(\"++ ++ no_cliente = \"&no_cliente)";
|
|
__c.LogImpl("321692440","++ ++ no_cliente = "+__ref._no_cliente /*String*/ ,0);
|
|
RDebugUtils.currentLine=21692441;
|
|
//BA.debugLineNum = 21692441;BA.debugLine="c.Close";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close();
|
|
RDebugUtils.currentLine=21692442;
|
|
//BA.debugLineNum = 21692442;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT";
|
|
_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO kmt_info(CAT_CL_CODIGO,CAT_CL_RUTA,CAT_CL_NOMBRE,CAT_CL_ATIENDE1,CAT_CL_ATIENTE2,CAT_CL_TELEFONO,CAT_CL_EMAIL,CAT_CL_CALLE,CAT_CL_NOEXT,CAT_CL_NOINT,CAT_CL_CALLE1,CAT_CL_CALLE2,CAT_CL_COLONIA,CAT_CL_MUNI,CAT_CL_EDO,CAT_CL_CP,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_MTOCOMPRA,CAT_CL_NUM_SERIEFISICO, gestion) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,0,0,0) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._no_cliente /*String*/ ),(Object)(__ref._no_ruta /*String*/ ),(Object)(__ref._e_nombre /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)("null"),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )}));
|
|
RDebugUtils.currentLine=21692443;
|
|
//BA.debugLineNum = 21692443;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT";
|
|
_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_STAY_STORE(HSS_CODIGO, HSS_IN , HSS_OUT , HSS_TOT) VALUES (?,0,0,0)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._no_cliente /*String*/ )}));
|
|
RDebugUtils.currentLine=21692444;
|
|
//BA.debugLineNum = 21692444;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete";
|
|
_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CUENTAA");
|
|
RDebugUtils.currentLine=21692445;
|
|
//BA.debugLineNum = 21692445;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT";
|
|
_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CUENTAA VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._no_cliente /*String*/ )}));
|
|
RDebugUtils.currentLine=21692446;
|
|
//BA.debugLineNum = 21692446;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select I";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select ID_ALMACEN from CAT_ALMACEN")));
|
|
RDebugUtils.currentLine=21692447;
|
|
//BA.debugLineNum = 21692447;BA.debugLine="If c.RowCount>0 Then";
|
|
if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) {
|
|
RDebugUtils.currentLine=21692448;
|
|
//BA.debugLineNum = 21692448;BA.debugLine="C.Position=0";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0));
|
|
RDebugUtils.currentLine=21692449;
|
|
//BA.debugLineNum = 21692449;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")";
|
|
__ref._almacen /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("ID_ALMACEN");
|
|
};
|
|
RDebugUtils.currentLine=21692451;
|
|
//BA.debugLineNum = 21692451;BA.debugLine="c.Close";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close();
|
|
RDebugUtils.currentLine=21692452;
|
|
//BA.debugLineNum = 21692452;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select u";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select usuario from usuarioa")));
|
|
RDebugUtils.currentLine=21692453;
|
|
//BA.debugLineNum = 21692453;BA.debugLine="c.Position = 0";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0));
|
|
RDebugUtils.currentLine=21692454;
|
|
//BA.debugLineNum = 21692454;BA.debugLine="usuario = c.GetString(\"USUARIO\")";
|
|
__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO");
|
|
RDebugUtils.currentLine=21692455;
|
|
//BA.debugLineNum = 21692455;BA.debugLine="c.Close";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close();
|
|
RDebugUtils.currentLine=21692458;
|
|
//BA.debugLineNum = 21692458;BA.debugLine="DateTime.DateFormat = \"dd/MM/yyyy\"";
|
|
__c.DateTime.setDateFormat("dd/MM/yyyy");
|
|
RDebugUtils.currentLine=21692459;
|
|
//BA.debugLineNum = 21692459;BA.debugLine="DateTime.Timeformat = \"HH:mm:ss\"";
|
|
__c.DateTime.setTimeFormat("HH:mm:ss");
|
|
RDebugUtils.currentLine=21692460;
|
|
//BA.debugLineNum = 21692460;BA.debugLine="sDate2=DateTime.Date(DateTime.Now)";
|
|
__ref._sdate2 /*String*/ = __c.DateTime.Date(__c.DateTime.getNow());
|
|
RDebugUtils.currentLine=21692461;
|
|
//BA.debugLineNum = 21692461;BA.debugLine="sTime2=DateTime.Time(DateTime.Now)";
|
|
__ref._stime2 /*String*/ = __c.DateTime.Time(__c.DateTime.getNow());
|
|
RDebugUtils.currentLine=21692463;
|
|
//BA.debugLineNum = 21692463;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT";
|
|
_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CLIENTES_NUEVOS(CN_ID, CN_FECHA, CN_USER, CN_LAT, CN_LON, CN_NOMBRE, CN_DIRECCION, COLONIA, CP, CN_ALMACEN, CN_RUTA, CN_ENVIO,CN_BANDERA) VALUES (?,?,?,?,?,?,?,?,?,?,?,0,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{__ref._no_cliente /*String*/ ,__ref._sdate2 /*String*/ +" "+__ref._stime2 /*String*/ ,__ref._usuario /*String*/ ,BA.NumberToString(__ref._lat /*double*/ ),BA.NumberToString(__ref._lon /*double*/ ),__ref._e_nombre /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText(),__ref._et_direccion /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText(),__ref._et_colonia /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText(),__ref._et_cp /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText(),__ref._almacen /*String*/ ,__ref._no_ruta /*String*/ ,BA.NumberToString(__ref._banderasepo /*int*/ )}));
|
|
RDebugUtils.currentLine=21692464;
|
|
//BA.debugLineNum = 21692464;BA.debugLine="fototomada = \"0\"";
|
|
__ref._fototomada /*String*/ = "0";
|
|
RDebugUtils.currentLine=21692465;
|
|
//BA.debugLineNum = 21692465;BA.debugLine="B4XPages.ShowPage(\"cliente\")";
|
|
_b4xpages._showpage /*String*/ (ba,"cliente");
|
|
RDebugUtils.currentLine=21692466;
|
|
//BA.debugLineNum = 21692466;BA.debugLine="CallSubDelayed(Tracker, \"StartFLP\")";
|
|
__c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"StartFLP");
|
|
RDebugUtils.currentLine=21692468;
|
|
//BA.debugLineNum = 21692468;BA.debugLine="mandaPendientesclientesnuevos";
|
|
__ref._mandapendientesclientesnuevos /*String*/ (null);
|
|
}else {
|
|
RDebugUtils.currentLine=21692470;
|
|
//BA.debugLineNum = 21692470;BA.debugLine="MsgboxAsync(\"Por favor captura el C.P. del c";
|
|
__c.MsgboxAsync(BA.ObjectToCharSequence("Por favor captura el C.P. del cliente"),BA.ObjectToCharSequence("Atención"),ba);
|
|
};
|
|
}else {
|
|
RDebugUtils.currentLine=21692473;
|
|
//BA.debugLineNum = 21692473;BA.debugLine="MsgboxAsync(\"Por favor captura la colonia del";
|
|
__c.MsgboxAsync(BA.ObjectToCharSequence("Por favor captura la colonia del cliente"),BA.ObjectToCharSequence("Atención"),ba);
|
|
};
|
|
}else {
|
|
RDebugUtils.currentLine=21692476;
|
|
//BA.debugLineNum = 21692476;BA.debugLine="MsgboxAsync(\"Por favor revisa que tengas señal";
|
|
__c.MsgboxAsync(BA.ObjectToCharSequence("Por favor revisa que tengas señal GPS"),BA.ObjectToCharSequence("Atención"),ba);
|
|
};
|
|
}else {
|
|
RDebugUtils.currentLine=21692479;
|
|
//BA.debugLineNum = 21692479;BA.debugLine="MsgboxAsync(\"Por favor captura la dirección del";
|
|
__c.MsgboxAsync(BA.ObjectToCharSequence("Por favor captura la dirección del cliente"),BA.ObjectToCharSequence("Atención"),ba);
|
|
};
|
|
};
|
|
RDebugUtils.currentLine=21692482;
|
|
//BA.debugLineNum = 21692482;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _mandapendientesclientesnuevos(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "mandapendientesclientesnuevos", false))
|
|
{return ((String) Debug.delegate(ba, "mandapendientesclientesnuevos", null));}
|
|
int _i = 0;
|
|
keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null;
|
|
RDebugUtils.currentLine=21757952;
|
|
//BA.debugLineNum = 21757952;BA.debugLine="Sub mandaPendientesclientesnuevos";
|
|
RDebugUtils.currentLine=21757953;
|
|
//BA.debugLineNum = 21757953;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT CN_ID";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("SELECT CN_ID, CN_FECHA , CN_USER, CN_LAT, CN_LON, CN_NOMBRE, CN_DIRECCION, COLONIA, CP, CN_ALMACEN, CN_RUTA, CN_BANDERA FROM CLIENTES_NUEVOS where CN_ENVIO <> 1")));
|
|
RDebugUtils.currentLine=21757954;
|
|
//BA.debugLineNum = 21757954;BA.debugLine="If c.RowCount>0 Then";
|
|
if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) {
|
|
RDebugUtils.currentLine=21757955;
|
|
//BA.debugLineNum = 21757955;BA.debugLine="For i = 0 To c.RowCount - 1";
|
|
{
|
|
final int step3 = 1;
|
|
final int limit3 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1);
|
|
_i = (int) (0) ;
|
|
for (;_i <= limit3 ;_i = _i + step3 ) {
|
|
RDebugUtils.currentLine=21757956;
|
|
//BA.debugLineNum = 21757956;BA.debugLine="c.Position = i";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i);
|
|
RDebugUtils.currentLine=21757958;
|
|
//BA.debugLineNum = 21757958;BA.debugLine="Dim cmd As DBCommand";
|
|
_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand();
|
|
RDebugUtils.currentLine=21757959;
|
|
//BA.debugLineNum = 21757959;BA.debugLine="cmd.Initialize";
|
|
_cmd.Initialize();
|
|
RDebugUtils.currentLine=21757960;
|
|
//BA.debugLineNum = 21757960;BA.debugLine="cmd.Name = \"insert_clientesnuevos2_MEDI\"";
|
|
_cmd.Name /*String*/ = "insert_clientesnuevos2_MEDI";
|
|
RDebugUtils.currentLine=21757961;
|
|
//BA.debugLineNum = 21757961;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\"C";
|
|
_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_ID")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_USER")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_LAT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_LON")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_NOMBRE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_DIRECCION")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("COLONIA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CP")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_ALMACEN")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_RUTA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_BANDERA"))};
|
|
RDebugUtils.currentLine=21757962;
|
|
//BA.debugLineNum = 21757962;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_CNUEVOSPe";
|
|
__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,_cmd,(Object)(("ins_CNUEVOSPendientes_head_"+__c.SmartStringFormatter("",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CN_ID")))+"")));
|
|
}
|
|
};
|
|
};
|
|
RDebugUtils.currentLine=21757965;
|
|
//BA.debugLineNum = 21757965;BA.debugLine="c.Close";
|
|
__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close();
|
|
RDebugUtils.currentLine=21757966;
|
|
//BA.debugLineNum = 21757966;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _jobdone(keymon.lat.medicomed.c_nuevocliente __ref,keymon.lat.medicomed.httpjob _job) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "jobdone", false))
|
|
{return ((String) Debug.delegate(ba, "jobdone", new Object[] {_job}));}
|
|
keymon.lat.medicomed.dbrequestmanager._dbresult _resultado = null;
|
|
String _cliente = "";
|
|
Object[] _records = null;
|
|
String _k = "";
|
|
RDebugUtils.currentLine=21823488;
|
|
//BA.debugLineNum = 21823488;BA.debugLine="Sub JobDone(Job As HttpJob)";
|
|
RDebugUtils.currentLine=21823489;
|
|
//BA.debugLineNum = 21823489;BA.debugLine="Log(Job.Success)";
|
|
__c.LogImpl("321823489",BA.ObjectToString(_job._success /*boolean*/ ),0);
|
|
RDebugUtils.currentLine=21823490;
|
|
//BA.debugLineNum = 21823490;BA.debugLine="If Job.Success = False Then";
|
|
if (_job._success /*boolean*/ ==__c.False) {
|
|
}else {
|
|
RDebugUtils.currentLine=21823493;
|
|
//BA.debugLineNum = 21823493;BA.debugLine="LogColor(\"JobDone: '\" & reqManager.HandleJob(Job";
|
|
__c.LogImpl("321823493","JobDone: '"+BA.ObjectToString(__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job).Tag /*Object*/ )+"' - Registros: "+BA.NumberToString(__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job).Rows /*anywheresoftware.b4a.objects.collections.List*/ .getSize()),__c.Colors.Green);
|
|
RDebugUtils.currentLine=21823494;
|
|
//BA.debugLineNum = 21823494;BA.debugLine="If Job.JobName = \"DBRequest\" Then";
|
|
if ((_job._jobname /*String*/ ).equals("DBRequest")) {
|
|
RDebugUtils.currentLine=21823495;
|
|
//BA.debugLineNum = 21823495;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo";
|
|
_resultado = __ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job);
|
|
RDebugUtils.currentLine=21823496;
|
|
//BA.debugLineNum = 21823496;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_CNUEVO";
|
|
if ((BA.ObjectToString(_resultado.Tag /*Object*/ )).indexOf("ins_CNUEVOSPendientes_head_")>-1) {
|
|
RDebugUtils.currentLine=21823497;
|
|
//BA.debugLineNum = 21823497;BA.debugLine="Private cliente As String= resultado.Tag";
|
|
_cliente = BA.ObjectToString(_resultado.Tag /*Object*/ );
|
|
RDebugUtils.currentLine=21823498;
|
|
//BA.debugLineNum = 21823498;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_";
|
|
_cliente = _cliente.substring((int) (_cliente.indexOf("_")+24));
|
|
RDebugUtils.currentLine=21823499;
|
|
//BA.debugLineNum = 21823499;BA.debugLine="Log($\"Cliente1:${cliente}\"$)";
|
|
__c.LogImpl("321823499",("Cliente1:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0);
|
|
RDebugUtils.currentLine=21823500;
|
|
//BA.debugLineNum = 21823500;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update C";
|
|
_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update CLIENTES_NUEVOS SET CN_ENVIO = ? WHERE CN_ID = ? AND CN_ENVIO <> 1",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{"1",_cliente}));
|
|
RDebugUtils.currentLine=21823501;
|
|
//BA.debugLineNum = 21823501;BA.debugLine="For Each records() As Object In resultado.Rows";
|
|
{
|
|
final anywheresoftware.b4a.BA.IterableList group12 = _resultado.Rows /*anywheresoftware.b4a.objects.collections.List*/ ;
|
|
final int groupLen12 = group12.getSize()
|
|
;int index12 = 0;
|
|
;
|
|
for (; index12 < groupLen12;index12++){
|
|
_records = (Object[])(group12.Get(index12));
|
|
RDebugUtils.currentLine=21823502;
|
|
//BA.debugLineNum = 21823502;BA.debugLine="For Each k As String In resultado.Columns.Key";
|
|
{
|
|
final anywheresoftware.b4a.BA.IterableList group13 = _resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Keys();
|
|
final int groupLen13 = group13.getSize()
|
|
;int index13 = 0;
|
|
;
|
|
for (; index13 < groupLen13;index13++){
|
|
_k = BA.ObjectToString(group13.Get(index13));
|
|
RDebugUtils.currentLine=21823503;
|
|
//BA.debugLineNum = 21823503;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record";
|
|
__c.LogImpl("321823503",BA.ObjectToString(_resultado.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0);
|
|
}
|
|
};
|
|
}
|
|
};
|
|
};
|
|
};
|
|
RDebugUtils.currentLine=21823508;
|
|
//BA.debugLineNum = 21823508;BA.debugLine="Job.Release";
|
|
_job._release /*String*/ (null);
|
|
};
|
|
RDebugUtils.currentLine=21823510;
|
|
//BA.debugLineNum = 21823510;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _lv_colonia_itemclick(keymon.lat.medicomed.c_nuevocliente __ref,int _position,Object _value) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "lv_colonia_itemclick", false))
|
|
{return ((String) Debug.delegate(ba, "lv_colonia_itemclick", new Object[] {_position,_value}));}
|
|
RDebugUtils.currentLine=21626880;
|
|
//BA.debugLineNum = 21626880;BA.debugLine="Private Sub lv_colonia_ItemClick (Position As Int,";
|
|
RDebugUtils.currentLine=21626881;
|
|
//BA.debugLineNum = 21626881;BA.debugLine="lv_colonia.Visible = False";
|
|
__ref._lv_colonia /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False);
|
|
RDebugUtils.currentLine=21626882;
|
|
//BA.debugLineNum = 21626882;BA.debugLine="If Value <> \"Código no encontrado.\" And Value <>";
|
|
if ((_value).equals((Object)("Código no encontrado.")) == false && (_value).equals((Object)("Ingrese colonia manualmente.")) == false) {
|
|
RDebugUtils.currentLine=21626883;
|
|
//BA.debugLineNum = 21626883;BA.debugLine="et_colonia.Text = Value";
|
|
__ref._et_colonia /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(_value));
|
|
RDebugUtils.currentLine=21626884;
|
|
//BA.debugLineNum = 21626884;BA.debugLine="banderasepo = 0";
|
|
__ref._banderasepo /*int*/ = (int) (0);
|
|
}else {
|
|
RDebugUtils.currentLine=21626886;
|
|
//BA.debugLineNum = 21626886;BA.debugLine="banderasepo = 1";
|
|
__ref._banderasepo /*int*/ = (int) (1);
|
|
};
|
|
RDebugUtils.currentLine=21626888;
|
|
//BA.debugLineNum = 21626888;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
public String _p_nuevocliente_click(keymon.lat.medicomed.c_nuevocliente __ref) throws Exception{
|
|
__ref = this;
|
|
RDebugUtils.currentModule="c_nuevocliente";
|
|
if (Debug.shouldDelegate(ba, "p_nuevocliente_click", false))
|
|
{return ((String) Debug.delegate(ba, "p_nuevocliente_click", null));}
|
|
RDebugUtils.currentLine=21889024;
|
|
//BA.debugLineNum = 21889024;BA.debugLine="Private Sub p_nuevoCliente_Click";
|
|
RDebugUtils.currentLine=21889026;
|
|
//BA.debugLineNum = 21889026;BA.debugLine="End Sub";
|
|
return "";
|
|
}
|
|
} |